Александр Клопоцкий

Да, работает, проблема решена.

Какое расположение иконки (Appearance.Icon.Location) используется? Для первого скриншота: Appearance.Icon.Location = Center Установил в крайней правой кнопке Appearance.Icon.Location = Top, иконка ушла вверх кнопки. И в дизайнере она стала маленькой.

В версии 1.18.4.0 иконки в TfgButton стали маленькие. В версии 1.18.3.0 иконки в TfgButton нормально отображались. Иконки из FGX Assets Manager, 24x24. Каким свойством растянуть?

Да, устанавливал сторонние библиотеки, удалил $(PATH). Вернул на место, все работает. Спасибо.

Здравствуйте. Delphi 12.1, FGX-Native 1.18.1.3. После месяца нормальной работы на Delphi 12.1 слетела регистрация пакетов. Устанавливал библиотеку при закрытой IDE, в реестре, в \Disabled Packages пакетов FGX-Native нет. В ручную поставить, удалить и поставить не получается.

Yes, now added TOKENJWT in defines. Yes, it compiles without errors, gets into the phone and works! Thank you!

Да, FGX define - не был добавлен в настройках проекта. После копиляции: сначала FGX.Logs не нашел, исправил на FGX.Log, потом ошибки: Build started 27.04.2023 20:52:26. __________________________________________________ Project "C:\Projects\Project1\Project1.dproj" (Make target(s)): Target _PasCoreCompile: c:\delphi\bin\dccaarm.exe -$O- --no-config -M -Q -TX.so -AGenerics.Collections=System.Generics.Collections;Generics.Defaults=System.Generics.Defaults -DFGX;DEBUG;;FRAMEWORK_xfm -E.\Android\Debug -Ic:\delphi\lib\Android\debug;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Debug";c:\delphi\lib\Android\Release;C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\Android;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a";C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\UniDAC\Demos\TechnologySpecific\SecureBridge;C:\Delphi\Add\JOSE\Source\Common;C:\Delphi\Add\JOSE\Source\JOSE;C:\Delphi\Add\FB4D\Source;C:\Delphi\Add\FB4D\GUIPatterns\FMX -LEC:\Users\Public\Documents\Embarcadero\Studio\22.0\Bpl\Android -LNC:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\Android -NU.\Android\Debug -NSSystem;Xml;Data;Datasnap;Web;Soap; -Oc:\delphi\lib\Android\Release;C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\Android;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a";C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\UniDAC\Demos\TechnologySpecific\SecureBridge;C:\Delphi\Add\JOSE\Source\Common;C:\Delphi\Add\JOSE\Source\JOSE;C:\Delphi\Add\FB4D\Source;C:\Delphi\Add\FB4D\GUIPatterns\FMX -Rc:\delphi\lib\Android\Release;C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\Android;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a";C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\UniDAC\Demos\TechnologySpecific\SecureBridge;C:\Delphi\Add\JOSE\Source\Common;C:\Delphi\Add\JOSE\Source\JOSE;C:\Delphi\Add\FB4D\Source;C:\Delphi\Add\FB4D\GUIPatterns\FMX -Uc:\delphi\lib\Android\debug;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Debug";c:\delphi\lib\Android\Release;C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\Android;"C:\Users\User\AppData\Local\FGX Native\Libs\280\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a";C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\UniDAC\Demos\TechnologySpecific\SecureBridge;C:\Delphi\Add\JOSE\Source\Common;C:\Delphi\Add\JOSE\Source\JOSE;C:\Delphi\Add\FB4D\Source;C:\Delphi\Add\FB4D\GUIPatterns\FMX --libpath:C:\Delphi\CatalogRepository\AndroidNDK-21-22.0.47991.2819\android-ndk-r21\platforms\android-23\arch-arm\usr\lib;C:\Delphi\CatalogRepository\AndroidNDK-21-22.0.47991.2819\android-ndk-r21\sources\cxx-stl\llvm-libc++\libs\armeabi-v7a --linker:C:\Delphi\CatalogRepository\AndroidNDK-21-22.0.47991.2819\android-ndk-r21\toolchains\arm-linux-androideabi-4.9\prebuilt\windows-x86_64\bin\arm-linux-androideabi-ld.exe -V -VN -NO.\Android\Debug Project1.dpr C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(678,15): error E2003: E2003 Undeclared identifier: 'SJPGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(680,15): error E2003: E2003 Undeclared identifier: 'SGIFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(682,15): error E2003: E2003 Undeclared identifier: 'SPNGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(684,15): error E2003: E2003 Undeclared identifier: 'STIFFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(717,14): error E2003: E2003 Undeclared identifier: 'TImageTypeChecker' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(717,32): error E2066: E2066 Missing operator or semicolon C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(718,16): error E2003: E2003 Undeclared identifier: 'SJPGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(718,35): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(720,21): error E2003: E2003 Undeclared identifier: 'SGIFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(720,40): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(722,21): error E2003: E2003 Undeclared identifier: 'SPNGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(722,40): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(724,21): error E2003: E2003 Undeclared identifier: 'STIFFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(724,41): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Projects\Project1\Project1.dpr(8,2): error F2063: F2063 Could not compile used unit 'FB4D.Helpers.pas' Done building target "_PasCoreCompile" in project "Project1.dproj" -- FAILED. Done building project "Project1.dproj" -- FAILED. Build FAILED. C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(718,35): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(720,40): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(722,40): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(724,41): warning W1058: W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(678,15): error E2003: E2003 Undeclared identifier: 'SJPGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(680,15): error E2003: E2003 Undeclared identifier: 'SGIFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(682,15): error E2003: E2003 Undeclared identifier: 'SPNGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(684,15): error E2003: E2003 Undeclared identifier: 'STIFFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(717,14): error E2003: E2003 Undeclared identifier: 'TImageTypeChecker' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(717,32): error E2066: E2066 Missing operator or semicolon C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(718,16): error E2003: E2003 Undeclared identifier: 'SJPGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(720,21): error E2003: E2003 Undeclared identifier: 'SGIFImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(722,21): error E2003: E2003 Undeclared identifier: 'SPNGImageExtension' C:\Delphi\Add\FB4D\Source\FB4D.Helpers.pas(724,21): error E2003: E2003 Undeclared identifier: 'STIFFImageExtension' C:\Projects\Project1\Project1.dpr(8,2): error F2063: F2063 Could not compile used unit 'FB4D.Helpers.pas' 4 Warning(s) 11 Error(s) Time Elapsed 00:00:00.29 Добавил все "FB4D Source" и "JOSE Source" в проект, все равно те же ошибки.

