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

Sergey S

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

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

  • Посещение

Активность репутации

  1. Like
    Sergey S отреагировална krapotkin в Работа с web камерой   
    скорее всего просто нет реализации.
    UI в Linux же обеспечен совершенно сторонними средствами
    так что вопрос скорее к пакету FMX Linux
     
  2. Like
    Sergey S отреагировална krapotkin в Создание Dockable формы   
    floatingTabs.zip
    вот.  примерно то же самое надо делать при mousedragover
  3. Like
    Sergey S отреагировална krapotkin в как отловить перемещение формы по экрану, Windows   
    TForm1 = class(TForm)
      private
      public
        procedure SetBoundsF(const ALeft: Single; const ATop: Single; const AWidth: Single; const AHeight: Single); override;
      end;
  4. Like
    Sergey S отреагировална OnePeople в Создание Dockable формы   
    Посмотрите это видео
  5. Like
    Sergey S отреагировална krapotkin в Создание Dockable формы   
    ничего там не из коробки.
    и в хроме тоже сами писали) 
    TabControl в чистом виде много чего не поддерживает.
    Зато поддерживает главное - можно табы убрать вообще. И над ним сделать панель, которая будет вести себя как угодно, в том числе анимированно раздвигая элементы во время Drag Over
    А после дропа выстроить табы. или фреймы, или что угодно. вообще не проблема
  6. Like
    Sergey S отреагировална OnePeople в Создание Dockable формы   
    Написал за 5 минут для примера как можно
    Новая папка.rar
  7. Like
    Sergey S отреагировална krapotkin в Создание Dockable формы   
    я так понимаю, вопрос упирался в красивый драг, а не способ отсоединить таб от родителя ?
  8. Like
    Sergey S отреагировална OnePeople в Создание Dockable формы   
    Ну я судил поэтому 
    Если нет, то тут только как написали вы, делать все самому, хотя я думаю накрутить и в TabControl можно красивостей)
  9. Like
    Sergey S отреагировална Slym в Создание и удаление вкладок в TabControl   
    Проблема в том что ты убиваешь вкладку на которой кнопка выполняет свой клик... т.е. кнопка убивает себя из под себя...
    На до убийство сделегировать, например основному потоку через TThread.ForceQueue

     
    procedure TfrMain.TabClose(Sender: TObject); var activetab : Integer; begin activetab:=((Sender as TControl).Parent as TControl).Parent.Index; Thread.ForceQueue(nil, procedure begin TabControl1.Delete(activetab); end); end;  
  10. Like
    Sergey S отреагировална Martifan в Как правильно назначить TThread Policy and Priority в Linux   
    Для установки приоритета потока в Linux в Delphi можно использовать функцию pthread_setschedparam(). Эта функция позволяет задать приоритет потока в соответствии с POSIX-стандартом.
    Пример использования функции pthread_setschedparam() для установки приоритета потока можно найти в следующем коде:
    uses Posix.Sched; var Params: sched_param; ThreadId: pthread_t; begin ThreadId := pthread_self(); Params.sched_priority := 10; // устанавливаем приоритет 10 if pthread_setschedparam(ThreadId, SCHED_FIFO, @Params) <> 0 then raise Exception.Create('Error setting thread priority'); end; В этом примере мы устанавливаем приоритет потока на уровне 10 с помощью структуры sched_param. Далее мы используем функцию pthread_setschedparam() для установки приоритета нашему потоку, и если функция возвращает значение отличное от 0, то возникает исключение.
    Обратите внимание, что установка приоритета потока может быть опасной, поскольку это может привести к проблемам с производительностью системы или блокировке других потоков. Поэтому необходимо использовать эту функцию осторожно и только в случае крайней необходимости.
×
×
  • Создать...