Stringgrid fixedcols in einem array speichern

[marabu]

Hallo,

warum nicht so?

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;

  ComboBox1.Items.Assign(Form4.StringGrid1.Rows[0]);

{
  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;

Viel besser ist es aber, wenn die Spaltenüberschriften unabhängig von den visuellen Controls bereit gestellt werden.

Grüße vom marabu