Форум: "Основная";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];
ВнизОткрытие окон интернета Найти похожие ветки
← →
Foggot (2005-05-23 17:02) [0]Помогите пожалуйста, мне нужно что бы по нажатию на кнопку: 1) окрывалось однавременно 4 интернет окна такого типа www.xxx.ru/xxx"+edit1.text+"xxx 2)теже самые окна открывались с небольшой задержкой несколько доли секуд
← →
Eraser © (2005-05-23 17:07) [1]Foggot (23.05.05 17:02)
www.xxx.ru
LOL ))
По сабжу:
uses ShellApi
ShellExecute + F1
← →
Foggot (2005-05-23 17:08) [2]А можно чуть по подробнее
← →
rOOse © (2005-05-23 17:08) [3]Foggot (23.05.05 17:02)
www.xxx.ru
Опять порнуха ;)
← →
Foggot (2005-05-23 17:09) [4]Нет
← →
Antonn © (2005-05-23 17:11) [5]1)ShellExecute(Handle, nil, Pchar("www.xxx.ru/xxx"+edit1.text+"xxx"), nil, nil, SW_SHOW);
2)var i:integer;
for i:=0 to 3 do begin
ShellExecute(Handle, nil, Pchar("www.xxx.ru/xxx"+edit1.text+"xxx"), nil, nil, SW_SHOW);
sleep(1000);
end;
← →
Foggot (2005-05-23 17:12) [6]Я знаю чтобы открыть одно окно нужно использовать этот код:ShellExecute(Handle, "open", Pchar("http:\\xxx.xxx"+edit1.text+"xxx"+edit2.text), nil, nil, SW_SHOW);
Но как открыть 4 окна
← →
rOOse © (2005-05-23 17:13) [7]ShellExecute(0,"open","G:\Program Files\Mozilla Firefox\firefox.exe","www.xxx.ru","",SW_SHOW);
← →
Foggot (2005-05-23 17:14) [8]>Я знаю чтобы открыть одно окно нужно использовать этот код:.ShellExecute(Handle, "open", Pchar("http:\\xxx.xxx"+edit1.>text+"xxx"+edit2.text), nil, nil, SW_SHOW);
>Но как открыть 4 окна
Я написал это не видя что написал Antonn(спасибо за код)!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c