Stringgrid fixedcols in einem array speichern

[Borschti]

Hallo zusammen,

wir wollten gerne die fixedcols (eine zeile) in einem array speichern um sie so in eine compobox packen zu können leider übernimmt er die werte aus dem Stringgrid nicht... vielleicht könntet ihr uns ja weiter helfen.

Hier ist unser bisheriges Programmfragment

Delphi-Quellcode:

procedure TForm3.ColorButton1Click(Sender: TObject);
var
  gramm, cash : Extended;
  names : String;
  i, x, b : Integer;
  arrey : String;
  begin
  gramm := StrToFloat(edit1.text);
  cash := StrToFloat(Edit2.text);
  x := Form4.StringGrid1.ColCount;

  for b := 1 to x do
  begin
    arrey[b] := form4.Stringgrid1.Cells[b,0]; // Hier tritt ein unerklärlicher fehler auf: inkompatible Typen 'Char' und 'String'
  end;

   for i := 1 to x do
  begin
    form3.Combobox1.items[i-1] :=arrey[i];
  end;

end;

vielleicht kennt ihr ja auch eine bessere Lösung für unser Problem