На панели, я сделала текстовое окно для ввода имени картинки, окошко для вывода самой картинки и индикатор того что изображение загружено. Я ввожу имя картинки, картинка загружается, но почему-то не выводится в компоненте image (то есть картинку невидно) !
И еще, пожалуйста, подскажите, как сделать, так чтобы не надо было вводить расширение картинки, а только имя. Все картинки находятся в той же папке что и программа, у всех расширение - jpg.
Add(MainForm,3781812,91,210)
{
Width=308
Height=302
Caption="Get_HTTP_Picture"
Position=1
Point(onClose)
}
Add(Edit,15022816,182,217)
{
Left=15
Top=5
Width=270
Text=""
link(onEnter,12685914:doLoad,[(229,230)(229,279)])
}
Add(Image,573628,469,217)
{
Left=15
Top=30
Width=270
Height=195
}
Add(Hub,14802048,329,273)
{
link(onEvent1,573628:doLoad,[(427,279)(427,223)])
link(onEvent2,9726279:doOn,[(378,286)(378,293)])
}
Add(ImageLoader,12685914,266,273)
{
ScaleMode=0
Point(Point1)
link(onLoad,14802048:doEvent1,[])
link(FileName,15022816:Text,[(272,261)(188,261)])
}
Add(LED,9726279,469,273)
{
Left=260
Top=235
ColorOn=65280
ColorOff=8421504
}
Add(Button,1374844,280,210)
{
Left=15
Top=235
Width=240
Height=25
Caption="очистить"
link(onClick,15202665:doEvent1,[])
}
Add(Hub,15202665,336,210)
{
link(onEvent1,573628:doClear,[(403,216)(403,230)])
link(onEvent2,9726279:doOff,[(394,223)(394,286)])
}
Поиск
Друзья
Администрация