OT: Delphi

[Lukas Grepl]

Zdenek napsal(a):
> Poradil by mi nekdo, jak vytvorit univerzalni proceduru pro praci s vice 
> komponentami stejneho typu?
> Mam nekolik komponent (SG1..SG10) typu TStringGrid a chtel bych se vsemi 
> provest stejnou operaci (naplnit Cells).
> Ve smycce ji nemuzu volat s parametry typu TStringGrid, ale treba 
> integer (1 pro SG1, atd).

Pokud jsem dobre pochopil otazku, tak potrebujete zhruba tohle

var
   SG: TStringGrid;

...

SG := TStringGrid(FindComponent('SG'+IntToStr(I)));
SG.Cells[1][2] := '...';

Lukas Grepl