Все sources билиотеки JOSE добавлял в проект, не помогает, не компилируется.

Чистое приложение, добавлен только FB4D.Helpers.pas из Pull Request: 27.04.2023 8:05:20.779,"E","libc",27668,27714,"Access denied finding property ""persist.vendor.sf.fbc""" 27.04.2023 8:05:20.779,"E","libc",27668,27714,"Access denied finding property ""persist.vendor.gpu.fbc""" 27.04.2023 8:05:20.779,"E","libc",27668,27714,"Access denied finding property ""persist.vendor.vsp.fbc"" First chance exception at $BC357666. Exception class Segmentation fault (11). Process Project1.apk (27986)

After adding the "FB4D.OAuth.pas" module to the project, compilation errors appear: FB4D.OAuth.pas(35,40): error E2003: E2003 Undeclared identifier: 'ITokenJWT' FB4D.OAuth.pas(93,13): error E2003: E2003 Undeclared identifier: 'ETokenJWT' FB4D.OAuth.pas(93,29): error E2382: E2382 Cannot call constructors using instance variables C:\Faberlic\Faberlic.dpr(22,2): error F2063: F2063 Could not compile used unit 'FB4D.OAuth.pas' How to define interfaces correctly?

Спасибо Dmitry Sh., изменил FB4D.Helpers.pas, компилируется!

Thank you Alan, for your answer. 1. Created a new project, added components: TfgPushNotificationService, TfgFirebaseAnalytics, configured, launched the application, Token from Firebase is accepted, Push arrives, Analytics are transmitted to the console, Firebase is working! 2. I am adding a module "FB4D.Helpers.pas" to this project, warning: "FB4D.Helpers.pas" uses unit ".Types" from the "FMX" framework which is not compatible with the project. 3. I changed the file "FB4D.Helpers.pas" as you wrote. And the compilation began to pass without errors! Thank you!

First chance exception at $BE4E8F19. Exception class EJNIException with message 'java.lang.NoClassDefFoundError: Failed resolution of: Lcom/google/firebase/messaging/RemoteMessage;'. Process Faberlic.apk (23071) Events.txt

Логи от запуска приложения до зависания на заставке: "22.04.2023 8:13:06.576","I","ActivityThread",11028,11028,"smart_link is not supported!!!" "22.04.2023 8:13:06.579","W","libEGL",11028,11093,"EGLNativeWindowType 0xecc91528 disconnect failed" "22.04.2023 8:13:06.605","I","gralloc4",11028,11093,"register: id=22000002760" "22.04.2023 8:13:06.653","I","gralloc4",11028,11093,"unregister: id=22000002760" "22.04.2023 8:13:06.654","W","libEGL",11028,11093,"EGLNativeWindowType 0xecc8b068 disconnect failed" "22.04.2023 8:13:06.660","I","gralloc4",11028,11093,"register: id=22000002763"

