Hallo,
nehmen wir an, ich habe 3 Editfelder(edit1, edit2, edit3). Alle Editfelder will ich mit dem String "Text" befüllen.
Anstatt die Editfelder einzeln zu befüllen, sollen die Editfelder über eine for-Schleife initialisiert werden.
Wie bekomme ich das hin?
So sieht aktuell mein Code aus:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var i:Integer;
begin
for i := 1 to 3 do
begin
edit1.Text:='text';
end;
end;