Einzelnen Beitrag anzeigen

Benutzerbild von sniper_w
sniper_w

Registriert seit: 11. Dez 2004
Ort: Wien, Österriech
893 Beiträge
 
Delphi 6 Enterprise
 
#4

Re: TWebbrowser: Übermittlung von Session IDs

  Alt 26. Aug 2007, 15:45
Ich würde es so machen:
1) dem HtmlSubmit-Button eine ID verpassen ( id="einmalig"
2) dieses Button dann so im Code finden und klicken
Delphi-Quellcode:
function GetElementByID(WB: TWebBrowser; elementID: WideString; var element: IHTMLElement): Boolean;
begin
  try
    element := (WB.Document as IHTMLDocument3).getElementById(elementID) as IHTMLElement;
    Result := element <> nil;
  except
    Result := False;
  end;
end;

...

var
  button: IHTMLElement;
begin
  if GetElementByID(myWB, 'einmalig', button) then
  begin
    button.click;
  end;
end;
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
  Mit Zitat antworten Zitat