Леонид писал(а):
пределения координат и эмулирую нажатие кнопкиДля таких целей надо бы использовать sendmessage
------------ Дoбавленo в 21.01:
Add(InlineCode,12199023,210,392)
{
WorkPoints=#7:doClick|
DataPoints=#1:h|
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|38:uses kol,Share,Debug,messages,windows;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|15: h:THI_Event;|45: procedure doClick(var dt:TData; idx:word);|5: end;|0:|14:implementation|0:|30:procedure THiAsmClass.doClick;|14:var i:integer;|5:begin|22: i:=ToIntegerEvent(h);|32: SendMessage(i,BM_CLICK , 0, 0);|4:end;|0:|4:end.|
link(h,10568395:Handle,[])
}
Add(Button,10568395,210,336)
{
Left=195
Top=35
Width=70
Point(Handle)
link(onClick,1290949:doMessage,[])
}
Add(Button,12166558,161,392)
{
Left=180
Top=135
link(onClick,12199023:doClick,[])
}
Add(Message,1290949,259,336)
{
}