![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#3
|
||||
|
||||
![]() Открывать сайт можно попроще ещё вот так:
Код:
WinExec('http://www.kiber.net',SW_SHOWNORMAL) У тебя слегка неправильный код с ShellExecute, надо вот так: Код:
uses ShellAPI; procedure TForm1.Label2Click(Sender: TObject); begin ShellExecute(Handle, 'open','http://www.kiber.net',nil, nil, sw_shownormal); end; Последний раз редактировалось Winny, 28.09.2007 в 10:27. |