irgendwie funzt das mit der .url Datei auslesen nicht.
Delphi-Quellcode:
rocedure TForm1.FormCreate(Sender: TObject);
var starturl,startstring:
string;
begin
if ParamCount>0
then startstring := ParamStr(1);
if not FileExists(startstring)
then starturl := '
http://srvapp02/Home/default.aspx';
MyUrl := TiniFile.Create(startstring);
starturl := MyUrl.ReadString('
InternetShortcut','
URL','
');
WebBrowser1.Navigate(WideString('
http://srvapp02/P2plus/p2way/p2way.aspx'));
WebBrowser2.Navigate(WideString(starturl));
Er kann aus der
Url nicht lesen.