Frage zu ShellExecute

Henry · Beiträge: 619 WinXP Prof. SP3 D6 Prof.

Hallo,

ich habe da ein Problem, wenn ich mit hilfe von Shellexecute eine vordefinierte Mail erstellen möchte.
Das Problem liegt darin, das ich es nicht schaffe eine Zweite Zeile zu erzwingen.

Habe folgende beiden Möglichkeiten probiert:

Möglichkeit 1:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

ShellExecute(0, nil,
    PChar(
     'mailto:mailadresse@gmx.de?subject=betreff test'+
     '&Body=erste Zeile'+ #13 + 'zweite Zeile')
     ,nil, nil, SW_NORMAL);

Möglichkeit 2:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:

procedure TForm10.Label2Click(Sender: TObject);
VAR Mailtext : TStringlist;
begin
 Mailtext := TStringlist.Create;

//Mailtext erstellen
 Mailtext.Add('erste zeile');
 Mailtext.Add('zweite zeile');

 ShellExecute(0, nil,
    PChar(
     'mailto:Mailadresse@gmx.de?subject=betreff test'+
     '&Body=' + Mailtext.Text)
     ,nil, nil, SW_NORMAL);

 Mailtext.Free; //Freigeben der Stringlist
end;

Es wird aber bei beiden Versionen immer alles in eine Zeile geschrieben.

Wo mache ich denn einen Denkfehler?

Danke schon eimal im voraus

_________________
mfg Henry

Ehemaliges Mitglied Erhaltene Danke: 1

Normalerweise ist ein Zeilenumbruch mit Wagenrücklauf (also zum Zeilenbeginn) nicht nur

markieren

Delphi-Quelltext

1:

#13

sondern

markieren

Delphi-Quelltext

1:

#13#10

In dem Fall musst du aber gültigen HTML-Code benutzen, quasi so, wie du es auch in einer Webseite machen würdest. Und das sieht dann eben so aus:

markieren

Delphi-Quelltext

1:
2:
3:
4:

ShellExecute(0, nil,
  pchar('mailto:mailadresse@gmx.de?subject=betreff test' +
  '&body=erste Zeile%0D%0Azweite Zeile'), // <--
  nil, nil, SW_NORMAL);

%0D%0A ist hierbei der Zeilenumbruch, und da ich davon ausgehe, dass dir Hex-Zahlen bekannt sind, müsste dir was auffallen. :wink:

Henry · Beiträge: 619 WinXP Prof. SP3 D6 Prof.

Danke Dir,

ich werde es sofort mal probieren.

PS: komisch, das die Schreibweise von Zahlen so einen großen Unterschied macht

_________________
mfg Henry

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme