Email-Versand

[malabarista]

Ich versuche derzeit eine Lösung hiermit:

Code: Alles auswählen

uses
  LclIntf;
 
procedure TForm1.Button1Click(Sender: TObject);
var
  recipients: String;
  subject: String;
  body: String;
  cc: String;
begin
  recipients := 'm.mustermann@domain.de;frau.mustermann@domain.de';
  cc := 'james.bond@kino.de';
  subject := 'Test-Mail';
  body := 'Hallo - dies ist ein Test.'+ LineEnding+'nächste Zeile'+ LineEnding+'noch eine Zeile';
  OpenURL(Format('mailto:%s?&cc=%s&subject=%s&body=%s', [
    recipients, cc, subject, body
  ]));
end; 
 

ABER wie bekomme ich einen Zeilenumbruch in den "body" ?
Sowohl LineEnding als auch sLinebreak oder #10#13 oder <br /> bewirken nichts.

[Timm Thaler]

Bei normalen URLs gehts mit '%0D%0A'. Leerzeichen machst Du mit '%20', Anführungszeichen (") mit '%22'.

[malabarista]

Klasse ! Danke !

[gladio]

Grundsätzlich gibt es für den Inhalt und die Zustellung von Rechnungen gewisse steuerrechtliche Grundanforderungen.
Rechnungen, die du dem Empfänger als Textdateien oder HTML-Dateien zuschickst, wird das Finanzamt eventuell grundsätzlich als manipuliert verwerfen.
Natürlich wissen wir, daß alles was im Computer ist auch manipuliert werden kann:
Ich würde dir den Versand als PDF-Anhang empfehlen. Das wird nicht moniert.

[malabarista]

Danke für den Hinweis.
Hier geht es aber nicht um Rechnungen, sondern um Bestellungen...

[malabarista]

Entschuldigung, - am Anfang vom Thread hatte ich etwas von Rechnungen geschrieben.
Das ist aber inzwischen anders gelöst, - jetzt geht es nur noch um Bestellungen.