HI,
ja ne Möglichkeit gibt es. Mit Findcomponent bekommst du mit Hilfe des richtigen Namens (Edit2..Edit3..Editx) eine Komponente. Die musst du nur noch nach TEdit casten und die Eigenschaft Text abfargen.
Beispiel:
Delphi-Quellcode:
Procedure Test;
var i: byte;
begin
for i := 1 to 15 do
begin
Schueler[i] := StrToInt(TEdit(FindComponent('Edit' + IntToStr(i+2))).Text);
end;
Ich würde dir aber dazu raten, die Namen so einzustellen, dass du dann EdtSchueler1, EdtSchueler2, ... hast (nur zum einfacheren Verständniss)
Bernhard
Menno, wieso müssen da 2 vor mir sein??
EDIT: @DeddyH: ich bezweifle, dass ein TComponent einen .Text hat