Текущий архив: 2004.09.19;
Скачать: CL | DM;

Вниз

Адрес E.Mail   Найти похожие ветки 

← →
O?O   (2004-09-04 06:06) [0]

Как на форму положить строчку с адресом E.Mail, чтоб кликнув на неё вызывался почтовик с новым письмом

---

← →
X-Disa   (2004-09-04 09:53) [1]

Label1.Caption:="123@Mail.ru";
Label1.Font.Color:=clblue
Label1.cursor:=crHandPoint;

procedure TForm1.Label1Click(Sender: TObject);
begin
ShellExecute(0,"open","mailto:123@Mail.ru",NIL,NIL,SW_SHOWNORMAL);
end;



---

← →
X-Disa   (2004-09-04 09:54) [2]

Да, еще в Uses надо добавить ShellAPI

---

← →
O?O   (2004-09-06 08:34) [3]

Спасибо, всё отлично получилось :)

---

Страницы: 1 вся ветка

Текущий архив: 2004.09.19;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.024 c