AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Brauche eine Geladen-Variable

Ein Thema von Helmi · begonnen am 19. Jul 2004 · letzter Beitrag vom 20. Jul 2004
Antwort Antwort
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#1

Brauche eine Geladen-Variable

  Alt 19. Jul 2004, 15:21
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
  Mit Zitat antworten Zitat
Benutzerbild von maximov
maximov

Registriert seit: 2. Okt 2003
Ort: Hamburg
548 Beiträge
 
Delphi 2005 Professional
 
#2

Re: Brauche eine Geladen-Variable

  Alt 19. Jul 2004, 15:40
hi,

variable nicht, aber eine virtuelle methode:

Delphi-Quellcode:
procedure TForm1.loaded; {override}
begin
  <<machwas>>
end;
mâxîmôv.

{KDT}
  Mit Zitat antworten Zitat
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#3

Re: Brauche eine Geladen-Variable

  Alt 19. Jul 2004, 15:41
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
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: Brauche eine Geladen-Variable

  Alt 19. Jul 2004, 15:42
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 ;)
......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
marius86

Registriert seit: 23. Jun 2003
Ort: Aachen
17 Beiträge
 
Delphi 7 Enterprise
 
#5

Re: Brauche eine Geladen-Variable

  Alt 20. Jul 2004, 16:19
Oder einfach:

Delphi-Quellcode:
var
 FormIstGeladen : Bool;

procedure TForm1.loaded; {override}
begin
  FormIstGeladen := True;
end;
8)
  Mit Zitat antworten Zitat
Benutzerbild von Ultimator
Ultimator

Registriert seit: 17. Feb 2004
Ort: Coburg
1.860 Beiträge
 
FreePascal / Lazarus
 
#6

Re: Brauche eine Geladen-Variable

  Alt 20. Jul 2004, 16:40
*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
Julian J. Pracht
  Mit Zitat antworten Zitat
marius86

Registriert seit: 23. Jun 2003
Ort: Aachen
17 Beiträge
 
Delphi 7 Enterprise
 
#7

Re: Brauche eine Geladen-Variable

  Alt 20. Jul 2004, 16:43
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
Falls du mich anräusperst, lies meinen Beitrag nochmal genau durch...
  Mit Zitat antworten Zitat
Robert_G
(Gast)

n/a Beiträge
 
#8

Re: Brauche eine Geladen-Variable

  Alt 20. Jul 2004, 17:17
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;
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:41 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