Feld aus Memokomponente in Excel einfügen

[Helmi]

Hallo,

du kannst dir eine Schleife sparen:

Delphi-Quellcode:

type Feld = array[0..255] of real; 

procedure TForm1.Button1Click(Sender: TObject);
var 
  oleArray: OleVariant; 
  i, n    : Integer; 
  f       : Feld; 

begin 
  n        := Memobox1.lines.count; 
  OleArray := VarArrayCreate([0, n - 1], varVariant); 


  for i := 0 to n - 1 do
    begin
      f[i]     := StrToFloat(Form1.memo1.lines[i]); 
      OleArray := f[i];
    end;

  ExcelWorksheet1.range['A1', 'A20'].value := OleArray; //<-- müsste es nicht "Value2" heissen?
end;

Ach ja, verwende bitte die Delphi-Tags. So lässt sich ein Quell-Text besser lesen.