z80 писал(а):
но судя по вышевыложенному списку, достаточно вставить проверку в полученном тексте фразы "Windows XP"------------------------------------------------------------------
Если (MajorVersion & MinorVersion)= 51
Tогда "Это ХР"
Иначе "Это НЕ ХР"
КонецЕсли:
------------------------------------------------------------------
------------ Дoбавленo в 16.51:
z80 писал(а):
да вот еще а как координаты то задаются, убей не пойму их формат point1 point2 и т дY * 65536 + X
------------ Дoбавленo в 16.53:
Или компонент:
Add(PointXY,6428150,343,336)
{
}
Пример "записи" в реестр:
Add(MainForm,2953706,91,77)
{
}
Add(ComputerInfo,8518697,154,77)
{
WinInfoMask="%M%m"
AddHint(53,-24,48,13,WinInfoMask)
}
Add(Button,12480912,84,140)
{
Left=35
Top=30
link(onClick,14864906:doCompare,[])
}
Add(If_else,14864906,175,140)
{
Op2=Integer(51)
link(onTrue,15669222:doMessage,[])
link(onFalse,9913461:doMessage,[])
link(Op1,8518697:WinInfo,[])
AddHint(57,-35,27,13,Op2)
}
Add(Message,15669222,294,140)
{
Message="Это ХР
Записать в реестр"
Icon=4
}
Add(Message,9913461,245,147)
{
Message="Это НЕ ХР
Записывать не надо!"
Icon=4
}
Поиск
Друзья
Администрация