Короче, обошел я этот косяк
.
Нужно выкинуть все почтовые элементы с формы и создавать их каждый раз при отправке письма.
Получается что то вроде этого:
Код:
var
IdSMTP1: TIdSMTP;
IdSSLIOHandlerSocketOpenSSL1 : TIdSSLIOHandlerSocketOpenSSL;
MailMessage: TIdMessage;
begin
IdSMTP1 := TIdSMTP.Create;
IdSSLIOHandlerSocketOpenSSL1:=TIdSSLIOHandlerSocketOpenSSL.Create;
MailMessage:=TIdMessage.Create;
//Отправляем письмо, все как обычно.
//А в конце беспощадно их ликвидируем:
if IdSMTP1.Connected then IdSMTP1.Disconnect;
IdSMTP1.Free;
IdSSLIOHandlerSocketOpenSSL1.Free;
MailMessage.Free;
end;
Надеюсь, кому то пригодится, потому что в интернете, на форумах по этой теме мало, что есть.
Обычно или важничают или ссылки кидают, мол почитай там то