Timer Komponente

Crishnu · Beiträge: 31

Ich habe ein Problem!

Ich will mithilfe der Timer-Komponente,
dass zb alle 10 sec auf eine bestehende Zahl
etwas draufaddiert wird.
Nur bei mir wird bei der Timer Komponente der errechnete
Wert nie übernommen.

Bsp:

Zahl:=Zahl+10;

da müsste erst 10 dann 20,30,40 rauskommen, der bleibt bei mir immer
bei 10 stehen.

Kann mir da jemand helfen?

Pr0g · Beiträge: 220 D7 Pers

Hast du beim Timer Enabled auf True? Ist der Intervallwert vielleicht zu hoch? Wie überprüfst du den Wert der Variable? Addieren kannst du besser so (sollte aber nichts mit dem Problem zu tun haben):

markieren

Delphi-Quelltext

1:	Inc(Zahl, 10);

MfG Pr0g

JRegier · Verfasst: Mi 15.06.05 22:55

Hast du die Variable "Zahl" global deklariert? Wenn Sie in der OnTimer procedur steht dann kann
sie nicht hochgezählt werden! Weil sie undefiniert oder 0 ist beim nächsten proceduraufruf!

Pr0g · Beiträge: 220 D7 Pers

@JRegier: Wofür zitierst du meinen ganzen Post :roll:

JRegier · Verfasst: Mi 15.06.05 23:05

Pr0g hat folgendes geschrieben:

@JRegier: Wofür zitierst du meinen ganzen Post :roll:

Ok Chef ich haben das entfernt! :wink:

Blackheart · Beiträge: 164 ME D3Prof.-D6Standard

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Zahl:=Zahl+10;
  Caption:=IntToStr(Zahl);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Zahl:=0;
end;

Pr0g · Beiträge: 220 D7 Pers

Hast du als Timerintervall 10000? Ist der Timer aktiv? Sonst pack mal ein

markieren

Delphi-Quelltext

1:	ShowMessage('Test');

mit in den OnTimer Code um zu prüfen, ob er ausgeführt wird.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme