Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Приветствую!!! Как сделать label ссылкой на инет ресурс [D7, WinXP]

Zloy © (2004-12-15 16:17:00)
соот-но при наведении на нее указатель изменяется, при кликанье открывается браузер по умолчанию с этой страницей. Тоже самой и e-mail адресом, при кликанье создается пиьсмо в браузере по умолчанию с этим адресом.

Рамиль (2004-12-16 10:03:00) [1]
Zloy © (16.12.04 9:43) [3]
Делфи тут ни причем. Смотри параметры mailto
http://html.manual.ru/book/html/body/hyperlinks/a.php

Zloy (2004-12-16 09:43:00) [2]
Спасибо, а скажите возможно с почтой добавить еще текст в сообщение, и назвать тему сообщения, через код дельфи??

ghg (2004-12-15 16:45:00) [3]
procedure TEdit.Click;
var
mail: string;
begin
inherited;
mail := 'mailto:' + e_mail_adresata;
ShellExecute(0, 'open', pChar(mail), nil, nil, SW_SHOWNORMAL);
end;
{------------------------------------------------------}
procedure TEdit.Click;
var
mail: string;
begin
inherited;
mail := 'www.delphimaster.ru';
ShellExecute(0, 'open', pChar(mail), nil, nil, SW_SHOWNORMAL);
end;

Семен Сорокин (2004-12-15 16:21:00) [4]
на OnMouseEnter меняй внешний вид Label'а (Font, Cursor), на OnMouseLeave - обратно, на OnClick запускай (например через ShellExecute) нужную строчку ресурса.

Наверх

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