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

POV

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

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

  • Посещение

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

    5

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

  1. Пасиб, запомню, проверю. Но не сейчас. Уже переделал компонент .
  2. Хочу странного, но, казалось, быстро делаемого.. Создаю визуальный компонент. На него в конструкторе кладу другой компонент. И вот события мыши как бы этому динамически созданному назначить, чтобы он обработчики создаваемого компонента использовал?
  3. Отдал тестовый софт побаловаться.. На 4х камерах (и, видимо, на разных компах) лишь в одном месте камера заработала.
  4. Ну, видимо там ничего хитрого, просто надо потыркаться, варианты поискать. Если камеру остановлю заранее, то закрывается приложение норм. А вот в onClose остановка не работает не работает.
  5. Перепробовал кучу всего. В основном для VCL. Заработал лишь платный TVideoGrabber. Затем смог таки установить логитековский драйвер, а не виндовый по умолчанию - заработало всё, что было из вариантов. В том числе и вышеприведённый. Но проблема - не могу закрыть приложение. Лишь из среды убить удаётся. Что я делаю не так?
  6. POV

    Web камера (win)

    на сайте эмбаркадеры явно написано VideoCaptureDevice extends the TCaptureDevice implementation to add specific behavior for video capturing devices (like web cameras). Т.е. вебка должна бы работать. Однако не выходит каменный цветок: if (m.Current.GetDevicesByName('HD Pro Webcam C920') is TVideoCaptureDevice) then begin VideoCamera := m.Current.GetDevicesByName('HD Pro Webcam C920') as TVideoCaptureDevice; if VideoCamera <> nil then begin VideoCamera.OnSampleBufferReady := VideoBufferReady; VideoCamera.StartCapture; end; end; По StartCapture приложение задумывается на несколько секунд, а затем вылетает с аксесс виолэйшн. Всю вики облазил, не нашел в скудных примерах чего бы такого надо сделать чтобы оно заработало. Так как быть и стоит ли вообще этим заморачиваться в том смысле что темы 2х летней давности говорят о крайней медленности подхода. Оно всё также обстоит?
  7. А чем вынь32 вариант не нравится FMX? Я таким образом раскрывам майнменю в нужном месте. А под FMX хоть скомпилилось, но не заработало как я того хочу. keybd_event(VK_MENU, 0, 0 ,0); keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP,0); keybd_event(VK_RIGHT, 0, 0, 0); keybd_event(VK_RIGHT, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_RIGHT, 0, 0, 0); keybd_event(VK_RIGHT, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_DOWN, 0, 0, 0); keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_RIGHT, 0, 0, 0); keybd_event(VK_RIGHT, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_DOWN, 0, 0, 0); keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_DOWN, 0, 0, 0); keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_RIGHT, 0, 0, 0); keybd_event(VK_RIGHT, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_DOWN, 0, 0, 0); keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_DOWN, 0, 0, 0); keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0);
  8. Я оттуда инфу беру по детализации COM-портов
  9. SetupAPI в uses не подключается. И SetupAPI.pas нет. При этом С++ проект нормально работает. Как быть?
  10. всем привет.. 1) Задумался как получить список сетей (винда). Рекомендаций нашёл море, но всё с использованием API. Не страшно что API. Но чего-то не всё апишное видится. Так и должно быть? 2) Богатый внутренний мир INDY не позволит это мне сделать? Компонентов тьма, может кто скан сетей выполняет?
  11. Взял грид от TMS и на нем сделал редакторишко.
  12. Норм компонент, никаких нареканий.. ибо на безрыбье и это замечательно. А что контекстное меню оказывается за таскбаром - так СтэйОнТоп решает вопрос.
  13. Угу, ясно.. а по своим заботам - нашёл файл "FMX.Platform.Win.pas" в Берлине Токио, подключил, получил доступ к хендлу окна и убрал с панели задач. В берлине Токио файло уже дописанное, ручками не потребовало ничего делать.
  14. Я верно понял, что с панели задач должно убраться название приложения? А то неясно нужно ли оно, при том что не компиляется )) [dcc32 Error] FMX.Platform.Win.pas(240): E2291 Missing implementation of interface method IFMXWindowService.CanShowModal [dcc32 Error] FMX.Platform.Win.pas(240): E2291 Missing implementation of interface method IFMXApplicationService.Running
  15. Ручками упомянутое свойство из fmx убери.
  16. Вот некую убогость накидал. Может кому пригодится. Используется просто. Сначала создаём объект EdChange:= TChangeEditForAngle.Create; который натравливаем на нужные едиты уже расположенные на форме: EdChange.AddEdit(Edit2); Углы считать и задать можно функциями этого объекта function GetAngle(Sender: TEdit): Extended; procedure SetAngle(Sender: TEdit; angle: Extended); Использует модуль три обработчика едита, но сохраняет при этом обработчики назначенные ранее. USetEditAngle.zip
  17. А почему оно не инициализировано в родной библиотеке?
  18. Всё уже придумано за нас - у канвы есть MeasureText откуда код на хабре и скопирован. Но и оно возвращает какую-то ересь. Платформа XE8.
  19. Когда задал компоненте новый TextSettings функция TextWidth возвращает ширину текста для шрифта по умолчанию. Хотя отрисовывает с моими новыми настройками. Отчего?
  20. Сам вчерне накидал такой на фрейме, но не понял как его зарегистрировать на палитре как компонент... если я вообще верно понял что это возможно. Вот может что готовое есть? Перерыл ряд библиотек со всякими компонентами - такого не нашёл.
  21. "Намёк поняла, плыву!" (с) народный анекдот
  22. Свойство MinSize не прокатывает. Т.к. это влияет на обе разделенные панели. А надо чтобы одна всегда была не меньше какого-то размера. Может есть возможность как-то прервать перемещение сплиттера?
×
×
  • Создать...