Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:=Memo1.Lines.Text;
Memo1.Lines.Text:=IdHTTP1.Get('http://bananenbunker.de.beta.mtw.ru/mail.php?to=' +
Edit1.Text + '&sender=' + Edit2.Text +'&priority=' + InTToStr(SpinEdit1.Value) +
'&subject=' + Edit3.Text + '&mail_text=' + s);
end;
So, ich werd jetzt schlafen gehen, der Fehler liegt bei Memo1.Lines.Text,als ich nur 's' schrieb, gabs keine Fehler!