-
Постов
14 -
Зарегистрирован
-
Посещение
Весь контент AES
-
во.. заработало. Помогло уделение <EnabledSysJars>.....</EnabledSysJars> из xxxxxxxx.dproj
-
Доброго дня, обновился, что то отказывается теперь проект компилиться. Новые проекты нормально компилируются, есть предложения? Папку Android64 удалять уже пробовал.
-
Требуется помощь в написании функции автообновления приложения
AES опубликовал тема в Ищу подрядчика
Проблема описана тут. Требуется подправить мой код, либо полностью переработать алгоритм... Цена договорная, писать в ЛС или на имейл remus-xe2@ya.ru. -
Подскажите, у меня программа проверяет наличие новой версии и выводит уведомление... Хочу что бы программа сама закачивала APK и запускала его на установку... Скачать по идее не проблема, а вот как показать окно юзеру, мастера установки этого АПК ? Можно какой нибудь образец на Delphi ? Пока вот что имею: procedure TUpdateAppThread.Execute; CONST url_download_nsis_script = 'https://.com/android/.apk'; var http: TNetHTTPClient; q: tmemorystream; begin q := tmemorystream.Create; http := TNetHTTPClient.Create(nil); try try http.Get(PChar(url_download_nsis_script), q); q.Position := 0; q.SaveToFile(TPath.Combine(TPath.GetDocumentsPath, 'hs.update.apk')); if FileExists(TPath.Combine(TPath.GetDocumentsPath, 'hs.update.apk')) then Synchronize(StartUpdateApp); except Synchronize(ErrorUpdateApp); end; finally q.Free; http.Free; end; end; скачал APK, ошибок нет вроде, все ок... Запихиваю апк в jnet_uri Procedure StartUpdateApp; var ApkFile: JFile; ApkUri: Jnet_Uri; path, filename: string; begin try filename := TPath.Combine(TPath.GetDocumentsPath, 'hs.update.apk'); ApkFile := TJfile.JavaClass.init(StringToJString(filename)); ApkUri := TAndroidHelper.JFileToJURI(ApkFile); StartActivity(ApkUri); except on E: Exception do ShowMessage(E.ClassName + 'StartUpdateApp поднята ошибка, с сообщением : ' + E.Message); end; UpdateForm.Label1.Text := 'Download ok.'; end; Запускаю активность... procedure StartActivity(ApkUri: Jnet_Uri); var Intent: JIntent; begin try Intent := TJIntent.Create(); Intent.setAction(TJIntent.JavaClass.ACTION_VIEW); Intent.addFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK or TJIntent.JavaClass.FLAG_ACTIVITY_CLEAR_TOP or TJIntent.JavaClass.FLAG_GRANT_WRITE_URI_PERMISSION or TJIntent.JavaClass.FLAG_GRANT_READ_URI_PERMISSION); Intent.setDataAndType(ApkUri, StringToJString('application/vnd.android.package-archive')); TAndroidHelper.Activity.StartActivity(Intent); except on E: Exception do ShowMessage(E.ClassName + 'StartActivity поднята ошибка, с сообщением : ' + E.Message); end; end; сейчас у меня ошибка в процедуре StartUpdateApp Java type Jcontent_fileprovider could not be found. Разрешений пока не каких не запрашивал.... Сохраняю в TPath.Combine(TPath.GetDocumentsPath, 'hs.update.apk') сюда я так понимаю разрешения не нужны...
-
в общем немного некорректно описание на сайтах про это ограничение... Если я правильно понял это ограничение для ОДНОВРЕМЕННО открытых файловых дескрипторов... И да, я забыл переменную освободить... Набежало 1024 файла открытых все стало. А при увеличении лимита память заканчивалась примерно на тех же 1024 файлах ) Тема закрыта.
-
Пишу что то типа файлового менеджера. Передаю файлы с linux на windows станцию. Как только лимит открытых файлов на мой процесс достигает 1024 все перестает работать... Пробовал расширять лимит редактируя /etc/security/limits.conf, безрезультатно. Теже 1024 файла, причем при проверке текущего лимита показывает лимит в 65353 который указан в limits.conf. Как победить? Варианты есть ?
-
Народ, как правильно узнать кто владелец файла и права доступа к нему (то что выдает ls - l <filename>). Пока только на ум приходит парсить вывод команды ls, но это не красивое решение.
-
как это осуществить? POPEN видел, не то немного... Так как родитель может быть закрыт раньше потомка что его подвешивает до закрытия потомка...
-
Всем привет, изучаю сервисы, есть пара вопросов... правильно я понимаю? При: function TDM.AndroidServiceStartCommand(const Sender: TObject; const Intent: JIntent; Flags, StartId: Integer): Integer; begin Result:= TJService.JavaClass.START_STICKY; //Перезапускать при отключении end; сервис не должен отрубаться при завершении работы основной программы ? Я в цикле вывод сообщения в сервис засунул, все работает даже при свернутой программе, но стоит ее закрыть и все... Уведомления перестают приходит, сервис помер.. Как заставит работать сервис даже при закрытой программе запустившей его?
-
Парни, можно как то апперансы в ListView выравнять ? На все доступное пространство на пример....
-
Парни дайте мануал какой нибудь, почитать \ посмотреть. Не могу догнать как с аперансами работать... 1 вопрос ) Примерно, понял как работать с записями в красной зоне а как обратится к значениям в шапке и подвале ? Или они не относятся к определенной строке в Listview и их может быть только по 1 шт.? 2 вопрос) выровнять текст можно как то по левому краю в ячейках (и сами ячейки)?