Ich würde gerne mitzählen, wie oft Form1 geöffnet wurde!

[lbccaleb]

Plazierst auf deiner Form ein Label!

Dann kannst du mit

Label1.Caption := IntToStr(FormShowCount); dem Label die Variable zuweisen! IntToStr konvertiert eine Integer variable zu einer String variable!

[bernau]

Zitat von Roachford:

Delphi-Quellcode:

  TForm1 = class(TForm)
  private
    class var FormShowCount: integer;
    
    var  
  ...
  end;

Huch. Das kannte ich auch noch nicht.


Jetzt aber das peinliche
Das wollte ich mir jetzt noch mal genauer ansehen und habe nach "class var" gesucht. Im Suchbegriff die Anführungsstriche mit eingegeben. Dachte daß nach genau dieser Schreibweise gesucht wird. Aber neeee. In den Beiträgen kommt zwar class und var vor. Aber irgendwo im Beitrag verstreut und nicht die genaue Schreibweise mit dem Leerzeichen dazwischen. Wie kann ich denn in der DP danach suchen?

[mkinzler]

Eine Klassenvariable ist eine Variable die pro Klasse gilt, nicht pro Instanz. D.H. sie hat in allen Instanzen den selben Wert

[edit=Phoenix]Beitrag wurde irgendwie nicht dargestellt. Mal kurz editiert damit's klappt. Mfg, Phoenix[/edit]

[Deep-Sea]

Zitat von rollstuhlfahrer:

EDIT: Was sollen diese Zeilen denn?

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ProgressBar1.StepIt;
  if ProgressBar1.Position < 1 then
    Close; 
end;

Entweder ProgressBar1.Min ist weit unter 0 oder dein Programm wird beim ersten Aufruf beendet. Dafür kannst du auch gleich Close nehmen.

Die ProgressBar läuft von 60 rückwärts und sobald sie 0 erreicht, wird die Form geschlossen (Warum weiß ich auch net ^^)

[Angel4585]

Zitat von mkinzler:

Eine Klassenvariable ist eine Variable die pro Klasse gilt, nicht pro Instanz. D.H. sie hat in allen Instanzen den selben Wert

Irgendwie wird das nicht dargestellt

[Jeff93]

Bei mir auch nicht, und ich kann kein Bild im Format *.bmp anhängen.

@topic : Muss eine Instanz der Klasse bestehen um die Klassenvariable zu initialisieren oder ist es so wie mit Klassenprozeduren

Delphi-Quellcode:

TKlasse = class
private
  //Edit: Fehler sry
  class function XY : boolean;
end;

?

Gruss, Jeff93

[mkinzler]

Zitat von Angel4585:

Zitat von mkinzler:

Eine Klassenvariable ist eine Variable die pro Klasse gilt, nicht pro Instanz. D.H. sie hat in allen Instanzen den selben Wert

Irgendwie wird das nicht dargestellt

Wieder mal ein Cache-Problem

[Deep-Sea]

Zitat von Jeff93:

@topic : Muss eine Instanz der Klasse bestehen um die Klassenvariable zu initialisieren oder ist es so wie mit Klassenprozeduren

Delphi-Quellcode:

TKlasse = class
private
  //Edit: Fehler sry
  class function XY : boolean;
end;

?

Gruss, Jeff93

Nein, es muss natürlich keine Instanz existieren. Es ist wie mit Klassenprozeduren

[Phoenix]

Zitat von Angel4585:

Zitat von mkinzler:

Eine Klassenvariable ist eine Variable die pro Klasse gilt, nicht pro Instanz. D.H. sie hat in allen Instanzen den selben Wert

Irgendwie wird das nicht dargestellt

Da hat Gérome wohl wieder an einem Kabel genagt...

[Jeff93]

Zitat von Deep-Sea:

Nein, es muss natürlich keine Instanz existieren. Es ist wie mit Klassenprozeduren

Danke, für die schnelle Antwort