Procedure beenden

[Forlan]

Zitat von Fussball-Robby:

Und noch besser:

Delphi-Quellcode:

case pos of
  1:begin
      button1.Top :=  120;
      button1.Left := 8;
      pos := 2;
      exit;
    end;
  2:begin
      //usw..

(Wie Dax bereits sagte)

Wenn wir jetzt so anfangen, dann ist es auch besser wenn er andere Bezeichner verwendet anstatt Button1 etc.