Да, ошибки сборки пропали, загружается FMX под Andriod 32-bit.

Добрый день. Вопрос по работе с библиотекой: FB4D, на 20.04.2023 г. https://github.com/SchneiderInfosystems/FB4D Delphi 11.3, Java JDK (Java 19), FGX-Native 1.15.4.0 1. Создал новый проект, добавил компонеты: TfgPushNotificationService, TfgFirebaseAnalytics, настроил, запустил приложение, Token от Firebase принимается, Push приходит, Аналитика в консоль передается, Firebase работает! 2. Добавляю в проект один (любой) модуль, например FB4D.Interfaces.pas, никакого кода еще не пишу, приложение собирается без ошибок, показывается заставка, и на ней приложение зависает. 3. Беру пример из билиотеки FB4D: "FSSimpleChat.dproj", компилирую под Windows, работает (новый пользователь в Authentication создается, существующий пользователь логинится, если пароль забыл, на E-mail приходит письмо сменить пароль, в Firestore Database пишутся сообщения): 4. Тот же пример из билиотеки FB4D: "FSSimpleChat.dproj", компилирую FMX под Andriod 32-bit, ошибки при сборке. Возможно FB4D не обновляется, Java JDK (Java 19) не воспринимается? Можно ли как-то работать с FB4D в версии FGX-Native 1.15.4.0 и последующих? Пол года назад, осенью, еще на Delphi 10.4.2 с FGX-Native более ранней версии, этот пример FMX собирался и работал под Andriod 32-bit.

Хочется попробовать новый визуальный компонент TfgBottomNavigationBar, который отображает новые события над каждой кнопкой.

Добрый вечер, По вашему примеру, как прописать класс фрейма в dfm файле формы? Form.Main.pas unit Form.Main; interface {$SCOPEDENUMS ON} uses System.Types, System.Classes, FGX.Forms, FGX.Forms.Types, FGX.Controls, FGX.Controls.Types, FGX.Layout, FGX.Layout.Types; type TFormMain = class(TfgForm) private { Private declarations } public { Public declarations } end; var FormMain: TFormMain; implementation {$R *.xfm} uses System.SysUtils, FGX.Application, FGX.Dialogs, FGX.Log, Unit1; end. Form.Main.xfm object FormMain: TFormMain Size.Width = 360.000000000000000000 Size.Height = 590.000000000000000000 SavedSizeWidth = 360s SavedSizeHeight = 590s object Frame1: TFrame1 Size.Width = 360.000000000000000000 Size.Height = 640.000000000000000000 SavedSizeWidth = 360s SavedSizeHeight = 640s object fgButton1: TfgButton Text = 'fgButton1' Position.X = 56.000000000000000000 Position.Y = 80.000000000000000000 RelativePosition.Left = 56.000000000000000000 RelativePosition.Top = 80.000000000000000000 Size.Width = 120.000000000000000000 Size.Height = 36.000000000000000000 SavedSizeWidth = 120s SavedSizeHeight = 36s end object fgSwitch1: TfgSwitch Position.X = 224.000000000000000000 Position.Y = 88.000000000000000000 RelativePosition.Left = 224.000000000000000000 RelativePosition.Top = 88.000000000000000000 Size.Width = 44.000000000000000000 Size.Height = 26.000000000000000000 SavedSizeWidth = 44s SavedSizeHeight = 26s ColorDefaultName = 'Theme\Text\Text' end end end Unit1.pas unit Unit1; interface {$SCOPEDENUMS ON} uses System.Types, System.Classes, FGX.Forms, FGX.Forms.Types, FGX.Controls, FGX.Controls.Types, FGX.Layout, FGX.Layout.Types, FGX.Button.Types, FGX.StaticLabel, FGX.Switch, FGX.Button; type TFrame1 = class(TfgForm) fgButton1: TfgButton; fgSwitch1: TfgSwitch; private { Private declarations } public { Public declarations } end; var Frame1: TFrame1; implementation {$R *.xfm} uses System.SysUtils, FGX.Application, FGX.Dialogs, FGX.Log; end. Unit1.xfm object Frame1: TFrame1 Size.Width = 360.000000000000000000 Size.Height = 640.000000000000000000 SavedSizeWidth = 360s SavedSizeHeight = 640s object fgButton1: TfgButton Text = 'fgButton1' Position.X = 56.000000000000000000 Position.Y = 80.000000000000000000 RelativePosition.Left = 56.000000000000000000 RelativePosition.Top = 80.000000000000000000 Size.Width = 120.000000000000000000 Size.Height = 36.000000000000000000 SavedSizeWidth = 120s SavedSizeHeight = 36s end object fgSwitch1: TfgSwitch Position.X = 224.000000000000000000 Position.Y = 88.000000000000000000 RelativePosition.Left = 224.000000000000000000 RelativePosition.Top = 88.000000000000000000 Size.Width = 44.000000000000000000 Size.Height = 26.000000000000000000 SavedSizeWidth = 44s SavedSizeHeight = 26s ColorDefaultName = 'Theme\Text\Text' end end

