![]() |
|
#1
|
|||
|
|||
![]() Как сделать так, чтобы при клике на ссылку открывалась почтовая программа, создавалось новое сообщение с уже прописанным полями "Кому" и "Тема". Пользователю оставалось только написать текст письма и нажать кнопку "Отправить".
|
#2
|
||||
|
||||
![]() Клик на ссылку? Ну, тогда вы немного ошиблись форумом. Вот тут посмотрите.
P.S. Вот оно чё, Михалыч... // не удержался ![]() Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj Последний раз редактировалось PhoeniX, 07.04.2011 в 00:42. |
#3
|
|||
|
|||
![]() Цитата:
Клик на Label. Код:
procedure TForm1.Label1Click(Sender: TObject); begin ShellExecute (handle, 'open', 'wlmail.exe', nil, nil, SW_SHOW); end; |
#4
|
||||
|
||||
![]() Я побуду кэпом, но не на всех компах установлен Аутглюк. У меня, например, вместо него Thunderbird. А команда для запуска стандартного почтовика подойдёт вида
Код:
ShellExecute (handle, 'open', 'mailto:admin@site.net?subject=Test', nil, nil, SW_SHOW); Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#5
|
|||
|
|||
![]() Клик на Label.
Код:
procedure TForm1.Label1Click(Sender: TObject); begin ShellExecute (handle, 'open', 'wlmail.exe', nil, nil, SW_SHOW); end; В общемхочется сделать как в Utorrent. При выборе меня "Справка" затем "Отправить отзыв" открывается почтовая программа, создается новое письмо и поле "Кому" уже заполнено. |
#6
|
|||
|
|||
![]() Код:
ShellExecute (handle, 'open', 'mailto:admin@site.net?subject=Test', nil, nil, SW_SHOW); |