| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Label типа delphi@mastak.ru [D6, Win2k]

Yuray76 ©   (2003-01-10 10:27:00) 

Как сделать, чтобы при клике на Label открывалось окно «Создать сообщение» почтовой программы, используемой по умолчанию, а в поле «Кому:» стоял адрес из Label?

---

KoHe4Ho }|{e 6ot   (2003-01-10 14:41:00) [1]

?Subj= это тема
?Body= Это текст

---

Delirium^.Tremens   (2003-01-10 11:31:00) [2]

to Yuray76 © (10.01.03 11:13)
ты вот это пробовал прежде чем спрашивать?
Delirium^.Tremens © (10.01.03 10:35)

---

Yuray76   (2003-01-10 11:13:00) [3]

А как тему прописать? Thx.

---

Yuray76   (2003-01-10 10:53:00) [4]

Спасибо. Разобрался

---

Delirium^.Tremens   (2003-01-10 10:35:00) [5]


uses ShellApi;
...
ShellExecute( Application.Handle, "open",
PAnsiChar("mailto:"+TLabel(Sender).Caption+"?subj=Theme&body=Hello!"), nil, nil, SW_SHOWNORMAL);


---

stone   (2003-01-10 10:32:00) [6]

ShellExecute(Application.Handle, "open", PAnsiChar("mailto:"+Label1.Caption), nil, nil, 0);

---

Наверх