Delphi 10.4.2 Community Edition android-studio-2021.3.1.17-windows.exe ( https://developer.android.com/studio ) android-ndk-r25b-windows.zip ( https://developer.android.com/ndk/downloads ) jdk-19_windows-x64_bin.exe ( https://www.oracle.com/java/technologies/downloads ) Скачиваем Android SDK 33 через Android Studio: Android SDK 33 скачался в папку C:\Development\Sdk: Копируем файлы dx.bat и dx.jar из SDK 30 в папку с SDK 33: Создаем новый профиль Android SDK в Delphi: Чего-то не хватает, не проходит дальше создание нового профиля Android SDK. Если указать стандартный Android SDK Base path, то профиль создается: Что еще нужно добавить?

Delphi 10.4.2 + Delphi 11

Очень нужен код этого примера мобильного приложения из вебинара!

База данных MySQL на обычном хостинге сайта: https://hoster.by/

Название приложения: ГАЗ-ИНСТИТУТ Платформа: Android 32 bit, Android 64 bit Поддерживаемые версии ОС: Android 5.0 и новее Необходимое свободное место: до 10 Мб Описание: Приложение "ГАЗ-ИНСТИТУТ" предназначено для подачи заявок на обучение. Ссылка на приложение: https://play.google.com/store/apps/details?id=gazinstitut.by Заявки на обучение.mp4

Постоянно коннект не держу. Только в момент нажатия кнопки устанавливаю коннект, вставляю запись в таблицу, с сразу отключаюсь. Чтение чата делаю раз в минуту и отключаюсь. http - будет прослойка, нужно будет все поля таблиц через нее прописывать, неудобно. Хочется работать напрямую с SQL, пока ошибок с обрывом соединения в приложении не было. SecureBridge держит SSH подключение в момент коннекта, хостеры не дают подключаться напрямую к базе на хостинге без SSH сертификата. procedure TdmMain.Hoster_FL_REG_Insert; var UniStoredProc: TUniStoredProc; begin if ((PPL_SURNAME <> '') or (PPL_FIRSTNAME <> '') or (PPL_PHONE <> '')) then begin Hoster_Connect; // Подключение к хостингу UniStoredProc := TUniStoredProc.Create(nil); try UniStoredProc.Connection := UniConnection; UniStoredProc.StoredProcName := 'st_reg_insert'; UniStoredProc.PrepareSQL; UniStoredProc.ParamByName('P_APP_ID').ParamType := ptInput; UniStoredProc.ParamByName('P_APP_ID').DataType := ftInteger; UniStoredProc.ParamByName('P_APP_ID').AsInteger := StrToInt(APP_ID); UniStoredProc.ParamByName('P_PPL_SURNAME').ParamType := ptInput; UniStoredProc.ParamByName('P_PPL_SURNAME').DataType := ftString; UniStoredProc.ParamByName('P_PPL_SURNAME').AsString := PPL_SURNAME; UniStoredProc.ParamByName('P_PPL_FIRSTNAME').ParamType := ptInput; UniStoredProc.ParamByName('P_PPL_FIRSTNAME').DataType := ftString; UniStoredProc.ParamByName('P_PPL_FIRSTNAME').AsString := PPL_FIRSTNAME; UniStoredProc.ParamByName('P_PPL_PHONE').ParamType := ptInput; UniStoredProc.ParamByName('P_PPL_PHONE').DataType := ftString; UniStoredProc.ParamByName('P_PPL_PHONE').AsString := PPL_PHONE; UniStoredProc.Execute; finally UniStoredProc.Free; end; Hoster_Disconnect; // Отключение от хостинга end; end; procedure TdmMain.Hoster_Connect; begin ScFileStorage.Path := TPath.GetDocumentsPath; // Папка на Android ScSSHClient.Connected := True; ScSSHChannel.Connected := True; if ScSSHChannel.Connected then UniConnection.Connected := True else TfgDialogs.ShowMessage('SSH - Not Connected!'); end; procedure TdmMain.Hoster_Disconnect; begin ScSSHChannel.Connected := False; ScSSHClient.Connected := False; end;