OT: Delphi

[Snehulak]

Zkusil jsem to z hlavy nemam tu delphi a nevim jak se plni ty cells v
stringgridu ale tohle naplni vsechny tlabely stejnym jmenem treba.

For i:=0 to ComponentCount-1 do
  begin
  if Components[I] is Tlabel then  TLabel(Components[I]).caption:='ahoj';
  end;

s pozdravem

snehulak

On 27/04/07, Zdenek <zdej@atlas.cz> wrote:
>
> 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).
>
> Nektere vlastnosti muzu menit pres Component[x] a GetPropInfo, ale
> neumim menit obsah Cells.
>
> Zdenek
> _______________________________________________
> HW-list mailing list  -  sponsored by www.HW.cz
> Hw-list@list.hw.cz
> http://list.hw.cz/mailman/listinfo/hw-list
>
------------- dal¹í èást ---------------
HTML p?íloha byla odstran?na...
URL: http://list.hw.cz/pipermail/hw-list/attachments/20070427/1194a500/attachment-0002.htm