Перейти к содержанию
Fire Monkey от А до Я

Поиск сообщества

Показаны результаты для тегов 'connect'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип контента


Форумы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
    • Android
    • iOS
    • OSX
    • Windows
    • Windows Phone
    • Linux
  • Вопросы по использованию RAD Studio
    • Лицензирование
    • Сборка проектов
    • Multi-Device Designer
    • Редактор кода
    • Вопросы
  • Обучение
    • Основная информация
    • Вопросы
    • Отзывы
  • Поиск специалистов по FireMonkey
    • Консультации
    • Ищу подрядчика
  • Дополнительные ресурсы по FireMonkey
    • Сторонние компоненты
    • Приложения, написанные с использованием FireMonkey
    • Примеры
    • Руководства
    • Шаблоны
    • Статьи и заметки
    • Информация о версиях RAD Studio
    • Новости
  • Организация работы данного форума

Поиск результатов в...

Поиск контента, содержащего...


Дата создания

  • Начало

    Конец


Дата обновления

  • Начало

    Конец


Фильтр по количеству...

Регистрация

  • Начало

    Конец


Группа


AIM


MSN


Сайт


ICQ


Yahoo


Jabber


Skype


StackOverflow


Защита от ботов


Город


Интересы

Найдено: 2 результата

  1. Здравствуйте!.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 тоже самое Подскажите пожалуйста в чем может быть проблема? Может есть другие варианты для загрузки почты? Заранее спасибо!
  2. Доброе время суток. Борюсь с Indy 10 на FMX. Обмен данными между сервером и клиентом наладил. Все работает стабильно. Стал экспериментировать с разрывом связи. И тут программы ведут себя не очень понятно, особенно на клиенте. Если сервер не запушен. Клиент на команде IdTCPClient.Connect; закрывается. ???? Делаю обработки так procedure TfrmMainClient.TimerTimer(Sender: TObject); var Server : string; begin if not IdTCPClient.Connected then try IdTCPClient.Connect; except on E : Exception do lblInfo.Text := e.Message; end; Server := 'Сервер ' + IdTCPClient.Socket.Binding.PeerIP + ':' + IntToStr(IdTCPClient.Socket.Binding.PeerPort); if IdTCPClient.Connected then begin lblInfo.Text := Server + ' подключен!'; lblInfo.TextSettings.FontColor := TAlphaColors.Green; end else begin lblInfo.Text := Server + ' не доступен!'; lblInfo.TextSettings.FontColor := TAlphaColors.Red; end; end; Никаких сообщений не появляется. Программа подвисает вместе с Адроидом, потом тупо окно закрывается. Молча. Таймауты на клиенте выставил ConnectTimeOut = 5000; ReadTimeOut = 5000; В общем вопрос. Как правильно организовать на Indy управление соединением? Чтобы не тормозило, Была возможность переподключиться. PS. Почему-то в Delphi 10.2 не могу найти компонент AntiFreeze. ????
×
×
  • Создать...