Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

Отследить загрузку файла в WebBrouser   Найти похожие ветки 

 
dreams   (2004-03-31 23:39) [0]

Написал приложение использующее TWebBrouser все вроде работает но не могу отследить одну вещь : Когда щёлкаешь по ссылке и начинаеться загрузка файла ( exe \ rar и т.д ) как отследить загрузку и не дать запуститься стандартному диалогу загрузке файла ? Желательно при этом получив ссылку на закачеваемый файл.


 
easy ©   (2004-04-01 00:02) [1]

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
 const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
 Headers: OleVariant; var Cancel: WordBool);
begin
 if extractfileext(url)=".rar" then begin
   showmessage(URL);
   Cancel:=true;
 end;
end;



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

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.057 c
1-1083913249
pirate
2004-05-07 11:00
2004.05.23
TStrings глюк


1-1083839939
ary
2004-05-06 14:38
2004.05.23
Векторный шрифт


14-1083670916
Galera
2004-05-04 15:41
2004.05.23
Страсти христовы


4-1081185457
Kme
2004-04-05 21:17
2004.05.23
Печать на принтер из файла


1-1083742920
tria
2004-05-05 11:42
2004.05.23
Символ & при выводе с пом. DrawText() выводится в виде _