TWebBrowser und ComboBox auslesen

[r_amse_s]

hallo,

kann mir bitte jemand sagen, wie kann ich die Elemente einer ComboBox (im TWebBrowser) auslesen und in einer ComboBox in der Delphi App kopieren kann?

das http://www.swissdelphicenter.ch/de/showcode.php?id=2357 funktioniert nicht. Fehlermeldung beim

if IsSelectElement(eleElement) then "Interface not supported"

danke!!!

[NickelM]

Schreib die Prozedur so um, dann bekommste kein Fehler mehr und funkt:

Delphi-Quellcode:

//////////////////////////////////////////////////////////////////////////////
function IsSelectElement(eleElement: IHTMLElement): Boolean;
  //////////////////////////////////////////////////////////////////////////////
var
  selElement: IHTMLSelectElement;
begin
  Result := eleElement.QueryInterface(IID_IHTMLSelectElement,selElement) = S_OK;
end;

[r_amse_s]

funkt leider nicht.
ich habe es so gelöst, dass ich gar nicht mehr caste und das IHTMLElement verwende
ob das ein Element auf der Seite selektiert ist oder nicht, interessiert mich z.Z. nicht

danke trotzdem

[Jacques Murell]

Du könntest ganz einfach via Pos/PosEx den Webseitenquellcode durchgehen und alle Elemente zwischen den <Options>-Tags in deine eigene ComboBox in Delphi schreiben.

[r_amse_s]

ja schon , wollte mir das direkte Parsen ersparen