Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Shellexecute+InternetExplorer+Habe kaum Ahnung (https://www.delphipraxis.net/48441-shellexecute-internetexplorer-habe-kaum-ahnung.html)

Flippo 25. Jun 2005 11:47


Shellexecute+InternetExplorer+Habe kaum Ahnung
 
Hallo,
hab schon viel gesucht, auch einiges gefunden was ich größtenteils nicht verstanden habe, mir ein paar sachen zusammengebastelt und bin gescheitert.

also ich wollte ein Programm schreiben bei dem ich mit einem Klick auf einen Button:
- ein Internetexplorerfenster öffene
- dort Loginname und Passwort eingebe und mich einlogge

das ist mein Resultat:
Delphi-Quellcode:
procedure Login(Name,Passwort,Seite,NameN,PasswortN:string);
begin
Shellexecute(form1.Handle,'open',PChar(Seite),nil,nil, SW_SHOWNORMAL);
Webbrowser1.OleObject.document.forms.item(0).elements.item(NameN).value:=Name;
WebBrowser1.OleObject.document.forms.item(0).elements.item(PasswortN).value:=Passwort;
end;
Mein Problem ist glaubich das ich keine Ahnung hab wie ich:
Webbrowser1.OleObject.document.forms.item(0).eleme nts.item(NameN).value:=Name;
WebBrowser1.OleObject.document.forms.item(0).eleme nts.item(PasswortN).value:=Passwort;
mit dem hier:
Shellexecute(form1.Handle,'open',PChar(Seite),nil, nil, SW_SHOWNORMAL);
geöffneten Fenster mache.
(Also das Fenster öffnet sich schonmal mit der richtigen Seite)

Ausserdem würde mich mal interessieren was die einzelnen Teile von diesem Befehl:

Shellexecute(form1.Handle,'open',PChar(Seite),nil, nil, SW_SHOWNORMAL);

überhaupt bedeuten und ob ich vieleicht da irgendwo festlegen kann das das Webbroser1 sein soll.

Aber wie gesagt ich habe eigentlich keine Ahnung und es kann auch alles Schwachsinn sein wie ich das porbieren will, wäre über Hilfe dankbar.
THX im vorraus

dahead 25. Jun 2005 11:58

Re: Shellexecute+InternetExplorer+Habe kaum Ahnung
 
Hi,

Zum ShellExecute Befehl kann ich dir etwas weiterhelfen. Du könntest allerdings auch einfach hier im Forum nach "ShellExecute" suchen, bzw. in deiner Windows-API Hilfe.

Aus dem MSDN:

http://msdn.microsoft.com/library/de...ellexecute.asp
http://msdn.microsoft.com/library/de...lexecuteex.asp

The ShellExecute function opens or prints a specified file. The file can be an executable file or a document file. See ShellExecuteEx also.

HINSTANCE ShellExecute(

HWND hwnd, // handle to parent window
LPCTSTR lpOperation, // pointer to string that specifies operation to perform
LPCTSTR lpFile, // pointer to filename or folder name string
LPCTSTR lpParameters, // pointer to string that specifies executable-file parameters
LPCTSTR lpDirectory, // pointer to string that specifies default directory
INT nShowCmd // whether file is shown when opened
);

Wegen OLE usw. hab ich keine Ahnung. Ich bezweifle aber stark, dass das so klappen wird. Ich glaube hier hat vor einiger Zeit schonmal jemand ein ähnliches problem gehabt.

hier: http://www.delphipraxis.net/internal...ect.php?t=1140

Assun 25. Jun 2005 12:03

Re: Shellexecute+InternetExplorer+Habe kaum Ahnung
 
Also mit ShellExecute kenn ich mich auch nicht gerade gut aus.

Aber ich weiss 100 % Dass dein Code um die Felder auszufüllen nur in Verbindung eines TWebBrowsers (also als Delphi kompo) funktioniert.

Also nimm entweder gleich eine WebBrowser Komponetne in deinem Prog, oder du musst das Handle des Internet Explorers bekommen, was meiner Meinung nach etwas schwiereiger sein sollte.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:58 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz