Hi,
Der Zeilenumbruch unter Windows ist nicht "Chr(13)", sondern #13#10 (also "Chr(13)+Chr(10)").
Delphi-Quellcode:
const
n = #13#10;
begin
Clipboard.AsText := 'Artikel: '+ListView1.ItemFocused.Caption+ n +
'Artikelnummer: '+ListView1.ItemFocused.SubItems[0]+ n +
'Kaufpreis: '+ListView1.ItemFocused.SubItems[1]+' €'+ n +
'Versandkosten: '+ListView1.ItemFocused.SubItems[2]+' €'+ n +
'Gesamtpreis: '+ListView1.ItemFocused.SubItems[3]+' €'+ n +
'Verkäufer: '+ListView1.ItemFocused.SubItems[4]+ n +
'Kaufdatum: '+ListView1.ItemFocused.SubItems[5]+ n +
'Lieferdatum: '+ListView1.ItemFocused.SubItems[6];
end;
mfG
mirage228