Вверх ↑
Этот топик читают: Гость
Ответов: 106
Рейтинг: 0
#46: 2015-12-14 03:49:50 ЛС | профиль | цитата
(не кидайтесь тапками)
Можно ли стороннюю прогу поместить в форму своей?
Тоесть не просто разместить кнопку вызова той прогаммы из своей формы, а чтоб прога работала прям в окне моей както так )))))))))

карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#47: 2015-12-14 09:56:24 ЛС | профиль | цитата
Gitarist писал(а):
а чтоб прога работала прям в окне моей

SetParent
карма: 22

0
Ответов: 106
Рейтинг: 0
#48: 2015-12-14 16:56:25 ЛС | профиль | цитата
nesco писал(а):

в этом случае программа открывается отдельным окном рядом с формой (калькулятор) , а так чтобы прямо форме, можно сделать?
карма: 0

0
Ответов: 824
Рейтинг: 138
#49: 2015-12-14 17:31:20 ЛС | профиль | цитата
code_36641.txt

карма: 1

0
файлы: 1code_36641.txt [760B] [626]
Ответов: 106
Рейтинг: 0
#50: 2015-12-15 02:30:08 ЛС | профиль | цитата
sashaoli писал(а):
code_36641.txt

Хм !!! Гран мерси!

А объясните пожалуйста поподробнее что конкретно делает компонент FindWindow? В его свойствах ClassName указано CalcFrame, а если я другую прогу захочу в форму внедрить что там надо внести?

------------ Дoбавленo в 01.54:
Как сделать чтобы было видно только поле с кнопками и цифровое табло?
Есть ли какой то способ "обрезать" все лишнее и выделить для работы нужный регион сторонней программы...?
карма: 0

0
Ответов: 824
Рейтинг: 138
#51: 2015-12-15 21:16:49 ЛС | профиль | цитата
Gitarist писал(а):
А объясните пожалуйста поподробнее что конкретно делает компонент FindWindow?
Щелкаем по компоненту, жмем F1, читаем...
карма: 1

0
Ответов: 106
Рейтинг: 0
#52: 2015-12-16 14:14:42 ЛС | профиль | цитата
Как сделать чтобы было видно только поле с кнопками и цифровое табло?
Есть ли какой то способ "обрезать" все лишнее и выделить для работы нужный регион сторонней программы...?

На это есть ответ?
карма: 0

0
Ответов: 824
Рейтинг: 138
#53: 2015-12-16 15:19:45 ЛС | профиль | цитата
Gitarist писал(а):
Есть ли какой то способ "обрезать" все лишнее и выделить для работы нужный регион сторонней программы...?

Вкладка "Окно", подвкладки работы с регионами
------------ Дoбавленo в 14.44:
Add(MainForm,16567656,392,84)
{
Width=298
Height=516
Point(Handle)
}
Add(Button,7298604,84,133)
{
Left=15
Top=10
link(onClick,3155112:doExec,[])
}
Add(WinExec,3155112,133,133)
{
FileName="calc.exe"
link(onExec,9945041:doTimer,[])
}
Add(SetParent,9864393,385,133)
{
link(NewParent,16567656:Handle,[])
}
Add(FindWindow,3912693,238,133)
{
ClassName="CalcFrame"
SkipParam=1
link(onFind,10523701:doValue,[])
}
Add(PosWindow,1783027,385,182)
{
Left=20
}
Add(Timer,9945041,182,133)
{
Interval=200
Enable=1
AutoStop=1
link(onTimer,3912693:doFind,[])
}
Add(Hub,11297914,336,133)
{
OutCount=4
link(onEvent1,9864393:doSetParent,[])
link(onEvent2,1783027:doLeft,[(375,146)(375,188)])
link(onEvent3,1783027:doTop,[(368,153)(368,195)])
link(onEvent4,14435883:doCreateRect,[(361,160)(361,251)])
}
Add(RGN_Rect,14435883,385,245)
{
Point1=3932178
Point2=26869970
link(onCreateRect,10438399:doSetRegion,[])
}
Add(RGN_SetToWindow,10438399,441,245)
{
link(Handle,10523701:Value,[(447,236)(293,236)])
}
Add(Memory,10523701,287,133)
{
link(onData,11297914:doEvent1,[])
}


