А зачем тебе Де Бат? Отправляй сразу из дельфи компонент NSMTP
if NSMTP1.Connected=FALSE then
begin
NSMTP1.Host := 'email'; {адрес SMTP сервера (или IP-Адресс)}
NSMTP1.Port := 25; {Порт SMTP сервера (по стандарту RFC 821 равен 25)}
NSMTP1.Connect;
end; {Подключение к SMTP серверу}
With NSMTP1 do
begin
Charset := 'windows-1251'; {Кодировка письма}
PostMessage.FromAddress:={Отправитель письма}
PostMessage.ToAddress.Text:={Получатель письма}
PostMessage.Body.Text:=''; {Текст письма}
PostMessage.Subject:=
PostMessage.Attachments.Text:=Form1.ListBox1.Items.Text;
SendMail;
NSMTP1.Disconnect; {Отправляем письмо}
end;