Variable Timer

[FGD]

Zitat von DeddyH:

Das verstehe ich ehrlich gesagt nicht. Die eckigen Klammern müssten eigentlich richtig sein. Allerdings wäre es wohl besser, wenn das statt einer Prozedur eine Methode Deines Formulars wäre.

Funktionen/Prozeduren hab ich verstanden, Methoden noch nicht.

Zitat von Matze:

Hallo,

nimm "var" anstelle von "type":

var Timer: array(*[1..40]*) of TTimer; Denk auch daran, die Timer zu erzeugen.

Grüße

und

Zitat von FAlter:

Hi,

nenn den Typ mal z. B. TTimerArray. Und dann brauchst du eine Variable Timer vom Typ TTimerArray.

Mfg
FAlter

Da gibts eine schöne Zugriffsverletzungen, obwohl die Timer bereits auf dem Formular sind oder ist das, dass Problem

Zitat von Fussball-Robby:

Und die Funktion kannst du auch ziemlich verkürzen:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    RadioGroup1: TRadioGroup;
  private
    procedure FNummerTimerstart(NR: Integer);
  //..
  end;

implementation

procedure TForm1.FNummerTimerstart(NR: Integer);
begin
  case RadioGroup1.ItemIndex of
    1: Inc(Nr, 10);
    2: Inc(Nr, 20);
    3: Inc(Nr, 30);
  end;
  {oder:
  Inc(Nr, RadioGroup1.ItemIndex * 10);}
  Timer[NR].Enabled := True;
end;

Gefällt mir gut aber, auch Zugriffsverletzung