Einzelnen Beitrag anzeigen

xthing98

Registriert seit: 10. Mär 2020
3 Beiträge
 
#1

Standard Webbrowser Username und Passwort übergeben

  Alt 10. Mär 2020, 13:23
Hallo Delphi Freunde,

ich bin neu in dem Forum und habe gleich mal eine Frage.
Wie kann ich dem Standard Webbrowser, Username und Passwort, aus einem Delphi Programm übergeben? Ich habe hier schon etwas programmiert, allerdings funktioniert das noch nicht. Die Webseite startet gleich im richtigen Eingabefeld, dem Username bzw. in diesem Fall ist das die E-Mailadresse. Allerdings wird das Feld nicht aufgefüllt. Was mache ich da falsch?

Code:
procedure StringSenden(sendStr: string; browserStr: string; Handle: Longint);
var
  hTargetWnd1,hTargetWnd2: HWND;
  ProcID: Cardinal;
begin
   hTargetWnd1 := 0;

   hTargetWnd1 := Shellexecute(0, nil, 'https://www.brack.ch/anmelden', nil, nil, SW_SHOW);
   setForegroundWindow(hTargetWnd1);
   sleep(10000);
   if hTargetWnd1 <> 0 then
   SendMessage(hTargetWnd1, WM_SETTEXT, Longint(Handle), LongInt(PChar(sendStr)));
end;


Schon einmal vielen Dank für eure Hilfe.

Gruss
Marc
  Mit Zitat antworten Zitat