[Ole]Button in Form einer Webseite 'anklicken'

[marabu]

Hallo Max,

dein Code passt nicht zu dem HTML-Fragment.

Delphi-Quellcode:

procedure TPROfiler.Button1Click(Sender: TObject);
var
  ovElements: OleVariant;
  i: Integer;
begin
  ovElements := VZbrowse.OleObject.Document.forms.item(0).elements;
  for i := 0 to (ovElements.Length - 1) do
    if SameText(ovElements.item(i).tagName, 'input') 
    and SameText(ovElements.item(i).type, 'SUBMIT') then
    begin
      ovElements.item(i).Click;
      Break;
    end;
end;

Hast du es auch schonmal so probiert?

Delphi-Quellcode:

procedure TPROfiler.Button1Click(Sender: TObject);
begin
  VZbrowse.OleObject.Document.forms.item(0).submit;
end;

Grüße vom marabu