[Yurk@@@]

Всем привет!
Как сохранить данные из n Stringgrid'ов(размер n*m) в один файл?
Я делаю что-то типа (в данном примере 3 стринггрида):

Код:

var table:array [1..3] of Tstringgrid;
begin
for i:=1 to CompinentCount-1 do
if form1.Components[i] is TStringGrid then begin
table[j]:=components[i] as TStringGrid;

Немогу никак доделать.Помогите.