Hilfe beim Quelletext kürzen

[himitsu]

Zitat von mkinzler:

Das form1 solltest du weglassen, da form1 die Bezeichnug einer Instanz von TForm1 ist.

Das ist wohl war, wenn du es unbedingt angeben willst, dann bitte auch konsequent ... beim Timer und der PaintBox ist es ja auch nicht da.

Dann könne etwas mehr mit Einrücken gemacht werden und dann auch noch etwas gleichmäßiger, ist ja schon fast unübersichtlich

Wenn die ComboBox1 nur die 3 Werte hat, könntest du ja auch ein Array verwenden:
Const IntervalArray: Array[0..2] of Integer = (60, 30, 15);

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin 
      Timer1.Interval := IntervalArray[ComboBox1.ItemIndex];
      ...