Как сохранить содержимое StringGrid-a в Unicode?

[iiunbreakableii]

Здравствуйте товарисчи программеры!
У меня тут вышла НЕбольшая проблемка: не знаю как сохранить StringGrid в unicode? Без юникода код сохранения выглядит так:

procedure TForm1.SaveTable(Table: TStringGrid; Filename:string);
var
  f: textfile;
  x, y: integer;
begin
  assignfile(f, Filename);
  rewrite(f);
  writeln(f, table.colcount);
  writeln(f, table.rowcount);
  for X := 0 to table.colcount - 1 do
    for y := 0 to table.rowcount - 1 do
      writeln(F, table.cells[x, y]);
  closefile(f);
end;

Буду крайне признателен за помощь!

[Neeter]

Я точно не уверен, но может быть вот так:

procedure SaveTable(Table: TStringGrid; Filename:string);
var
  f: textfile;
  s: Utf8String;
  x, y: integer;
begin
  assignfile(f, Filename);
  rewrite(f);
  writeln(f, table.colcount);
  writeln(f, table.rowcount);
  for X := 0 to table.colcount - 1 do
    for y := 0 to table.rowcount - 1 do
    begin
      s := Utf8String(table.Cells[x, y]);
      writeln(F, s);
    end;
  closefile(f);
end;

[iiunbreakableii]

Спасибо, то что нужно!