Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

ShellExecute   Найти похожие ветки 

← →
Z   (2002-01-07 18:31) [3]

Попробуй такую функцию:
(единственный минус - будет открыт IE, а не Default-броузер)

procedure LoadURL (URL: string);
var
Command, filename: pchar;
params, dir: string;
begin
command:="open" + #0;
Params:=URL+#0;
filename:="iexplore.exe" + #0;
dir:="C:\Program Files\Internet Explorer"+#0;
ShellExecute(form1.ClientHandle, command, filename, @params[1], @Dir[1], 1);
end;

---

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

Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.004 c