Вверх ↑
Ответов: 207
Рейтинг: 14
#1: 2021-01-26 12:34:04 ЛС | профиль | цитата
Netspirit, Странно, но у меня без исправления схема из примера работает без ошибок. 32, 64, 32U, 64U

Add(MainForm,9775816,294,175)
{
 Width=404
 Height=351
 Color=10789024
}
Add(Image,15497265,539,126)
{
 Left=5
 Top=5
 Width=385
 Height=275
}
Add(Button,10549840,294,133)
{
 Left=135
 Top=290
 Width=120
 TabOrder=-1
 Caption="Загрузить png"
 link(onClick,8644631:doEvent1,[])
}
Add(PNG,14345186,476,154)
{
 Point(doBitmap)
 link(onBitmap,15497265:doLoad,[(520,160)(520,132)])
}
Add(Hub,8644631,357,133)
{
 link(onEvent1,15497265:doClear,[])
 link(onEvent2,13387288:doExecute,[(381,146)(381,160)])
}
Add(Hub,11952692,441,154)
{
 link(onEvent1,14345186:doLoad,[])
 link(onEvent2,14345186:doBitmap,[(465,167)(465,174)])
}
Add(ODialog,13387288,392,154)
{
 Filter="Файлы *.png|*.png"
 link(onExecute,11952692:doEvent1,[])
}
карма: 2

0