Вверх ↑
Главный модератор
Ответов: 2998
Рейтинг: 396
#1: 2013-11-10 03:29:03 ЛС | профиль | цитата
Добавлен компонент MyCRC, повторяющий функционал аналогичного компонента из пакета Windows.
sha

Add(EntryPoint,7034699,105,49)
{
Width=304
Height=154
}
Add(Button,16420334,105,91)
{
Left=110
Top=10
Text="Calc"
Point(onClick)
link(onClick,3893621:doCalcCRC,[])
AddHint(-56,9,36,13,Text)
}
Add(TextBox,9780067,154,49)
{
Left=10
Top=50
Width=255
Text="01030F000000"
Lines=[]
TextAlign=2
Point(doText)
Point(Text)
Point(data)
}
Add(Label,15671000,203,91)
{
Left=10
Top=90
Width=255
Height=18
Point(doText)
Point(onClick)
}
Add(MyCRC,3893621,154,91)
{
Type=1
Polynomial="0xA001"
Initial="0xFFFF"
link(onCalcCRC,15671000:doText,[])
link(Data,9780067:Text,[])
}
карма: 6
Дорогу осилит идущий. Install/Update HiAsm.NET
0