------------ Дoбавленo в 15.48:
Вот код, но всё ровно не как... Что-то вообще не чего не пойму. Вот даже просто jpg-bmp он же должен его отобразить по идее но он даже это не делает... Почему так?
Add(MainForm,2953706,182,210)
{
Width=679
Height=635
}
Add(Button,7013342,182,273)
{
Left=10
Top=10
Width=70
Caption="Загрузка"
link(onClick,10509629:doExecute,[])
}
Add(Image,4346806,385,273)
{
Left=10
Top=35
Width=170
Height=220
}
Add(PictureStream,7175412,329,329)
{
link(onLoad,4346806:doLoad,[(376,335)(376,279)])
link(FileName,5794065:Text,[])
}
Add(ODialog,10509629,231,273)
{
link(onExecute,10009146:doEvent1,[])
}
Add(Edit,5794065,329,168)
{
Left=90
Top=10
Width=330
Text=""
link(onChange,9209894:doEvent1,[(377,174)(377,209)])
}
Add(Hub,9209894,392,203)
{
InCount=2
link(onEvent1,7175412:doLoad,[(447,209)(447,244)(317,244)(317,335)])
link(onEvent2,13002578:doLoad,[(441,216)(441,279)])
}
Add(Jpeg,13002578,476,273)
{
Point(doLoadFromBitmap)
link(onBitmap,16144640:doLoad,[])
}
Add(Button,5315992,385,322)
{
Left=185
Top=35
Caption="Конверт"
link(onClick,13002578:doLoadFromBitmap,[(447,328)(447,293)])
}
Add(Hub,10009146,280,273)
{
link(onEvent1,5794065:doText,[(303,279)(303,174)])
link(onEvent2,9209894:doEvent2,[(343,286)(343,216)])
}
Add(AlphaImage,16144640,539,273)
{
Left=245
Top=65
Width=220
Height=185
Point(onPaint)
Point(doRefresh)
}
Вот что-то получилось... Но картинка не такая, вся светлая и не понятная... Как исправить?
Add(MainForm,2953706,182,210)
{
Width=1029
Height=954
}
Add(Button,7013342,182,273)
{
Left=10
Top=10
Width=70
Caption="Загрузка"
link(onClick,10509629:doExecute,[])
}
Add(Image,4346806,385,273)
{
Left=10
Top=35
Width=170
Height=220
}
Add(PictureStream,7175412,329,329)
{
link(onLoad,4346806:doLoad,[(376,335)(376,279)])
link(FileName,5794065:Text,[])
}
Add(ODialog,10509629,231,273)
{
link(onExecute,10009146:doEvent1,[])
}
Add(Edit,5794065,329,168)
{
Left=90
Top=10
Width=330
Text=""
link(onChange,9209894:doEvent1,[(377,174)(377,209)])
}
Add(Hub,9209894,392,203)
{
InCount=2
OutCount=3
link(onEvent1,7175412:doLoad,[(447,209)(447,244)(317,244)(317,335)])
link(onEvent2,13002578:doLoad,[(441,216)(441,279)])
link(onEvent3,13002578:doBitmap,[(432,223)(432,293)])
}
Add(Jpeg,13002578,476,273)
{
Quality=100
Point(doBitmap)
link(onBitmap,14449386:doEvent1,[])
}
Add(Button,5315992,385,322)
{
Left=185
Top=35
Caption="Конверт"
}
Add(Hub,10009146,280,273)
{
link(onEvent1,5794065:doText,[(303,279)(303,174)])
link(onEvent2,9209894:doEvent2,[(343,286)(343,216)])
}
Add(AlphaImage,16144640,609,273)
{
Left=245
Top=65
Width=675
Height=820
Point(onPaint)
Point(doRefresh)
}
Add(Hub,14449386,525,273)
{
link(onEvent1,16144640:doLoad,[])
link(onEvent2,13002578:doSave,[(548,286)(548,240)(466,240)(466,286)])
}
Так ну вот вроде всё нормально конвертирует в bmp...
Add(MainForm,2953706,182,168)
{
Width=1029
Height=954
}
Add(Button,7013342,182,273)
{
Left=10
Top=10
Width=70
Caption="Загрузка"
link(onClick,10509629:doExecute,[])
}
Add(Image,4346806,385,273)
{
Left=10
Top=35
Width=170
Height=220
}
Add(PictureStream,7175412,329,322)
{
link(onLoad,4346806:doLoad,[(376,328)(376,279)])
link(FileName,5794065:Text,[])
}
Add(ODialog,10509629,231,273)
{
link(onExecute,10009146:doEvent1,[])
}
Add(Edit,5794065,329,168)
{
Left=90
Top=10
Width=330
Text=""
link(onChange,9209894:doEvent1,[(377,174)(377,209)])
}
Add(Hub,9209894,392,203)
{
InCount=2
OutCount=3
link(onEvent1,7175412:doLoad,[(451,209)(451,230)(310,230)(310,328)])
link(onEvent2,13002578:doLoad,[(440,216)(440,286)])
link(onEvent3,13002578:doBitmap,[(430,223)(430,300)])
}
Add(Jpeg,13002578,602,280)
{
Quality=100
Point(doBitmap)
link(onBitmap,14449386:doEvent1,[])
}
Add(Button,5315992,385,322)
{
Left=185
Top=35
Caption="Конверт"
}
Add(Hub,10009146,273,273)
{
link(onEvent1,5794065:doText,[(300,279)(300,174)])
link(onEvent2,9209894:doEvent2,[(340,286)(340,216)])
}
Add(Hub,14449386,679,280)
{
link(onEvent1,16632248:doLoad,[])
link(onEvent2,8171712:doWork1,[(716,293)(716,240)(592,240)])
}
Add(HubEx,8171712,588,252)
{
Angle=1
link(onEvent,13002578:doSave,[(592,293)])
}
Add(Image,16632248,770,280)
{
Left=250
Top=35
Width=170
Height=225
}
Add(PictureStream,13010657,763,343)
{
link(Bitmap,16632248:ImageBitmap,[])
}
Add(Button,13486676,623,399)
{
Left=430
Top=10
link(onClick,11830212:doExecute,[])
}
Add(SDialog,11830212,679,399)
{
Filter="bmp|*bmp"
link(onExecute,13010657:doSave,[(737,405)(737,356)])
}
Поиск
Друзья
Администрация