Überprüfe mal folgendes:
1. Das Formular heist DemoBar
2. Deine Procedure ist in der selben
Unit
Delphi-Quellcode:
Unit ...
Interface
Type TDemoBar =
Class(TForm)
SpeedButton129: TSpeedButton;
Procedure SpeedButton129Click(Sender: TObject);
End;
Var DemoBar: TDemoBar;
Implementation
Procedure TDemoBar.SpeedButton129Click(Sender: TObject);
Var a: Integer;
Begin
For a := 44
to 113
do
(FindComponent('
edit' + IntToStr(a))
as TEdit).Text := '
';
End;
End.
Mehr kann ich aus diesem Stückchen auch nicht erkennen.