Thema: Delphi Integer + 1

Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#14

Re: Integer + 1

  Alt 27. Apr 2008, 09:50
Hallo

Zitat von XPLOSIV:
Naja geht nich is auch egal
Jetzt gib doch nicht gleich auf!

Zitat von XPLOSIV:
Also ich will eine Variable immer um 1 erhöhen und dann anzeigen lassen.
Da du "immer" schreibst, vermute ich, meinst du das fortlaufend.

Das geht beispielsweise mit einem TTimer (aufs Formular ziehen und einen Doppelklick darauf machen). Die Geschwindigkeit lässt sich mit der Interval-Eigenschaft festlegen. Hier mal ein Beispiel mit globaler Variable:

Delphi-Quellcode:
var
  Form1: TForm1;
  i: Integer = 0;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Label1.Caption := IntToStr(i);
  Inc(i);
end;
Klappt das immer noch nicht, dann schreibe bitte genau, was nicht geht und auch wie dein bisheriger Code dazu aussieht.

Grüße

Edit: Huch, ich habe mich zitiert, anstelle den Beitrag zu editieren.
  Mit Zitat antworten Zitat