Поиск

Здравствуйте!.Delphi 10.2. Android 6 (Xiaomi Redmi note 4) программирую раз в год, уровень языка минимальный, наверно. код: procedure TForm1.FormCreate(Sender: TObject); begin {$IFDEF MSWINDOWS} pflog:='log.bas'; pfmem:='mem.mem'; pfprod:='prod.txt'; pfpost:='post.txt'; {$ELSE} {$IFDEF IOS} //код для мобильной платформы iOS {$ELSE} {$IFDEF ANDROID} pflog:=Tpath.GetDocumentsPath+pathdelim+'log.bas'; pfmem:=Tpath.GetDocumentsPath+pathdelim+'mem.mem'; pfprod:=Tpath.GetDocumentsPath+pathdelim+'prod.txt'; pfpost:=Tpath.GetDocumentsPath+pathdelim+'post.txt'; {$ENDIF} {$ENDIF} {$ENDIF} memo1.Text:=''; if not(fileexists(pfmem)) then memo1.Lines.SaveToFile(pfmem); memo1.Lines.LoadFromFile(pfmem); if memo1.Lines.Count=0 then memo1.Lines.Add('01.01.0001'); label1.Text:=memo1.Lines[0]; IdIMAP41.Connect(); - тут программа вылетает //ComboBox1.Items.LoadFromFile(pfprod); //ComboBox2.Items.LoadFromFile(pfpost); //loadlist; end; Задача проста: найти письмо и скачать вложение, для дальнейшей обработки. При запуске на Windows 8 все работает нормально, после установки apk и запуска на телефоне программа вылетает при IdIMAP41.Connect() Менял на pop3 тоже самое Подскажите пожалуйста в чем может быть проблема? Может есть другие варианты для загрузки почты? Заранее спасибо!