|
Registriert seit: 1. Jan 2007
124 Beiträge
|
case geht nich ?!?
10. Feb 2007, 19:20
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var i:integer;
begin
inc(i);
case i of
1:timer2.Enabled:=true;
2:timer3.Enabled:=true;
3:timer4.Enabled:=true;
4:timer5.Enabled:=true;
5:showmessage('test');
6:timer1.Enabled:=false;
end;
end;
sieht ja ganz schön aus aber geht nich  woran liegts?
Pascal
|