Jump to content

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

Active subscription
 View Profile  See their activity

  • Posts

    127

  • Joined

  • Last visited

  • Days Won

    10

 Content Type 

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

    [Установка] После месяца нормальной работы на Delphi 12.1 слетела регистрация пакетов.

    in Installation

    Posted

    Здравствуйте. Delphi 12.1, FGX-Native 1.18.1.3.

    После месяца нормальной работы на Delphi 12.1 слетела регистрация пакетов.

    Устанавливал библиотеку при закрытой IDE,  в реестре, в \Disabled Packages пакетов FGX-Native нет.

    В ручную поставить, удалить и поставить не получается.

    045.thumb.png.6e62ea23bd2679220df16259273a6d33.png

    043.thumb.png.86fbf925cc0f6c4800014916894929e2.png

    044.thumb.png.5edf3bc0a5ca7f81d5f0b92a7f285ddc.png

    042.thumb.png.6de5d3d803f975c811f8c715bdb61c35.png

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    15 часов назад, Yaroslav Brovin сказал:

    Дефайн FGX добавлен в настройки проекта?

    Да, FGX define - не был добавлен в настройках проекта.

    24.thumb.png.db05f8c73d2886c3c84fbd61c0c7f684.png

     

    После копиляции: сначала 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

    21.thumb.png.85f8e2089e20cebbc8b7f435575c9327.png

    20.thumb.png.4e192f7ab697758897423c4cf4bf8879.png

    Добавил все "FB4D Source" и "JOSE Source" в проект, все равно те же ошибки.

    23.thumb.png.0b4d8fec0b3ca139ade55402bad07d6e.png

     

     

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    В 26.04.2023 в 00:24, Yaroslav Brovin сказал:

    I opened Pull Request for adding FGX define to this project:
    https://github.com/SchneiderInfosystems/FB4D/pull/158/files

    So you can use this patch for local adopting code for FGX Native and don't forget add FGX define to project options.

    Чистое приложение, добавлен только 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)

    17.thumb.png.12c2ca34f821465eded466f26f219881.png

     

     

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    В 25.04.2023 в 10:17, Alan сказал:

    Have you defined the TOKENJWT?

    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?

    FB4D.OAuth.thumb.png.2607153d4f9b58d8c9594701878d51fe.png

     

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    57 минут назад, Dmitry Sh. сказал:

    вероятно речь идет о коде https://github.com/SchneiderInfosystems/FB4D/blob/master/Source/FB4D.Helpers.pas#L244-L246

    изменить {$ELSE} на

    {$ELSEIF Defined(FGX)}
      FGX.Types,
      FGX.Forms,

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

    11.thumb.png.9e840788d79a2cfc05c2d9b38f563e1f.png

     

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    5 часов назад, Alan сказал:

    I also defined a FGX Conditional

    In the FB4D.Helpers

    I added to the implementation uses :

     {$ELSEIF Defined(FGX)}
      FGX.Types,
      FGX.Forms,

    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!

    FB4D.Helpers.thumb.png.9faddfb8a33011c672ce423625d3b474.png

    11.thumb.png.b2cdb684e1a10d10afd1913dbd9892f8.png

     

     

    • Like 2

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    9 часов назад, Yaroslav Brovin сказал:

    Что в стектрейсе, если запускать с отладкой.

    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

    Debug2.thumb.png.709f3a719a728be8683372ed9f7e2b69.png

    Debug3.thumb.png.6f8b802b05c53ac4b4d2123931fb282b.png

     

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted

    8 часов назад, Yaroslav Brovin сказал:

    Что в логах приложения?

    Логи от запуска приложения до зависания на заставке: 

    "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"

    Logs.thumb.png.05d585032deae4c0d08f512d1852dd47.png

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted

    8 часов назад, Yaroslav Brovin сказал:

    Вам нужно обновить список используемых Jar-библиотек в FMX. Для этого на ветке Libraries нужно в контекстном меню выбрать Reverts to default. После этого, указанные выше ошибки сборки, должны пройти.

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

    Revertstodefault.thumb.png.6bd26f43441b8574ea5c1ff7460188c7.png

    FB4D – The OpenSource Cross-Platform Library for Firebase

    in 3rd party components

    Posted · Edited by Александр Клопоцкий

    Добрый день. Вопрос по работе с библиотекой: 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, никакого кода еще не пишу,

    приложение собирается без ошибок, показывается заставка, и на ней приложение зависает.

    04.thumb.png.1fb92bd7d40046d980f59c3c4fb461b7.png

    3. Беру пример из билиотеки FB4D: "FSSimpleChat.dproj", компилирую под Windows, работает (новый пользователь в Authentication создается,

    существующий пользователь логинится, если пароль забыл, на E-mail приходит письмо сменить пароль, в Firestore Database пишутся сообщения):

    06.thumb.png.d5d246e1d9ee6083dbdba1c671d57385.png

    05.thumb.png.e59e7b4948ba95204019b93dd4936f04.png

    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.

    03.thumb.png.8a2654389f823586f494448999278a29.png

     

    1.15.1.0 Русский

    in Russian version

    Posted · Edited by Александр Клопоцкий

    04.png.262bf8410b6671163129c0990445493f.png

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

    123.thumb.png.bd3504b8f7928c6c7061af4fac4d4174.png

     

    • Like 1

    Реализовать поддержку фреймов

    in Developed

    Posted · Edited by Александр Клопоцкий

    Добрый вечер,

    По вашему примеру, как прописать класс фрейма в dfm файле формы?

    013.thumb.png.4bd31bdad7bba9282092279df16b86e5.png

    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

     

    Установка Android SDK 33 на Delphi 10.4.2 CE

    in Installation

    Posted · Edited by Александр Клопоцкий

    Delphi 10.4.2 Community Edition

    1. android-studio-2021.3.1.17-windows.exe ( https://developer.android.com/studio )
    2. android-ndk-r25b-windows.zip ( https://developer.android.com/ndk/downloads )
    3. jdk-19_windows-x64_bin.exe ( https://www.oracle.com/java/technologies/downloads )

    Скачиваем Android SDK 33 через Android Studio:

    2044376713_AndroidSDK01.thumb.png.4d95c5cc5c4e3f6c3234846c223ca517.png

    25688479_AndroidSDK02.thumb.png.43daec50b7d4deed60c63fb30bd275be.png

    Android SDK 33 скачался в папку C:\Development\Sdk:

    1160568615_AndroidSDK03.thumb.png.9d195b0843b0359d0c88de9bfbcdeb7b.png

    Victor.thumb.png.2bcfe4187d08e286698a5c259a118ce9.png

    Копируем файлы dx.bat и dx.jar из SDK 30 в папку с SDK 33:

    dx_bat.thumb.png.edb656e2fa3318aa01f0e9316a6f088c.png

    dx_jar.thumb.png.58f08389660d3da0a01a285a41896a9e.png

    Создаем новый профиль Android SDK в Delphi:

    Create.thumb.png.2286fc662b3da1a464c1c6aff5370ae3.png

    Чего-то не хватает, не проходит дальше создание нового профиля Android SDK.

    Если указать стандартный Android SDK Base path, то профиль создается:

    Old.thumb.png.780d7022390f78c722f5e821e1561333.png

    Что еще нужно добавить?

    ГАЗ-ИНСТИТУТ - Заявки на обучение

    in FGX Native projects

    Posted

    Название приложения: ГАЗ-ИНСТИТУТ

    Платформа: Android 32 bit, Android 64 bit

    Поддерживаемые версии ОС: Android 5.0 и новее

    Необходимое свободное место: до 10 Мб

    Описание: Приложение "ГАЗ-ИНСТИТУТ" предназначено для подачи заявок на обучение.

    Ссылка на приложение: https://play.google.com/store/apps/details?id=gazinstitut.by

     

    Screenshot_2021-03-03-13-37-08-858_gazinstitut_by.thumb.png.7788237f421951255a6aefc63590a6e4.png

    Screenshot_2021-03-03-13-37-25-917_gazinstitut_by.thumb.png.0dba58cf5fb38fd4ef812151195a718b.png

    Screenshot_2021-03-10-02-37-47-669_gazinstitut_by.thumb.png.2f1e138c9f553b1719876a34fecb8e15.png

    Screenshot_2021-03-10-02-36-32-407_gazinstitut_by.thumb.png.98bff28d969c2d5a1d5b72df97a368e9.png

    Gas.jpg.5219a42ad6b85894982cf15d29bc1359.jpg

    • Like 5
    • Thanks 3

    Фаберлик Подарки - приложение для сопровождения постоянных покупателей

    in FGX Native projects

    Posted

    Постоянно коннект не держу. Только в момент нажатия кнопки устанавливаю коннект, вставляю запись в таблицу, с сразу отключаюсь.

    Чтение чата делаю раз в минуту и отключаюсь. http - будет прослойка, нужно будет все поля таблиц через нее прописывать, неудобно.

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

    SecureBridge держит SSH подключение в момент коннекта, хостеры не дают подключаться напрямую к базе на хостинге без SSH сертификата.

     

    114.png.973acb2bb896ad2dc67f84ae7d601f50.png

    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;

     

    • Like 3

    Фаберлик Подарки - приложение для сопровождения постоянных покупателей

    in FGX Native projects

    Posted · Edited by Александр Клопоцкий

    Название приложения: Фаберлик Подарки

    Платформа: Android 32 bit, Android 64 bit

    Поддерживаемые версии ОС: Android 5.0 и новее

    Необходимое свободное место: до 80 Мб

    Описание: Приложение "Фаберлик Подарки" предназначено для для сопровождения постоянных покупателей продукции Фаберлик.

    Приложение соединяется с базой данных MySQL на обычном хостинге сайта. Для подключения использую компоненты UniDAC, SecureBridge.

    Каждому скачиванию присваивается порядковый номер, сохраняется в телефоне, по нему отбираются и показываются сообщения чата для данного клиента. При приходе сообщения делаю "Local notification" из примера.

    Программа администрирования на Delphi 10.4.1 VCL компонентах.

    Ссылка на приложение: https://play.google.com/store/apps/details?id=faberlic24.by

    Screenshot_20220830-004830.thumb.jpg.d5a92e8d084ca656229ea089ec9bbe76.jpg

    Screenshot_20220719-002343.thumb.jpg.33c3ccef8f08b7eec505bdf2ee490d7e.jpg

    Screenshot_20220627-013834.thumb.jpg.364ab68495fcd5ab115ed83cce9bb0c3.jpg

     

     

    Screenshot_2020-12-21-22-43-25-656_faberlic24_by.thumb.png.ac69513c2861ea3d3a4763bf53cb993e.png

     

    Screenshot_2020-12-21-22-43-34-627_faberlic24_by.thumb.png.80bea058f4f9aa4c484abf15e2d8f8ab.png

    Screenshot_2021-02-02-09-06-46-524_faberlic24_by.thumb.png.ebd77ec534b4c86dda4e9ecbd0513529.png

    Screenshot_2021-02-02-09-25-44-589_faberlic24_by.thumb.png.0fdb3e067f6a4c441ea98488ffe81df7.png

    Screenshot_2021-02-02-07-43-24-775_faberlic24_by.thumb.png.b2843464970cf64494c36548eb7a9561.png

     

     

    111.png.dcc6fd27cab5eb633725644879a9a60d.png

    112.png.c12a32e82960d5792863bb812d89d1cf.png

    106.png.b3965e8246f8caeca048c1404a957346.png

    107.png.cba1f2ec81c153ae79ac728b09dd6bbf.png

    108.png.b8f011f9bf0bd9f88372a179bfa12503.png

     

     

    Screenshot_2021-01-30-21-29-01-076_faberlic24.by.png

    Screenshot_20220918-235642.jpg

    • Like 5
    • Thanks 3

    Unit FGX.Assets.Android was compiled with a different version of FGX.Helpers.Android.JStringToString

    in Closed

    Posted · Edited by Александр Клопоцкий

    1. Удалил версию FGX-Native 1.7.1. Удалились папки:  

    C:\Document and Settings\User\Local Setting\FGX Native\
C:\Users\User\AppData\Local\FGX Native\

    2. Поставил версию FGX-Native 1.8.0. Выбрал - только RADStudio 10.4, - только Android.

    По новой создались папки:  

    C:\Document and Settings\User\Local Setting\FGX Native\
C:\Users\User\AppData\Local\FGX Native\

    3. Открываю пример: CollectionViewScrollDemo.

    Компилирую - Ошибка: 

    [DCC Fatal Error] FGX.Platform.pas(195): F2051 Unit FGX.Assets.Android was compiled with a different version of FGX.Helpers.Android.JStringToString

    75.thumb.png.a8aceb399ed6bdd91f5bd66cc94f6d55.png

    Делал полный "Build All Projects", та же ошибка. Где сохранились файлы библиотеки от старой версии?

    Полный текст компиляции примера CollectionViewScrollDemo:  

    Checking project dependencies...
Compiling CollectionViewScrollDemo.dproj (Debug, Android)
brcc32 command line for "CollectionViewScrollDemo.vrc"
  c:\delphi\bin\cgrc.exe -c65001 "CollectionViewScrollDemo.vrc" -foCollectionViewScrollDemo.res 
dccaarm command line for "CollectionViewScrollDemo.dpr"
  c:\delphi\bin\dccaarm.exe -$O- --no-config -M -Q -TX.so -AGenerics.Collections=System.Generics.Collections;Generics.Defaults=System.Generics.Defaults 
  -DDEBUG -E.\Android\Debug -Ic:\delphi\lib\Android\debug;"C:\Users\User\AppData\Local\FGX Native\Libs\270\Android\Debug";c:\delphi\lib\Android\Release;
  C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\SecureBridg\Lib\Android32;"C:\Users\User\AppData\Local\FGX Native\Sources";
  "C:\Users\User\AppData\Local\FGX Native\Libs\270\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a" 
  -LEC:\Users\Public\Documents\Embarcadero\Studio\21.0\Bpl\Android -LNC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp\Android -NU.\Android\Debug 
  -NSSystem;Xml;Data;Datasnap;Web;Soap; -Oc:\delphi\lib\Android\Release;C:\Delphi\Add\UniDAC\Lib\Android32;C:\Delphi\Add\SecureBridg\Lib\Android32;
  "C:\Users\User\AppData\Local\FGX Native\Sources";"C:\Users\User\AppData\Local\FGX Native\Libs\270\Android\Release";"C:\Users\User\AppData\Local\FGX 
  Native\Libs\Common\Android\Debug\armeabi-v7a" -Rc:\delphi\lib\Android\Release;C:\Delphi\Add\UniDAC\Lib\Android32;
  C:\Delphi\Add\SecureBridg\Lib\Android32;"C:\Users\User\AppData\Local\FGX Native\Sources";"C:\Users\User\AppData\Local\FGX 
  Native\Libs\270\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a" -Uc:\delphi\lib\Android\debug;
  "C:\Users\User\AppData\Local\FGX Native\Libs\270\Android\Debug";c:\delphi\lib\Android\Release;C:\Delphi\Add\UniDAC\Lib\Android32;
  C:\Delphi\Add\SecureBridg\Lib\Android32;"C:\Users\User\AppData\Local\FGX Native\Sources";"C:\Users\User\AppData\Local\FGX 
  Native\Libs\270\Android\Release";"C:\Users\User\AppData\Local\FGX Native\Libs\Common\Android\Debug\armeabi-v7a" 
  --libpath:C:\Development\android-ndk-r21d\sources\cxx-stl\llvm-libc++\libs\armeabi-v7a;
  C:\Development\android-ndk-r21d\platforms\android-23\arch-arm\usr\lib 
  --linker:C:\Development\android-ndk-r21d\toolchains\arm-linux-androideabi-4.9\prebuilt\windows-x86_64\bin\arm-linux-androideabi-ld.exe -V -VN 
  -NO.\Android\Debug  CollectionViewScrollDemo.dpr   
[DCC Fatal Error] FGX.Platform.pas(195): F2051 Unit FGX.Assets.Android was compiled with a different version of FGX.Helpers.Android.JStringToString
Failed
Elapsed time: 00:00:41.4

    Даты создания файлов примера:

    77.png.def6a96852c4a8575effebbc51448899.png

×
×
  • Create New...