[Михалыч]

Как сделать так, чтобы при клике на ссылку открывалась почтовая программа, создавалось новое сообщение с уже прописанным полями "Кому" и "Тема". Пользователю оставалось только написать текст письма и нажать кнопку "Отправить".

[PhoeniX]

Клик на ссылку? Ну, тогда вы немного ошиблись форумом. Вот тут посмотрите.

P.S. Вот оно чё, Михалыч... // не удержался

[Михалыч]

Сообщение от DJ PhoeniX

Клик на ссылку? Ну, тогда вы немного ошиблись форумом. Вот тут посмотрите.

P.S. Вот оно чё, Михалыч... // не удержался

Клик на Label.

Код:

procedure TForm1.Label1Click(Sender: TObject);
begin
 ShellExecute (handle, 'open', 'wlmail.exe', nil, nil, SW_SHOW);


end;

[PhoeniX]

Я побуду кэпом, но не на всех компах установлен Аутглюк. У меня, например, вместо него Thunderbird. А команда для запуска стандартного почтовика подойдёт вида

Код:

ShellExecute (handle, 'open', 'mailto:admin@site.net?subject=Test', nil, nil, SW_SHOW);

[Михалыч]

Код:

ShellExecute (handle, 'open', 'mailto:admin@site.net?subject=Test', nil, nil, SW_SHOW);

То что нужно

[Михалыч]

Клик на Label.

Код:

procedure TForm1.Label1Click(Sender: TObject);
begin
 ShellExecute (handle, 'open', 'wlmail.exe', nil, nil, SW_SHOW);


end;

[/quote]

В общемхочется сделать как в Utorrent. При выборе меня "Справка" затем "Отправить отзыв" открывается почтовая программа, создается новое письмо и поле "Кому" уже заполнено.