Prozedurname variabel ansteuern

[eddy]

Hallo Whissi,

nutze doch einfach Button.Tag

Am Anfang definieren und bei jedem Klick nach Wunsch ändern.

Code:

case button.tag of
  1: begin
       proz1; 
       button.tag := 2;
     end;
  2: begin
       proz2; 
       button.tag := 3;
     end;
  3: begin
       proz3; 
       button.tag := 1;
     end;
end;

mfg
eddy