Einzelnen Beitrag anzeigen

Benutzerbild von Duffy
Duffy

Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
 
Delphi 3 Standard
 
#2

Re: Fehler bei Indy Komponente

  Alt 27. Sep 2004, 12:14
Hallo HW764,
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
try
idSMTP.Host := 'mail.bluewin.ch';
idSMTP.Username := '';
idSMTP.Password := '';
idMessage.Subject := 'Lob + Kritik';
memo1.lines.add (edit1.text);
idMessage.Body.add ('memo1.lines'); // idMessage.Body.assign(memo1.lines); <<<======
idMessage.From.Address:= 'Anonym@gmx.com';
idMessage.Recipients.EMailAddresses:= combobox1.text;
idSMTP.Connect;
idSMTP.Send(idMessage);
idSMTP.Disconnect;
except
showmessage ('Senden Fehlgeschlagen! Überprüfen Sie bitte die Internetverbindung!');
end;
end;
bye
Claus
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
  Mit Zitat antworten Zitat