Hallo!
ich habe ein listview mit 8 spalten. ich bentze folgenden code, um den eintrag zu kopieren:
Delphi-Quellcode:
uses ClipBrd;
....
procedure TForm1.ButtonKopierenClick(Sender: TObject);
begin
Clipboard.AsText := 'Artikel: '+ListView1.ItemFocused.Caption+chr(13)+
'Artikelnummer: '+ListView1.ItemFocused.SubItems[0]+chr(13)+
'Kaufpreis: '+ListView1.ItemFocused.SubItems[1]+' €'+chr(13)+
'Versandkosten: '+ListView1.ItemFocused.SubItems[2]+' €'+chr(13)+
'Gesamtpreis: '+ListView1.ItemFocused.SubItems[3]+' €'+chr(13)+
'Verkäufer: '+ListView1.ItemFocused.SubItems[4]+chr(13)+
'Kaufdatum: '+ListView1.ItemFocused.SubItems[5]+chr(13)+
'Lieferdatum: '+ListView1.ItemFocused.SubItems[6];
end;
das funktioniert ja eigentlich auch! das problem jedoch: ich möchte dazwischen immer ein ENTER haben! wenn ich das kopierte jedoch in den editor einfüge habe ich statt nem zeilenumbruch ein kleines viereckiges kästchen!
woran liegt das?
Gruß, dopeline