POV
-
Постов
307 -
Зарегистрирован
-
Посещение
-
Победитель дней
5
Сообщения, опубликованные POV
-
-
Хочу странного, но, казалось, быстро делаемого..
Создаю визуальный компонент. На него в конструкторе кладу другой компонент. И вот события мыши как бы этому динамически созданному назначить, чтобы он обработчики создаваемого компонента использовал?
-
Отдал тестовый софт побаловаться.. На 4х камерах (и, видимо, на разных компах) лишь в одном месте камера заработала.
-
20 часов назад, krapotkin сказал:
у меня ТРИ подключенных камеры - Logitech, ChinaNoName и встроенная web-камера
все три нормально запускаются и нормально останавливаются в простейшем варианте из примеров.
Берлин
Ну, видимо там ничего хитрого, просто надо потыркаться, варианты поискать. Если камеру остановлю заранее, то закрывается приложение норм. А вот в onClose остановка не работает не работает.
-
Перепробовал кучу всего. В основном для VCL. Заработал лишь платный TVideoGrabber.
Затем смог таки установить логитековский драйвер, а не виндовый по умолчанию - заработало всё, что было из вариантов. В том числе и вышеприведённый.
Но проблема - не могу закрыть приложение. Лишь из среды убить удаётся. Что я делаю не так?
-
1 час назад, krapotkin сказал:
а если
VideoCamera.OnSampleBufferReady := NIL;
?
То же самое
-
на сайте эмбаркадеры явно написано
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х летней давности говорят о крайней медленности подхода. Оно всё также обстоит?
-
В 14.04.2016 в 13:53, Равиль Зарипов (ZuBy) сказал:
я ведь дал выше ответ!
вы понимаете что делает код который используете?
А чем вынь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);
-
2 часа назад, Равиль Зарипов (ZuBy) сказал:
что это за модуль?
Я оттуда инфу беру по детализации COM-портов
-
SetupAPI в uses не подключается. И SetupAPI.pas нет.
При этом С++ проект нормально работает. Как быть?
-
всем привет..
1) Задумался как получить список сетей (винда). Рекомендаций нашёл море, но всё с использованием API. Не страшно что API. Но чего-то не всё апишное видится. Так и должно быть?
2) Богатый внутренний мир INDY не позволит это мне сделать? Компонентов тьма, может кто скан сетей выполняет?
-
-
Норм компонент, никаких нареканий.. ибо на безрыбье и это замечательно.
А что контекстное меню оказывается за таскбаром - так СтэйОнТоп решает вопрос.
-
Угу, ясно.. а по своим заботам - нашёл файл "FMX.Platform.Win.pas" в
БерлинеТокио, подключил, получил доступ к хендлу окна и убрал с панели задач. ВберлинеТокио файло уже дописанное, ручками не потребовало ничего делать. -
Я верно понял, что с панели задач должно убраться название приложения?
А то неясно нужно ли оно, при том что не компиляется ))
[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
-
Ручками упомянутое свойство из fmx убери.
-
Вот некую убогость накидал. Может кому пригодится.
Используется просто. Сначала создаём объект
EdChange:= TChangeEditForAngle.Create;
который натравливаем на нужные едиты уже расположенные на форме:
EdChange.AddEdit(Edit2);
Углы считать и задать можно функциями этого объекта
function GetAngle(Sender: TEdit): Extended; procedure SetAngle(Sender: TEdit; angle: Extended);
Использует модуль три обработчика едита, но сохраняет при этом обработчики назначенные ранее.
-
-
А почему оно не инициализировано в родной библиотеке?
-
Всё уже придумано за нас - у канвы есть MeasureText откуда код на хабре и скопирован.
Но и оно возвращает какую-то ересь. Платформа XE8.
-
Когда задал компоненте новый TextSettings функция TextWidth возвращает ширину текста для шрифта по умолчанию. Хотя отрисовывает с моими новыми настройками.
Отчего?
-
2 минуты назад, krapotkin сказал:
не стоит фрейм вставлять на место в дизайн-тайме
Ну это безусловно.
-
Сам вчерне накидал такой на фрейме, но не понял как его зарегистрировать на палитре как компонент... если я вообще верно понял что это возможно.
Вот может что готовое есть? Перерыл ряд библиотек со всякими компонентами - такого не нашёл.
-
3 минуты назад, Равиль Зарипов (ZuBy) сказал:
намёк
"Намёк поняла, плыву!" (с) народный анекдот
-
Свойство MinSize не прокатывает. Т.к. это влияет на обе разделенные панели. А надо чтобы одна всегда была не меньше какого-то размера.
Может есть возможность как-то прервать перемещение сплиттера?
Компонент на компоненте
в Разработка компонентов
Опубликовано
Пасиб, запомню, проверю. Но не сейчас. Уже переделал компонент .