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

des80

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

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

  • Посещение

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

  1. Сегодня внезапно узнал от коллеги, что при написании dll на Delphi к приложению, которое их использует нужно обязательно подкладывать файл borlndmm.dll, т.к. иначе могут возникать ошибки и утечки памяти при использовании dll.Это действительно так или это устаревшая информация? в интернете не нашел никакой информации об этом вообще, хотя по идее это должно быть описано в каждом уроке о создании dll в Delphi.
  2. Спасибо большое! Это именно то что нужно, а я уже тут начал менять стандартный модуль FMX.Platform.Win, но ваш способ проще и красивей
  3. да, я могу воспроизводить видео только на форме, потому что все остальное в fmx хэндлов не имеет то эта форма у меня висит alwaysontop. Чтобы она не перекрывала окна других приложений, которые могут быть открыты на компе эта форма просто пропадает когда главная форма деактивируется. Поэтому мне нежелетаельно, чтобы она активировалась при клике, потому что срабатывает Deactivate у главного окна и она пропадает. Если сделать через OnClick и возвращать фокус, то будет мерцание некрасивое, ну и другие причины есть, которые долго расписывать.
  4. виндовс, видео воспроизводится через dll регистратора. Я там дергаю 3-4 функции из этой dll, в функцию Play мне нужно передать handle окна, чтобы на него воспроизводилось видео
  5. потому что у меня с видеорегистратора воспроизводится поток видео на форме. Мне нужно чтобы объект имел handle окна, а фрейм handle не имеет
  6. OnClick не вариант, потому что на событии OnDeactivate основной формы происходят некоторые вещи, которые не должны происходить при клике конкретно на эту форму. У меня именно FMX форма. На VCL я бы просто переопределил процедуру которая отлавливает события и при WM_ACTIVATE поставил заглушку, а в FMX я так сделать не могу
  7. У меня есть форма AlwaysOnTop, я пытаюсь сделать чтобы она не активировалась, не забирала фокус у другой формы при клике на нее, а просто висела поверх всех окон. Процедура Activate у ее предка TCommonCustomForm не виртуальная, поэтому я не могу ее переопределить. Я пробовал через helper TVideoFormHelper = class helper for TCommonCustomForm public procedure Activate; end; procedure TVideoFormHelper.Activate; begin showmessage('123'); end; Но все равно почему то не срабатывает. Сообщение 123 не показывается, а вызывается обычный Activate класса. Что я делаю не так в хелпере? Есть ли какой то другой способ? И если все таки можно через хелпер то как мне сделать чтобы функция ничего не делала только если класс TVideoForm, а в остальных случаях работала как обычно if self is TVideoForm then exit else // тут вызываем нормальный activate класса TCommonCustomForm
  8. я использую не TImage а эффект TShadowEffect. Это эффект создает огромную битмапу тени сам у себя внутри для большой панели и выпадет ошибка
  9. У меня есть панель которая находится в скроллбоксе, у панели есть эффект тени, размер панели может быть очень большим, в зависимости от данных из бд, которые на ней рисуются. Размер может доходить до 15000 пикселей, в результате вылезает ошибка bitmap size too big. Что касается отрисовки данных на ней, то я могу легко решить эту проблему отрисовывая только те данные, которые видны в текущий момент в скролл боксе, но остался только эффект тени, который мешает решить эту проблему. Можно ли каким то образом отрисовывать только видимую в скроллбоксе часть тени, а не всю, чтобы картинка тени не растягивалась до недопустимых размеров?
  10. des80

    Скриншот формы

    Передо мной стоит задача сделать видео плеер, в котором я могу запускать, останавливать видео с регистратора. Видео с регистратора потоком рисуется на форму( передаю в функцию handle окна и рисуется). Но мне нужно чтобы видео было не в отдельном окне, а на панельке, поэтому я придумал создавать форму на которою идет видео, спрятать ее за пределами экрана и рисовать то что на ней нарисовано на панельку по таймеру каждые 10 миллисекунд. Однако PaintTo не срабатывает, он делает скриншот формы со всемя компонентами на ней, но игнорирует то что на ней рисует поток с видеорегистратора. Как можно сделать скриншот формы вместе с картинкой с регистратора?
  11. какой еще позицией? Я всего то задал вопрос, а зарипов его неправильно понял и киданул мне решение, которое я слил, это задело его опухшее чсв и он стал бросаться фразочками типо "говнокод" или "я не хочу думать! я хочу кнопку, нажимаешь и все работает" , на такой бред я не мог не ответить.
  12. ну тут 2 варианта : либо ты слабоумный, раз не понял что я имел ввиду после такого разжевывания либо я непонятно объясняю суть проблемы
  13. ты дурак или нет? 1.У меня уже есть проект, в котором 100 форм, я прекрасно знаю как это сделать, я прекрасно знаю что мне нужно прописать ApplyFontToForm в OnShow каждой формы, но мне придется делать это 100 раз, а я задал здесь этот вопрос, чтобы узнать можно ли ОДИН раз задать что Arial это дефолтный шрифт, шрифт по умолчанию. Во всех 100 формах у меня везде шрифт прописан (default). А что это за шрифт default? какой шрифт по факту туда подставляется? и можно ли ЗАМЕНИТЬ этот шрифт по умолчанию. Этот шрифт задается в настройках винды? или его можно задать отдельно в моей программе? 2.Ок, я написал 100 раз на 100 формах ApplyFontToForm в OnShow. А потом у меня создаются кнопки и лабелы после выполнения этого кода и на ней будет стандартный шрифт, а не тот который я задал в ApplyFontToForm. Да я могу без проблем задать шрифт при создании компонента, но КОД УЖЕ НАПИСАН И ЕГО МНОГО и мне опять таки мне придется это делать много много раз, во многих местах прописывать Familyfont='Arial'. Понимаешь, нет?
  14. Да поздно уже наследовать. Проект уже написан. И опять таки это не решает проблему с динамически создаваемыми компонентами на формах-наследниках
  15. 1.я хочу в одном месте централизованно написать код, чтобы (default) во всех формах, на всех компонентах, включая те, которые создаются после выполнения этого кода воспринимался как какой то определенный шрифт. То есть задать какой то шрифт дефолтным. 2.ничего не мешает, просто нужно в 100500 мест залезть в коде и прописать FontFamily:='Arial'; 3.проблема в том, что мне придется на каждой форме это вызывать, мне придется это 100 раз копипастить. Чтобы этого не делать я и задал этот вопрос возможно ли задать какой то шрифт дефолтным в принципе
  16. Этот код просто заменяет у всех компонентов данной формы шрифты. Если у меня 30 форм то мне придется на каждой форме прописывать этот код. И этот код не поменяет шрифт у динамически создаваемых компонентов. Другого нет способа?
  17. хотя и левые, установленные в винде тоже было бы неплохо
  18. Windows, шрифт родной для платформы
  19. Есть ли возможность указать какой шрифт должен использоваться по дефолту в моем приложении на всех формах и на всех контролах? У них сейчас стоит у всех (default), я хочу в одном месте всем задать, чтобы вместо (default) подставлялся Arial например
  20. Вау! Это работает! Потрясающе
  21. Если ли в firemonkey какой нибудь компонент для того чтобы выбрать не файл, а папку?
  22. des80

    собрать apk файл на комп

    Можно ли в Delphi собрать apk файл прямо себе на комп, чтобы потом скинуть на телефон и развернуть его там?
  23. Не прокатывает. У меня после этого вообще перестал реагировать компонент на любые нажатия, что левой что правой кнопкой мыши, даже курсор не появляется
×
×
  • Создать...