абракадабра в теме письма при отправки через TIdSMTP

[fate]

собственно из сабжа понятна проблема.
Решение в нете не нашел, перепробовал все решения что находил, не помогло ((

Использую TIdSMTP и TIdMessage

[fate]

я разобрался, если кому интересно то это помогло:

procedure TForm1.IdMessage1InitializeISO(var VTransferHeader: TTransfer;
  var VHeaderEncoding: Char; var VCharSet: String);
begin
VTransferHeader:=bit7;
VHeaderEncoding:='B';
VCharSet:='windows-1251';
end;