Страница 1 из 1

Загрузка окна эл. почты "Создать сообщение"

Добавлено: 15 ноя 2006, 09:11
Alex_AA
Добрый день!
Планируется, что при нажатии на кнопке Button должно открываться окно электронной почты "Создать сообщение":
procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec('c:\Program Files\Internet Explorer\iexplore.exe mailto:xxxxx@xxxxxx.ru', SW_SHOWNORMAL);
end;
Но в дополнение к этому окну ("Создать сообщение") открывается еще окно "Нет страницы для отображения - Microsoft Internet Explorer". Как этого можно избежать? Нужно только окно "Создать сообщение". Подскажите! Заранее благодарен.

Добавлено: 15 ноя 2006, 10:31
Duncon
uses
ShellAPI;

ShellExecute(Handle, nil, 'mailto:xx@xxx.ru', nil, nil, SW_SHOW);

Добавлено: 15 ноя 2006, 11:12
Alex_AA
Спасибо!!!!!!!!!!!!!!!!!!!!!

Добавлено: 15 ноя 2006, 13:45
BBB
Если в примере Duncon
'mailto:xx@xxx.ru'
заменить на
'mailto:xx@xxx.ru?subject=ТемаПисьма'
то в появившейся форме нового письма уже будет заполнен сабжект.

Добавлено: 16 ноя 2006, 15:13
Alex_AA
Спасибо, ВВВ. Так несомненно круче! Добавлю в код.