У тебя в Form1.caption программно не меняется?
Вот как выглядит процедура захвата окна
Цитата:
if findwindow(nil, 'video4CarPC') <> 0 then
begin
name_wind:=FindWindow(nil,'video4CarPC');
end else Form1.FormDestroy(nil);
Вид для печати
У тебя в Form1.caption программно не меняется?
Вот как выглядит процедура захвата окна
Цитата:
if findwindow(nil, 'video4CarPC') <> 0 then
begin
name_wind:=FindWindow(nil,'video4CarPC');
end else Form1.FormDestroy(nil);
Нет, не меняется ничего. Пока, все проще пареной репы. Открывается форма, по таймеру открывается фрэйм с видео, хватается первая по счету камера и показывает, без всяких регулировок. Чего надо центрифуге - непонятно.Цитата:
Сообщение от Chip
Полного примера встраивания прог для Делфей нет случайно? :D
Проще свою оболочку написать, без особых наворотов, чем этим гемором (центрифугой) быть изнасилованным насмерть. :(
Самое главное получаем name_wind и делаем с этим окном все что хочешь, можно растянуть свернуть, переместить послать нажатия клавишь и многое другое.
Запустить приложение
Найти дескриптор окна:Цитата:
ShellExecute(0, 'open', PChar('video4CarPC.exe'), nil, nil, SW_SHOW);
Например переместить на новые координаты:Цитата:
if findwindow(nil, 'video4CarPC') <> 0 then
begin
name_wind:=FindWindow(nil,'video4CarPC');
end else Form1.FormDestroy(nil);
Или вот так закрыть :Цитата:
MoveWindow(name_wind,0,0,800,500,true);
отправить нажатие клавиши :Цитата:
PostMessage(name_wind, WM_QUIT, 0, 0);
Цитата:
PostMessage(name_wind, WM_KEYDOWN, 39, 0);
sleep(30);
PostMessage(name_wind, WM_KEYUP, 39, 0);
Чудеса: :DЦитата:
Сообщение от Chip
http://comprog.ru/PascalDelphi/article_433.htm
Главное ключевое слово по которому искать :)
В общем ситуация странная! :rolleyes:
Встраивается в Win 7 x64, встраивается в Win XP SP3, не встраивается только в Win 7 x86(32). Может это только у меня? :confused:
Кто-нибудь попробует или нет? :(
Или, сбор денег закончен, и на этом ваши функции закончены, результат вас не интерисует? :D
Я ведь тоже могу забить ...! :D
Как раз новую игруху скачал (Metro 2033), начну рубиться, на неделю все заброшу! ;)
Вот, немного другая версия (окно: video3cf):
у меня тоже не встраивается
Ох, хо-хо! :(Цитата:
Сообщение от didos
Винда какая? Центрифуга какая?
win 7 32 максимальная, cf 3.1.24.309
Тоже не встроилась.
Win7 64 CF 3.1
Можешь сделать в ини что бы прога отображалась по верх окон в заданном размере и с заданным местоположением. Так проще будет.