Brauche eine Geladen-Variable

[Helmi]

Hallo,

gibt es irgendwie eine Variable die true wird, wenn die Form geladen wurde?

Ich meine kein OnShow etc.

Irgendwie so was in der Art: "If Application.Loaded then <<Machwas>>".

mfg
Helmi

[maximov]

hi,

variable nicht, aber eine virtuelle methode:

Delphi-Quellcode:

procedure TForm1.loaded; {override}
begin
  <<machwas>>
end;

:wink:

[Helmi]

danke maximov

nur genau das wollt ich nicht - denn sonst hätt ich auch Show oder TForm1.Loaded benutzen können

nur brauch ich eine Variable

[sakura]

Du überprüfst einfach, ob die Variable Form1 nil ist oder nicht.

Delphi-Quellcode:

if Form1 <> nil then
  // wird wohl geladen sein, ausser Du hast nicht aufgepasst ;)

...:cat:...

[marius86]

Oder einfach:

Delphi-Quellcode:

var
 FormIstGeladen : Bool;

procedure TForm1.loaded; {override}
begin
  FormIstGeladen := True;
end;

8)

[Ultimator]

*räusper*

Zitat:

variable nicht, aber eine virtuelle methode:

Delphi-Quellcode:

procedure TForm1.loaded; {override} 
begin 
  <<machwas>> 
end;

.
.
.

danke maximov

nur genau das wollt ich nicht - denn sonst hätt ich auch Show oder TForm1.Loaded benutzen können

:lol:

[marius86]

Zitat:

Zitat von Ultimator

*räusper*

Zitat:

variable nicht, aber eine virtuelle methode:

Delphi-Quellcode:

procedure TForm1.loaded; {override} 
begin 
  <<machwas>> 
end;

.
.
.

danke maximov

nur genau das wollt ich nicht - denn sonst hätt ich auch Show oder TForm1.Loaded benutzen können

:lol:

Falls du mich anräusperst, lies meinen Beitrag nochmal genau durch... :shock:

[Robert_G]

Siehe Miezes Post.
Willst du außerden noch wissen, ob es sichtbar kannst du es zum Bleistift so machen.

Delphi-Quellcode:

function IsVisible(pFrom :TForm) : boolean;
begin
  result := (Assigned(pForm) and pForm.Visible);
end;