Einzelnen Beitrag anzeigen

Linkat

Registriert seit: 3. Dez 2004
Ort: nr Stuttgart
62 Beiträge
 
Delphi 2009 Professional
 
#1

von Memo zu Excel

  Alt 3. Dez 2004, 13:24
Hallo,
ich möchte aus einem Delphi-Programm über Clipboard in eine Excel-Tabelle kopieren.
Prinzipiell funktioniert das so:

Delphi-Quellcode:
uses Clipbrd;
procedure TForm1.StartClick(Sender: TObject);
var i :integer;
    delimiter :char;
begin
  Memo1.Lines.clear;
  delimiter:=';'; {,;# blank Tab schon probiert}
  for i:=0 to 100 do
  begin
    Memo1.Lines.Add(IntToStr(i)+delimiter+IntToStr(i*i));
  end;
  Memo1.SelectAll;
  Memo1.CopyToClipboard;
end;

Dann in eine Excel Tabelle öffnen und mit <ctrl> v einfügen.
Das Problem ist, dass alles in die erste Spalte kopiert wird.
Wie kann ich erreichen, dass die einzelnen Wörter jeweils in
eine Zelle geschrieben werden?


Vielen Dank!
  Mit Zitat antworten Zitat