Einzelnen Beitrag anzeigen

BullsEye

Registriert seit: 8. Sep 2007
Ort: Werlte
872 Beiträge
 
Delphi 7 Personal
 
#5

Re: E-Mail von Delphiprog senden

  Alt 21. Dez 2007, 16:26
Zitat von dominikkv:
genauso...nur das du dir eben deinen text selbst zusammenbasteln musst.
Delphi-Quellcode:
var
  Adresse: String;
  Subject: String;
  MyText: String;

{...}

Adresse := 'm-van-der-g@gmx.de';
Subject := 'Bugreport';
MyText := Memo1.Text + #13#10#13#10 + Edit1.Text;

ShellExecute(Application.Handle, 'open',
PChar('mailto:' + Adresse + '?subject=' + Subject + '&body=' + MyText), nil, nil, sw_ShowNormal);
edit:
Zitat von OG Karotte:
Einfach mal so in's blaue geschossen:

PChar('mailto:m-van-der-g@gmx.de?subject=Bugreport&body=' & memo1.text & edit1.text), nil, nil, sw_ShowNormal); Nicht getestet
was machen da die &?

So gehts. Allderings übernimmt der die Absätze nicht. Sondern packt alles dierecthintereinander.
  Mit Zitat antworten Zitat