карма: 1

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#54: 2015-12-16 15:22:25 ЛС | профиль | цитата
sashaoli писал(а):
Вкладка "Окно", подвкладки работы с регионами

Тоже, но с большими возможностями (как пример, и только два региона)

Add(MainForm,10141795,462,126)
{
Width=548
Height=449
Color=15780518
Point(Handle)
}
Add(Button,7298604,196,175)
{
Left=15
Top=10
link(onClick,3155112:doExec,[])
}
Add(WinExec,3155112,245,175)
{
FileName="calc.exe"
link(onExec,9945041:doTimer,[])
}
Add(SetParent,9864393,455,175)
{
link(NewParent,10141795:Handle,[])
}
Add(FindWindow,3912693,350,175)
{
ClassName="CalcFrame"
SkipParam=1
link(onFind,11297914:doEvent1,[])
}
Add(PosWindow,1783027,455,231)
{
Left=20
Top=40
}
Add(Timer,9945041,294,175)
{
Interval=200
Enable=1
AutoStop=1
link(onTimer,3912693:doFind,[])
}
Add(Hub,11297914,406,175)
{
OutCount=4
link(onEvent1,9864393:doSetParent,[])
link(onEvent2,1783027:doLeft,[(445,188)(445,237)])
link(onEvent3,1783027:doTop,[(438,195)(438,244)])
link(onEvent4,1273777:doCreateRgn,[(431,202)(431,293)])
}
Add(RGN_SetToWindow,15707162,525,287)
{
link(Handle,3912693:Handle,[(531,278)(356,278)])
}
Add(RGN_Script,1273777,455,287)
{
Script=#17:rect(7,29,417,49)|24:round(19,60,405,111,2,2)|0:|
link(onCreateRgn,15707162:doSetRegion,[])
}


И не забывать заглядывать в справку -- http://hiasm.net/wiki.html
карма: 22

0
Ответов: 106
Рейтинг: 0
#55: 2015-12-16 23:24:33 ЛС | профиль | цитата
Большое спасибо за предложенные коды!
правда другие программы открываются отдельно от формы, рядом... капаюсь
Не понятно как узнать ее "имя класса окна" (className)
в инете щас вычитал что через winsight можно... но чо там да как ...
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#56: 2015-12-17 01:47:20 ЛС | профиль | цитата
Gitarist писал(а):
Не понятно как узнать ее "имя класса окна" (className)

На тебе маленькую помощь -- win_class.sha
Запусти и наводи курсор на нужное окно, в подсказке будет показан класс окна. Закрыть программку -- <Ctrl><Alt><F4>
карма: 22

0
файлы: 1win_class.sha [1.3KB] [563]
Ответов: 824
Рейтинг: 138
#57: 2015-12-17 19:22:27 ЛС | профиль | цитата
Вот, еще, небольшой помощник
WinInfo

карма: 1

0
Ответов: 106
Рейтинг: 0
#58: 2016-01-09 00:21:50 ЛС | профиль | цитата
Подскажите пожалуйста, как в поле Label или editbox (все равно какое поле на форме) вывести текст который храниться и переодически меняется в файле...?
Например в C:\1.txt
но не через диалог ODialog а чтоб только этот файл всегда открывался при нажатии на кнопку
карма: 0

0
Ответов: 1058
Рейтинг: 76
#59: 2016-01-09 00:47:28 ЛС | профиль | цитата
DirectoryChanges в помощь.
карма: 0

0
Ответов: 106
Рейтинг: 0
#60: 2016-01-09 01:06:17 ЛС | профиль | цитата
tom-it писал(а):
DirectoryChanges в помощь.

Спасибо... но..это же.. мониторинг изменения папки , а не файла......
Мне надо просто вывести на экран текст который находится в файле 1.txt

ну например в командной строке windows достаточно написать type c:\1.txt .... а тут то как?
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)