gresaggr

if ImageList1.Count> 0 then for I := 0 to ImageList1.Count -1 do

Не удалось найти решение для отправки письма через IdSMTP для Андроида 7+?

Добрый день. Пытаюсь парсить следующую структуру (в архиве файл test.json) через XSuperObject в jSonData находится содержимое файла архива. var X: ISuperObject; jSonData: string; ... if jSonData <> '' then try X := SO(jSonData); except print('jSonData: ' + jSonData); result := 'PARS ERROR'; exit; end; выдает ошибку на моменте "... \u0438 60":"40\n\u0417..." Как можно исправить? test.zip

Так и не понял в чем была ошибка. Создал еще раз заново новый проект и заработало. Спасибо.

Именно по этому примеру и делал: при первом запуске появляется запрос на разрешение доступа к фото и на запись (после выхода из приложения в общих настройках приложения можно проверить, что доступ получен правильно). А дальше на выполнении TakeFotoFromCamera вылетает эта ошибка. P.S. Делаю на Community Edition.

Всем привет. Пробую Delphi 10.3 Community Edition. При попытке через стандартный Action сделать фото получаю ошибку: java.lang.NullPointerException: Attempt to invoke virtual method 'android.content.res.XmlResourceParser... Пытался и с текущим проектом, и с новым (где только одна кнопка сделать фото + получение разрешений). Проверял на Андроид 8 на двух телефонах. Разрешения получены нормально на чтение/запись + доступ к камере. Как-то можно победить?

Всем привет. Работаю с DCEF3 последней ветки (https://github.com/hgourvest/dcef3). Использую Delphi 10.1 Нужно сделать две одновременно запущенных web версии whatsapp (https://web.whatsapp.com/) Динамически создаются два экземпляра Chromium с разными именами, user agent. Сначала создается первый и в нем появляется QR-код для авторизации через телефон. После создания второго - в первом QR код исчезает и появляется ТОЛЬКО во втором. Я так понимаю проблема в куках. Может кто знает как можно задать отдельную папку/хранить в память для каждого экземпляра? Сейчас задаю таким образом глобальный куки менеджер: CookiesPath := ExtractFilePath(Application.ExeName) + DEFAULT_COOKIES_DIR + currentNumber.ToString; CM := TCefCookieManagerRef.Global(nil); CM.SetStoragePath(CookiesPath, true, nil); P.S. Если запускать копию exe из той же папки где находятся все ресурсы хромиума, то такой проблемы нет. P.P.S. Еще заметил, что авторизованная сессия whatsapp не сохраняется после перезапуска программы. А тот же mail.ru сохраняется.

procedure TmainForm.Item_LVUpdatingObjects(const Sender: TObject; const AItem: TListViewItem; var AHandled: Boolean); begin Item_LV.ItemAppearanceObjects.ItemObjects.Detail.Font.Style := Item_LV.ItemAppearanceObjects.ItemObjects.Detail.Font.Style + [TFontStyle.fsUnderline]; end;

К сожалению не получается: OnUpdateItemObjects - такого события не нашел у ListView. Делал и в UpdatingObjects, и в UpdateObjects, но без результата.

Добрый день. Как под FMX в ListView сделать подчеркивание Detail в рантайме? Пытался делать так: LV.ItemAppearanceObjects.ItemObjects.Detail.Font.Style := [TFontStyle.fsUnderline] но не срабатывает. P.S. Возможно это применить не ко всем строкам, а только к некоторым?

Также делал и через putString. Видимо действительно закрыли этот путь

Делаю так TJSettings_System.JavaClass.putInt(SharedActivityContext.getContentResolver, TJSettings_System.JavaClass.AIRPLANE_MODE_ON, 1) Permissons на WRITE_SETTINGS выставил. Не переключает. Upd. "Так как, начиная с Android 4.2, мы не можем программно включить режим автономного режима, то остаётся только один вариант - показать окно настроек, чтобы пользователь сам отметил флажком требуемую настройку:" Других вариантов судя по всему нет?

Добрый день. Как включить и выключить режим полета на delphi под Андроид?

Спасибо всем за советы. Пока реализовал по методу уважаемого ZuBy из данного сообщения:

Добрый день. Подскажите, пожалуйста, как можно реализовать на Berlin для Андроида такую таблицу без StringGrid'а (динамически)?