markieren

Delphi-Quellcode:

Btn, item: TButton;
i, x: Integer;

Folgender Code funktioniert einwandfrei..

markieren

Delphi-Quellcode:

    for i:= 1 to 46 do
    begin
      Btn := TButton(Form1.FindComponent('TBXButton'+IntToStr(i)));
      if Btn <> NIL then Btn.Enabled:= True;
    end;

Der folgende jedoch unter der Meldung, dass TButton und TTBXItem inkompatibel sind, nicht.

markieren

Delphi-Quellcode:

    for x:= 1 to 5 do
    begin
      item := TTBXItem(Form1.FindComponent('TBXItem'+IntToStr(x)));
      if item <> NIL then item.Enabled:= True;
    end;

Was ist da falsch

Fehler gefunden.!!!! wie kann man so Blöd sein !?!ß

markieren

Delphi-Quellcode:

Btn, item: TButton; // <--
i, x: Integer;

item: TButton; Also Junge..

Man kann sich mal mal verlesen

Ich hab den Fehler erst gesehen, als ich die Deklarationen hierhin kopiert habe