Einzelnen Beitrag anzeigen

Volker Z.

Registriert seit: 4. Dez 2012
Ort: Augsburg, Bayern, Süddeutschland
419 Beiträge
 
Delphi XE4 Ultimate
 
#3

AW: Filebutton im TWebbrowser anklicken

  Alt 3. Aug 2013, 00:14
Hallo,

mir ist kein HTML-Tag bekannt, das "userfile" heißt. Du kannst es aber mal so versuchen
Delphi-Quellcode:
procedure TFormEinlesung.Button3Click(Sender: TObject);
var
  ovElements: OleVariant;
  i: Integer;
begin
  ovElements := WebBrowser1.OleObject.Document.Forms.item(0).elements;
  for i := 0 to (ovElements.Length - 1) do
    if (ovElements.item(i).name = 'userfile') and (ovElements.item(i).type = 'file') then
      ovElements.item(i).Click;
end;
dann sollte es auch klappen.

Gruß
Volker Zeller
  Mit Zitat antworten Zitat