[Помогите!] Imap Indy авторизация

[\PaLaDin/]

Помогите! Не могу авторизоваться на gmail.com.
Пролистал все форумы.

[VeTaL_UA]

var
  IMAP: TIdIMAP4;
  TLS: TIdSSLIOHandlerSocketOpenSSL;
begin
  IMAP := TIdIMAP4.Create(nil);
  IMAP.Host := {host};
  IMAP.Username := {mail};
  IMAP.Password := {pass};
  IMAP.Port := 143;
  TLS := TIdSSLIOHandlerSocketOpenSSL.Create(IMAP);
  TLS.SSLOptions.Method := sslvTLSv1;
  IMAP.IOHandler := TLS;
  IMAP.UseTLS := utUseImplicitTLS;
  IMAP.Connect;
  
  // do smth
  
  IMAP.Free;
end;

[\PaLaDin/]

Цитата: Сообщение от VeTaL_UA var IMAP: TIdIMAP4; TLS: TIdSSLIOHandlerSocketOpenSSL; begin IMAP := TIdIMAP4.Create(nil); IMAP.Host := {host}; IMAP.Username := {mail}; IMAP.Password := {pass}; IMAP.Port := 143; TLS := TIdSSLIOHandlerSocketOpenSSL.Create(IMAP); TLS.SSLOptions.Method := sslvTLSv1; IMAP.IOHandler := TLS; IMAP.UseTLS := utUseImplicitTLS; IMAP.Connect; // do smth IMAP.Free; end;

Ошибка, порт по-мойму 993, но все равно не работает.
Я по-разному пробовал

[VeTaL_UA]

Цитата: Ошибка, порт по-мойму 993, но все равно не работает. Я по-разному пробовал

Не смеши, я этот код использую, он универсальный, подходит ко всем нормальным почтовикам.

[\PaLaDin/]

Скопировал ваш код, но нет. Проверьте.

[VeTaL_UA]

Он заложен в коммерческом ПО, которое продаётся больше года.

[\PaLaDin/]

Хм. Скрины?

Добавлено через 15 минут
Все ок, обновил библиотеку SSL.
VeTaL_UA пиши в лс, вознаграждение ждет тебя...

[VeTaL_UA]

Цитата: VeTaL_UA пиши в лс, вознаграждение ждет тебя...

мне хватает