Скачать: CL | DM;

Ссылка   Найти похожие ветки 

← →
Молодой человек ©   (2003-07-27 02:43) [0]

Доброе время суток уважаемые мастера! Вопрос такой: необходимо чтобы при клике на Label запускалась почтовая программа с адрессом Label.Caption? Благодарю за помощь.

---

← →
Молодой человек ©   (2003-07-27 02:51) [1]

Забыл добавить: Label.Caption не статичный,то бишь может меняться,и соответственно меняется адресс...
Вроде все..:)

---

← →
Guerrilero   (2003-07-27 02:54) [2]

используй ShellExecute из ShellApi
должно получиться что-то похожее на это:

uses
ShellApi;

procedure TForm1.Label1Click(Sender: TObject);
begin
ShellExecute(Handle,nil,PChar("MailTo:" + Label1.Caption),nil,nil,SW_SHOWNORMAL);
end;

---

← →
Молодой человек ©   (2003-07-27 03:06) [3]

Работает! Спасибо!

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c