Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi intraweb zweite seite aufrufen (https://www.delphipraxis.net/128238-intraweb-zweite-seite-aufrufen.html)

msickel 26. Jan 2009 18:42


intraweb zweite seite aufrufen
 
Hallo,
ich hab da ein kleines Problem, ich versuche schon seit einiger Zeit aus der Funktion IWAppFormRender eine 2 Webpage aufzurufen, aber leider gelingt mir das nicht, es wird nach einer kurzen WarteZeit wieder die erste Seite angezeigt.

Delphi-Quellcode:
Code:

procedure TfrmLogin.IWAppFormRender(Sender: TObject);
var
 openResult : Boolean;
 reg : TRegistry;
begin
  reg := TRegistry.Create(KEY_READ);
  reg.RootKey := HKEY_LOCAL_MACHINE;
  openResult := reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon',True);
  if openResult = True then
  begin
    IWMemo1.Lines.Add('DEBUGAUSGABE-Read-AutoLogon-Data');
    IWMemo1.Lines.Add('--------------------------------------');
    IWMemo1.Lines.Add('Domain: ' + reg.ReadString('DefaultDomainName'));
    IWMemo1.Lines.Add('User: ' + reg.ReadString('DefaultUserName'));
    IWMemo1.Lines.Add('DomainVorgabe: ' + IWEdit1.Text);
    IWMemo1.Lines.Add('--------------------------------------');
    IWEdit2.Text := reg.ReadString('DefaultUserName');
 
    TfrmMain.Create(WebApplication).Show;
  end;
end;
Wenn ich den Befehl

Delphi-Quellcode:
Code:

TfrmMain.Create(WebApplication).Show;
über einen Button aufrufe, geht es, was mache ich falsch?

Martin [delphi]


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:29 Uhr.

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