inter1 писал(а):
...- три бочки арестантов.
На самом деле получается несколько вопросов и мало чем связанных.
Может в твоей задаче они связанны, но по сути это отдельные вопросы.
Чем писать статью о том как всё тяжело даётся, лучше упорядочить возникшие вопросы.
1, То-то то-то...
2.
inter1 писал(а):
Если я загружаю gif не из HiAsm, а уже в программе, то прозрачности уже нетВ свободном переводе на русский - Как сделать картинку с альфа-каналом?
Add(MainForm,1065314,182,112)
{
Width=558
Height=341
}
Add(ODialog,1561105,245,63)
{
Filter="(*.bmp)|*.bmp|(*.png)|*.png|(*,ico)|*.ico|(*.*)|*.*"
Select=1
link(onExecute,8858747:doLoad,[])
}
Add(AlphaImage,8165564,406,63)
{
Left=10
Top=10
Width=256
Height=256
Color=0
}
Add(AlphaImage,815084,539,161)
{
Left=275
Top=10
Width=256
Height=256
Color=0
}
Add(Button,5934433,182,63)
{
Left=210
Top=275
TabOrder=-1
Caption="Load"
link(onClick,1561105:doExecute,[])
}
Add(Img_Loader,8858747,301,63)
{
link(onLoad,11250079:doEvent1,[])
}
Add(Hub,11250079,357,63)
{
OutCount=3
link(onEvent1,8165564:doLoad,[])
link(onEvent2,4290423:doData,[(396,76)(396,146)])
link(onEvent3,1912327:doAlphaBitmap,[(389,83)(389,181)])
}
Add(PNG,1912327,476,154)
{
Transparent=0
Point(doLoadFromBitmap)
Point(doAlphaBitmap)
Point(onAlphaBitmap)
link(onAlphaBitmap,815084:doLoad,[])
}
Add(Button,4588613,399,224)
{
Left=275
Top=275
TabOrder=-1
Caption="Save"
link(onClick,8602752:doExecute,[])
}
Add(DoData,4290423,406,140)
{
link(onEventData,1912327:doLoadFromBitmap,[(466,146)(466,174)])
link(Data,8165564:ImageBitmap,[])
}
Add(SDialog,8602752,476,224)
{
Filter="BMP Files (*.bmp)|*.bmp"
link(onExecute,11971268:doSave,[])
}
Add(PictureStream,11971268,532,217)
{
link(Bitmap,815084:ImageBitmap,[])
}
Поиск
Друзья
Администрация