Hallo,
ich hab in meinem aktuellen Projekt eine Instanz
des TWebbrowsers laufen und möchte den Download
einer bestimmten Datei abbrechen. Die if Bedingung
wird auch erfüllt - so nebenbei, es handelt sich
hier nur um eine optimierte pos() variante - aber
der TWebbrowser öffnet trotz meiner Abbruchversuche
den Downloaddialog der exe Datei und genau den
möchte ich nicht haben. Ich könnte echt verzweifeln. =(
Delphi-Quellcode:
procedure TForm1.WebBrowserBeforeNavigate2(Sender: TObject;
const pDisp: IDispatch;
var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant;
var Cancel: WordBool);
begin
if SmartPos('
.exe',
URL, False, 1, True) > 0
then
WebBrowser.Stop;
end;