Перейти к содержанию
Fire Monkey от А до Я

GASCHE

Пользователи
  • Постов

    208
  • Зарегистрирован

  • Посещение

  • Победитель дней

    12

Весь контент GASCHE

  1. А исключили это как? Что у вас вместо System.Android.Bluetooth.pas
  2. Как то интересно вы ставите одно, а файлы берёте из другого, сравните со своим это из 11.3 {*******************************************************} { } { CodeGear Delphi Runtime Library } { Copyright(c) 2014-2023 Embarcadero Technologies, Inc. } { All rights reserved } { } {*******************************************************} unit System.Android.Bluetooth; procedure InternalProcessMessages; begin TThread.Sleep(1); end;
  3. JEnvironmentClass = interface(JObjectClass) ... {class} function isExternalStorageManager: Boolean; cdecl; overload; end; А эта не подходит?
  4. Читаете файл, разбираете заголовок файла, определяете позицию начала данных, обрабатываете данные так как вам нужно .
  5. А так не пробовали function TForm4.FDnnection(SQLwe:string): string; begin FDConnection1.Params.DriverID:='MSAcc'; FDConnection1.Params.Database:=Form2.PathBaseEdit.Text; FDConnection1.Connected:=true; FDQuery1.SQL.Add(SQLwe); FDQuery1.Active:=true; end;
  6. А чем не устраивает пример приведенный в https://fire-monkey.ru/topic/853-универсальный-способ-хранения-настроек/#comment-3657
  7. А так не пробовали? constructor TMyClass.Create(pos: String = '');
  8. По таймеру запускаете поток, в процедуре procedure TThreadRenew.Execute; производите расчет, когда значение внутри измениться на 1 синхронизируйтесь с основным потоком и меняете Label1.Text и даже "если вычисления идут час", то через час будет вам счастье
  9. for i := 0 to 9 do begin уберите и будет вам счастье
  10. Тогда выложите здесь исходники с тем что вы здесь написали и скомпилированный вами код, зачем гадать на гуще.
  11. Чтоб он писал десятками процентов надо чтоб pc изменялось по 10, смотрите кто у вас его меняет. У меня ваш код в Windows меняется по 1 проценту.
  12. Ищите в интернете Copy и LastDelimiter.
  13. Одновременно заполняйте поле Tag ID этого FIO.
  14. Основной задачей второго издания данной книги является актуализация представленных примеров относительно текущей версии Embarcadero RAD Studio/Delphi 10.3.2 Rio по сравнению с той, которая использовалась при подготовки первого варианта. Материал книги дополнился новыми возможностями и полезными советами, а также рекомендациями, полученными от читателей первой версии.
  15. GASCHE

    Работа форума

    Не работает Непрочитанный контент, Компактно!
  16. Подставляете туда свой JSON и получаете готовый результат.
  17. Так всё для вас уже сделано, даже голову ломать не надо не надо ?
  18. Я на панель накладывал TRectangle и рисовал на последнем.
  19. Попробуйте Width и Heigh взять из координаты ARect события OnPainting, мне помогло. PROCEDURE pbGraphPainting( Sender : TObject; Canvas : TCanvas; const ARect : TRectF ); ... _rGraph.OnPainting := pbGraphPainting;
  20. Грузятся если заменить if (FListViewUpdating) or (AAsyncResult.IsCancelled) then на if (FListViewUpdating) or (AsyncResult.IsCancelled) then. AAsyncResult у меня NIL
×
×
  • Создать...