Вверх ↑
Ответов: 2201
Рейтинг: 675
#1: 2020-01-07 15:01:51 ЛС | профиль | цитата
Aziz писал(а):
Windows 8.1, а у вас?
ХР и 7 работает и там и там.
Aziz писал(а):
sla8a, может скинете ваш компонент АльфаРесайз ?
У меня стандартный, без каких либо изменений. Сверьте свои:
http://svn.hiasm.com/packs/delphi/code/hiAlphaResize.pas
http://svn.hiasm.com/packs/delphi/code/hiAlphaBitMap.pas
http://svn.hiasm.com/packs/delphi/code/hiAlphaImage.pas
Aziz писал(а):
Что вам еще скинуть для исследования?
Что в окне debug написано в тестовой схеме (картинку вставьте ту что была)?
Тестовая схема

Add(MainForm,2953706,357,315)
{
link(onCreate,16247686:doOperation,[])
}
Add(AlphaResize,15701769,504,329)
{
Point(Result)
link(onResize,16240803:doEvent,[])
link(Bitmap,7194979:Var,[])
link(Width,16247686:Result,[(517,317)(479,317)(479,373)(440,373)])
link(Height,98738:Height,[])
}
Add(AlphaBitmap,98738,504,217)
{
HWidth=100
HHeight=100
Point(Width)
Point(Height)
Point(doCreate)
Point(HWidth)
Point(HHeight)
}
Add(AlphaImage,9384519,574,329)
{
Width=384
Height=261
Align=5
Color=0
AlphaBlendValue=128
AlphaMode=1
Point(Width)
Point(Height)
Point(doRefresh)
Point(ImageWidth)
Point(ImageHeight)
Point(onResize)
}
Add(Math,16247686,434,329)
{
OpType=1
Op2=10
Default=200
link(onResult,15701769:doResize,[])
link(Op1,98738:Width,[(440,261)(517,261)])
}
Add(Debug,7194979,504,273)
{
WEName=""
VDName="AlphaBitmap"
link(Data,98738:Bitmap,[])
}
Add(Debug,16240803,546,329)
{
WEName="AlphaResize"
VDName=""
link(onEvent,9384519:doLoad,[])
}
карма: 11

0
Редактировалось 1 раз(а), последний 2020-01-07 15:03:21