---

hvordan kan man nemmest få adgang til et komponent via dets navn? eks:

Dette er Pseudo-ikke virkende,men illustrerende-kode:

var
i : byte;
for b:=1 to 10 do
begin
'edit'+IntToStr(b).text:='BlaBla';
end;

Hilsen Michael.

---

Hej Michael.

Komponenternes navne er ikke af typen string.
Prøv følgende:

var
cnt:integer;

for cnt:= 0 to pred(ComponentCount) do
if Components[cnt] is TEdit then
TEdit(Components[cnt]).Text:= 'Bla, bla og atter bla...';

-Jan



"Michael Hansen" <dyster_tid@hotmail.com> skrev i en meddelelse
news:92gk1p$fuc$1@news.inet.tele.dk...
> hvordan kan man nemmest få adgang til et komponent via dets navn? eks:
>
> Dette er Pseudo-ikke virkende,men illustrerende-kode:
>
> var
> i : byte;
> for b:=1 to 10 do
> begin
> 'edit'+IntToStr(b).text:='BlaBla';
> end;
>
> Hilsen Michael.
>
>