Тема: Как вставить ссылку ?
Показать сообщение отдельно
  #2  
Старый 11.02.2010, 14:02
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
  
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию
Код:
procedure TForm1.Label1Click(Sender: TObject);
begin
 ShellExecute(handle,'open',PChar(ExtractFilePath(ParamStr(0))+Label1.Caption),'', '', SW_SHOWNORMAL);
end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием