Variable benutzen

[Robscho]

Hilfe....
ich dödel komm da grad mal nicht mit klar. ich muss dazusagen, wie man ja schon sehen kann, daß ich anfänger bin. im endeffekt sollte mein prog aber auf diese wiese laufen, ich weiß halt nur nich wie des geht...

Delphi-Quellcode:

var
n:Integer;    //oder string (weiß halt nicht was besser ist)

procedure TForm1.Button1Click(Sender: TObject);
begin
n:=1;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
n:=2;
end;

// und so weiter

procedure TForm1.do_n(Sender: TObject);
begin
  case SpeedButton(n).tag of 
  0: begin
                     // ...mach irgendwas...
     SpeedButton(n).tag := 1;
     end;
  
  1: begin
                     // ...mach was anderes...
     SpeedButton(n).tag := 0;
     end;

end;

an alle schonmal Danke vorab...
greatz

Robscho

[edit=alcaeus]code-Tags durch delphi-Tags ersetzt. In Zukunft bitte die richtigen Tags verwenden. Danke Mfg, alcaeus[/edit]