Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
6. Apr 2004
Es geht in diesem Fall auch mit nur einer Variable, da es sich hier nur um einen Zeiger auf den mit TTimer.Create(Form1) erstellten Timer.
OK, wenn du später drauf zugreifen willst, dann sollte natürlich das Array für die Timer Global definiert sein, oder du greifst nicht über die Zeiger in einem Timer-Array zu, sondern läßt dir den entsprechenden Timer suchen.
Das mit der INI: Wenn du es...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
5. Apr 2004
1. Zähler-Variable im Zähler verwendet :warn:for i := i downto 1 do
2. wozu das Array - das ist doch total sinnlos
3. bei mir geht's - bei dir sollte es aber zumindestens "0" anzeigen - da du's ja nicht zugewiesen hast ;)
PS: du solltest Tag natürlich auch festlegen
Type TForm1 = Class(TForm)
...
Private
Procedure TimerEvent(Sender: TObject);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
5. Apr 2004
Na dann schämm dich :warn: :P
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
5. Apr 2004
Name gibt es überall.
Aber wenn ich das richtig im Köpfchen hab, hat TObject Tag nicht drin.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
5. Apr 2004
Jedes Objekt übergibt sich ja selber beim Aufrufen einer Ereignisprozedur im Parameter Sender an die Ereignisprozedur. Und diesen Parameter kann man ja vergleichen (siehe 1), oder seine Parameter abfragen (siehe 2).
1: Sender mit den Namen der verschiedenen Timer vergleichen:
Procedure TForm1.TimerXTimer(Sender: TObject);
Begin
If Sender = Timer1 Then ShowMessage('Ich bin Timer: 1');...