Aziz писал(а):
не заработал ваш вариантЭто под XP было
------------ Дoбавленo в 16.33:
Вот так будет работать под Win7
Add(MainForm,10753723,322,189)
{
}
Add(FindWindow,15534367,378,231)
{
ClassName="Button"
Caption="Пуск"
Point(ChildHandle)
link(onFind,14145821:doSendMessage,[])
}
Add(Button,12945645,322,231)
{
Left=30
Top=20
Width=110
Caption="Вход в Меню Пуск"
link(onClick,15534367:doFind,[])
}
Add(SendMessage,14145821,427,231)
{
Point(Message)
link(WParam,12300489:Var,[])
link(Message,3945192:Var,[])
}
Add(GlobalVar,3945192,448,182)
{
Name="WM_KEYDOWN"
Data=Integer(256)
}
Add(GlobalVar,12300489,434,203)
{
Name="VK_RETURN"
Data=Integer(13)
}