Zitat von
Bruce86:
Delphi-Quellcode:
with TEdit(FindComponent( 'Edit' + IntToStr( i)) ) do
begin
Edit1.Text:=List[0];
end;
Du machst doch schon ein Findcomponent, und kannst innerhalb der with- Schleife darauf zugreifen. Du schreibst aber trotzem statisch immer das Feld List[0] in das Edit1 control. Probiers mal so:
with TEdit(FindComponent( 'Edit' + IntToStr( i)) ) do
Delphi-Quellcode:
begin
Text:=List[i-1];
end;
Beachte aber noch eins: Wenn du die StringList lädst, so beginnt die Items Indexierung bei 0. Dein erstes Element ist demnach List[0] und nicht List[1]. Deshalb das i-1 in meinem Quelltext. Beim Schreiben musst Du da natürlich auch drauf achten.