Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
Delphi XE2 Professional
|
Re: Procedure beenden
19. Mai 2009, 21:38
auch bei "case" wäre kein exit notwendig:
Delphi-Quellcode:
case pos of
1:begin
button1.Top := 120;
button1.Left := 8;
pos := 2;
end;
2:begin
//usw..
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
|