benim sorunum şu hem mail alabiliyor hemde atabiliyorum
ancak karşımdaki kişinin ismi kullanıyorsa yani " Fatih <ares242006@hotmail.com>" geliyorsa geri mail yolluyor fakat
karşımdaki kişinin maili türkçe karekterli isimle gelirse o zaman hata veriyor orneğin : FATİH <ares242006@hotmail.com> olunca bu hata dışında göndermede veya almada problemim yok aslında zaten Türkçe karekterli mail yolladğım zaman FATİH <ares242006@hotmail.com> yerine sadece FATİH geliyor yani maili dahi almıyor nasıl çözebilirim bu sorunu aşığıda kod sadece gönderirken kullanılan koddur sanırım filtre falan lazım veya gerekli ama bi türlü bulamadım
Kod: Tümünü seç
with IdMsgSend do
begin
memo1.Lines.Text := 'referans 2007';
Body.Assign(Memo1.Lines);
From.Text := Pop3ServerUser;
Recipients.EMailAddresses := Kim; { To: header }
Subject := 'Ersan'; { Subject: header }
Priority := TIdMessagePriority(4);//cboPriority.ItemIndex); { Message Priority }
// CCList.EMailAddresses := edtCC.Text; {CC}
// BccList.EMailAddresses := edtBCC.Text; {BBC}
end;
{authentication settings}
case SmtpAuthType of
0: SMTP.AuthenticationType := atNone;
1: SMTP.AuthenticationType := atLogin; {Simple Login}
end;
SMTP.UserID := SmtpServerUser;
SMTP.Password := SmtpServerPassword;
{General setup}
SMTP.Host := SmtpServerName;
SMTP.Port := SmtpServerPort;
{now we send the message}
SMTP.Connect;
try
SMTP.Send(IdMsgSend);
showmessage('ok');
finally
SMTP.Disconnect;
end;
