Jump to content

Kanat

Active subscription
  • Posts

    90
  • Joined

  • Last visited

  • Days Won

    7

Posts posted by Kanat

  1. В 22.03.2023 в 06:04, Yaroslav Brovin сказал:
    • Подавление сообщения о неподдерживаемом фреймворке при добавлении новой формы и фреймов для Delphi 11.3.
    •  

    Windows 7,  Delphi 11.3 подавление сообщения срабатывает наоборот (нажимает "нет"),  приходится при создании формы или фрейма быстро менять фокус нажатием Tab.  

     

  2. 12 часов назад, Yaroslav Brovin сказал:

    Исправлено в 1.11.3.1.

    Спасибо, как то можно будет быстро обновиться (поменять в исходнике).

    Просто хотели обновить свое приложение и включит этот функционал.

  3. Запустил демо пример Фотокамера, фанарик при предпросмотра (Preview) работает, спасибо, то что хотел). 

    Теперь не могу получит фото со вспышкой с включенным статусом TfgCameraFlashMode.On не работает.

    Тестировал на телефоне Xiomi Redmi Note 5.

    Спасибо

  4. Есть ли возможность кроме photo другие типы файлов выбирать?

    Я так понял сейчас работает только фото из галереи.

    В проекте используем модуль FGX.OpenDialog от @Stas для вызова менеджера файлов. В новой версии из-за этого модуля выводит ошибку, пришлось отказаться, но теперь остались без модуля прикрепление файлов)

     

  5. Не могу собрать свои проект. Выходит ошибка: First chance exception at $C6188287. Exception class EListError with message 'Duplicates not allowed'. 

    Откатился на предыдущию версию, все норм собирается.

    Ниже скрины

    image.thumb.png.454c187d6f09f7c788fa33741b0a6d8b.pngimage.thumb.png.5979fd221171fc2d71717669f6319a26.png 

  6. Разработали корпоративное приложение. Используем модуль сканирование баркода.

    Приобрели 30шт. телефонов Xiomi Redmi 6A. (во вложении характеристика). 

    На тестовом телефоне (характеристика чуть луче) работает нормально. На  Redmi 6A сильно тормозить при активации TfgBarcodeScanner.

    Можно ли снизить или настроит, что бы как то заработал на телефоне. 

    Телефоны покупали из Китая. Возврату не подлежит) 

    Любая помощь.

    P. S на одном вообще не хочет активироваться, скрин прикрепил.

    Screen2.jpg

    Screen1.jpg

  7. Попробуйте активировать при создание формы 

        procedure(const APermissionInfo: TArray<TfgPermissionInfo>) begin
          case APermissionInfo[0].CheckResult of
            TPermissionCheckResult.Granted:
            begin
              Camera.Active := True;
              BarcodeScanner.Active := True;

    При закрытие формы нужно деактивировать 

    procedure TFormCamera.CloseForm;
    begin
      Camera.Active := False;
      BarcodeScanner.Active := False;
    
      TfgAnimationHelper.HideModalForm(Self, [TfgAnimationOption.ReleaseOnFinish]);
      FormCamera := nil;
    end;

     

  8.  config.json  есть, он не пустой.

    Перезагружал IDE,  открывается пустой ресурс файлов, старый config.json стоит, при создание нового ресурса удаляет все старое и перезаписывает все по новой.

    Сейчас обратно все пересоздал, если выйдет ошибка скину сюда config.json файл.

  9. Часто выходит ошибка при сохранение ресурсов. Решение переключаю фокусы между ресурсами и сохраняю. Все норм работало. 

    Сейчас ситуация такая, при добавление нового ресурса вышла ошибка и ошибка не уходит, просто закрыл без сохранение.

    Заново открываю все слетело, теперь показывает пусто.

    Не хочется заново все делать и собирать проект. Много использовал  маски, цвета, иконки.... 

    Как можно восстановит ресурсы? В директории проекта все ресурсы остались. 

     

    Ошибка при сохранение:

    image.png.ca6f93e6e3567acb9ba763be510722f9.png

     

    Update: 06/02/20

    Обратно все собрал ресурсы по новой,  седня слетела еще раз((

    ниже ошибка: 

    image.png.56cb69d1d6b9f7722eafb173ca9dcd73.png

    Текст ошибки:

    Цитата

    [50D12AF0]{vcl260.bpl  } Vcl.Controls.TControl.SetAlign (Line 5728, "Vcl.Controls.pas" + 1) + $0
    [50D36210]{vcl260.bpl  } Vcl.StdCtrls.TCustomLabel.CMTextChanged (Line 2577, "Vcl.StdCtrls.pas" + 2) + $6
    [50063F18]{rtl260.bpl  } System.@FinalizeRecord (Line 32627, "System.pas" + 41) + $0
    [501009AF]{rtl260.bpl  } System.Rtti.{System.Generics.Collections}TDictionary<System.Pointer,System.Rtti.TRttiObject>.GetBucketIndex (Line 6968, "System.Generics.Collections.pas" + 15) + $1C
    [5006030C]{rtl260.bpl  } System.TMonitor.CheckOwningThread (Line 19122, "System.pas" + 2) + $0
    [5006062E]{rtl260.bpl  } System.TMonitor.Exit (Line 19312, "System.pas" + 1) + $2
    [5006068A]{rtl260.bpl  } System.TMonitor.Exit (Line 19334, "System.pas" + 2) + $7
    [500EF340]{rtl260.bpl  } System.Rtti.TRttiPackage.ReadObject (Line 5170, "System.Rtti.pas" + 14) + $A
    [5006114C]{rtl260.bpl  } System.@TryFinallyExit (Line 23024, "System.pas" + ? + $0
    [500EF2F8]{rtl260.bpl  } System.Rtti.TRttiPackage.ReadObject (Line 5162, "System.Rtti.pas" + 6) + $4
    [50060980]{rtl260.bpl  } System.TMonitor.TryEnter (Line 19547, "System.pas" + 10) + $0
    [500604A0]{rtl260.bpl  } System.TMonitor.Enter (Line 19208, "System.pas" + 4) + $2
    [5006037C]{rtl260.bpl  } System.TMonitor.Destroy (Line 19144, "System.pas" + 0) + $0
    [5005F9BD]{rtl260.bpl  } System.TObject.CleanupInstance (Line 17782, "System.pas" + 23) + $0
    [5005A264]{rtl260.bpl  } System.@FreeMem (Line 4878, "System.pas" + 20) + $0
    [5005F830]{rtl260.bpl  } System.TObject.FreeInstance (Line 17523, "System.pas" + 2) + $2
    [500600CA]{rtl260.bpl  } System.@ClassDestroy (Line 18910, "System.pas" + 0) + $2
    [500ED449]{rtl260.bpl  } System.Rtti.TPoolToken.Destroy (Line 4805, "System.Rtti.pas" + 13) + $D
    [50060980]{rtl260.bpl  } System.TMonitor.TryEnter (Line 19547, "System.pas" + 10) + $0
    [500604A0]{rtl260.bpl  } System.TMonitor.Enter (Line 19208, "System.pas" + 4) + $2
    [5006037C]{rtl260.bpl  } System.TMonitor.Destroy (Line 19144, "System.pas" + 0) + $0
    [5005F9BD]{rtl260.bpl  } System.TObject.CleanupInstance (Line 17782, "System.pas" + 23) + $0
    [5005A264]{rtl260.bpl  } System.@FreeMem (Line 4878, "System.pas" + 20) + $0
    [5005F830]{rtl260.bpl  } System.TObject.FreeInstance (Line 17523, "System.pas" + 2) + $2
    [5006432D]{rtl260.bpl  } System.@CopyRecord (Line 33728, "System.pas" + 204) + $0
    [50064361]{rtl260.bpl  } System.@CopyRecord (Line 33781, "System.pas" + 257) + $0
    [5006468A]{rtl260.bpl  } System.@CopyArray (Line 34224, "System.pas" + 120) + $0
    [50D14ECC]{vcl260.bpl  } Vcl.Controls.TControl.Perform (Line 7198, "Vcl.Controls.pas" + 10) + $8
    [50D12C91]{vcl260.bpl  } Vcl.Controls.TControl.SetTextBuf (Line 5773, "Vcl.Controls.pas" + 2) + $B
    [5005A264]{rtl260.bpl  } System.@FreeMem (Line 4878, "System.pas" + 20) + $0
    [50061C6C]{rtl260.bpl  } System.@UStrClr (Line 25505, "System.pas" + 14) + $0
    [50D13A63]{vcl260.bpl  } Vcl.Controls.TControl.SetText (Line 6329, "Vcl.Controls.pas" + 10) + $10
    [17C4E245]{fgx_reg.260.bpl} Fgx.Assets.View.Groupedresources.TResourceGroupView.SetResource + $119
    [17C51CF8]{fgx_reg.260.bpl} Fgx.Assets.View.Resources.TResourcesView.SetResources + $DC
    [17C7C043]{fgx_reg.260.bpl} Fgx.Assets.Designer.TFrameAssetManager.VTResourcesAdvancedHeaderDraw + $107
    [17C7C1ED]{fgx_reg.260.bpl} Fgx.Assets.Designer.TFrameAssetManager.VTResourcesChange + $15D
    [1BF98DDE]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.DoChange + $26
    [1BF97151]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.Change + $5D
    [1BF9647F]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.AddToSelection + $BF
    [1BFB3B62]{fgx_design.260.bpl} Virtualtrees.Fgx.TCustomVirtualStringTree.AddToSelection + $1E
    [1BF9E8BC]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.HandleMouseDown + $9D4
    [50D158D4]{vcl260.bpl  } Vcl.Controls.TControl.DoMouseDown (Line 7559, "Vcl.Controls.pas" + 7) + $29
    [1BF952D4]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.WMLButtonDown + $48
    [1BFA41D0]{fgx_design.260.bpl} Virtualtrees.Fgx.TBaseVirtualTree.WndProc + $80
    [50D19314]{vcl260.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9977, "Vcl.Controls.pas" + 3) + $6
    [50179C9C]{rtl260.bpl  } System.Classes.StdWndProc (Line 17959, "System.Classes.pas" + 11) + $2
    [50E6ECCF]{vcl260.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 10747, "Vcl.Forms.pas" + 23) + $1
    [50E6ED12]{vcl260.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 10777, "Vcl.Forms.pas" + 1) + $4
    [50E6F045]{vcl260.bpl  } Vcl.Forms.TApplication.Run (Line 10915, "Vcl.Forms.pas" + 26) + $3
    [0051D06E]{bds.exe     } bds.bds (Line 214, "" + 7) + $7

     

     

×
×
  • Create New...