Wie kann ich ein Button deaktivieren, dessen name in Edit.te

[Delphiturbo]

Hallo

wie kann ich ein beliebiges Button deaktivieren, dessen sein Name in Edit.text?
versucht habe ich so :

Delphi-Quellcode:

Button(Edit1.Text).enabled:=False

[Corpsman]

Tbutton(Form1.findcomponent(Edit1.text)).enabled := False;

[himitsu]

indem du den Button genauso suchst, wie es vor kurzem in deinem "Button hervorheben"-Thread auch schon gemacht wurde!

[Matze]

Hallo,

versuche einmal die Tipps, die man dir gegeben hat zu verstehen. Denn dann kannst du das auch auf zukünftige Probleme anwenden. In diesem Thema wurde alles gesagt. Dort ist das Stichwort FindComponent bereits gefallen!
Lies dir das in der Hilfe durch und versuche den Code zu verstehen (das gilt immer für alle Codes, die du nutzt).

Gruß

[Delphiturbo]

Lösung gefunden Danke!

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  Btn: TControl;
begin
Btn := TControl(FindComponent('BitBtn' + Edit1.Text));
btn.enabled:=False;
end;

[Christian Seehase]

Moin DelphiTurbo,

sicherer wäre es erst zu prüfen, ob der Button überhaupt gefunden wurde, bevor eine Eigenschaft verwendet wird.

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);

var
  Btn: TControl;

begin
  Btn := TControl(FindComponent('BitBtn' + Edit1.Text));
  if Assigned(btn) then btn.enabled := False;
end;

So vermeidest Du eine Access Violation, falls in Edit1.Text ein Wert steht, für den es keinen Button gibt.