WebBrowser1.OleObject.document.forms.item(0).elements.item('

[Andreas L.]

Zitat von taktaky:

Zitat von Andreas L.:

Ein Blick in die Delphi-Hilfe verrät dir, dass die Funktion so angewendet werden kann:

Delphi-Quellcode:

   if VarIsClear(webbrowser1.......) then
    begin
     tuwas;
    end;

So habe ich den Code geschrieben:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if VarIsClear(WebBrowser1.OleObject.document.forms.item(0)) <> Null then
begin
blabla
blabla
end
else
exit;
end;

Man kann das Formular zwar ausfüllen und senden aber wenn das Formular nicht mehr vorhanden ist und klicke ich auf das Button, dann erscheint eine Fehlermeldung

Du brauchst nicht mehr auf <> Null prüfen. Das macht alles die Funtion varIsClear. Einfache if varisclear(...) then wie ich es weiter oben bereits gepostet habe. Markiere in Delphi den Befel VarIsClear und drücke F1...