Вверх ↑
Ответов: 2278
Рейтинг: 677
#1: 2009-08-04 15:41:42 ЛС | профиль | цитата
A_S_X, не понял что ты хочешь отрисовать и на чем, но рисовать лучше на PaintBox

Add(MainForm,2953706,301,266)
{
Width=870
Height=623
}
Add(Img_Bmp,13848080,448,350)
{
Transparent=0
TransparentColor=16777215
link(Bitmap,10281399:Bitmap,[(454,345)(391,345)])
link(SourceBitmap,5360148:ImageBitmap,[(461,310)(482,310)])
}
Add(PaintBox,10281399,385,238)
{
Left=410
Width=410
Height=500
Color=-16777196
link(onBeforeDraw,13848080:doDraw,[(433,244)(433,356)])
}
Add(Image,5360148,476,238)
{
Left=5
Width=385
Height=500
Color=16777215
TabOrder=-1
WidthScale=1
HeightScale=10
ModeSp=1
Picture=[ZIPB601060078DAEDD6B1AD2A491040D11A07139B10880017099F9C8883404880C0A0196946388CD02060AAFB1CF19C5DFDDD575D75C53F1C2FDD2A1E76E5675B7EF65DC4B9FC74B1E9FFF9A9FCFBEB3AFA9FC10DC869E8377C7C7CB27D9EFB05327DF7EA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF4C2EF4FD0FFA6551B5FEF28FA35F3E6936D77F1CFDCAB6E2FF23FA95AD90F5CB42CAF52BA15FE5AA58BF4843C5FAA59A1C54AC5F2B0823A0DFA4EF6F16F4EB3BCB50FAC55795E9F44BDBE7ED96F4EBEFCC8645BFBE924CAD5F7C13195FBFBE80BC03FA75B45E03FD3A576FA25F1CAA97D1AF13F53EE8D7717A25FDE22CBD957E1D245E4CBF4ED1BBA15F47E8F5F48BF3F386FA75787849FD3A39EFA95F1C9B57D5AF4BC3ABEAD799795BF4EBC0BCB07EF1505E58BF4E0BEFAC5F47E5B5F5AB5F17E5B5F5EB9CF0E6FA75487879FDBA222FAF5FBC8CF7D7AFFBC1FBEBD7F1D802FA753676A15F37835DE8D7C16023FA752AF6A25FBC86BDE8D791603BFA7521D88E7E5D88EDE8D7796047FA751BD8917E1D864DE9D78378049BD2AFABC0A6F4EB24B02FFDBA07FBD2AF63C0D6F4EB12B035FD3A03EC4EBF6EC0EEF4EB06B03BFD3A006C50BFB66F83FAB57AEC51BFF66E4633EAD7DECDA85FFDBA6D33EAD7D28D694CFDDAB8318DA95F1B37A67EF56B4C63EAD7C68D694CFD5AB7494DAA5F576D52FDDAB5494DAA5FBB36A949F56BD1866D7D58FD1AD6B0FAB565C31A56BFB66C58C3EAD78ACDAB5FFB35AF79F56BBFE635AF7EEDD7BCE6D5AF7B36AF7EEDD7BCE6D5AFE51AD9C8FAB55923EBD7668D6C64FDDAAC918DAC5F9B35B291F5EB988DAC5F9B35B291F56BB34636B27E6DD6C8FAD5AF918DAC5F9B35B291F56BB34636B27E1DB391F56BADA636B57EEDD4D4A6D6AF9D9ADAD4FA75C9A6D6AF9D9ADAD4FA5DF04EC3E77F1FFDEAD73791A9F56BA7A636B57EEDD4D4A6D6AF9D9A5ABFFA35B5A9F56BA7A636B57EEDD4D4A6D6AF6336B27E6DD6C846D6AFCD1AD9C8FAB559231B59BF8ED9C8FAB559231B59BF366B6423EBD7668DAC5F9B35B291F56BB34636B27E6DD6C846D6AF6336B27E6DD6C846D6AFE59AD7BCFAB55FF3EA57BFE635AF7EEDD7BCE6D5AFFD9AD7BCFA75CFE6D5AF151BD6B0FAB565C31A56BFB66C58C3EAD7B086D5AF459BD4A4FAB56B939A54BF766D52FDDAB5494DAA5FEB36A631F56BE3C634A67E1DB631F56BE3C634A67E6DDC98C6D4AFA59B51BFFA35A319F56BEFD8A37EED1D7BD4AFD5DBA07E6D1F1BD4AF03C0EEF4EB06D0AF7EF56B77FA7506D89A7E5D02B6A65FC7605FFA750FD8977E9D0436A55F57814DE9D755D8947E1D0676A45FB7811DE9D779D88E7E3D0BB6A35F1782EDE8D791602FFA7527F6A25FA7828DE8D7C16017FA753376A15FEFE36C6C41BF8E07EFAF5FF783F7D7AF13F2F2FAF5507879FD3A24BCB97E9D93D746BF2ECA6BEBD751E19DF5EBB4F0C2FA755D5E58BF38306FAB5F678657D5AF4BF3AAE8D7B1794FFDE2D1BCA47E1D1EDE50BFCECFEBE91747E8DDF4EB14F162FA7590DE0AFD3A4BAFA45F1CA7F7D1AF13F532E8D7A17A13FDEAD7B97A0DFDE268BD837EEB7BE4303EFAF505646AF4EB9BC8B0FAC55792AF5DFD4AD874E8D75F2F0DA55F7C55F9DAD52FCD7C67F9DAD5AF45845F1BFDAAD8AFAA5FA4A15CFD525126CAD52F339289E67F07F42B64D9EA9785841CD9FEE3E89757B9CD88EEC33F8E7EF976D1131FF40BE817D02FE817D02FA05F40BFA05F40BF807E41BFFA05FD02FA05F40BFA05F40BE817D02FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F43BF6EBE3E393EB33F60B24FC0E8EB803AB8E899A]
Point(Handle)
}


И обрати внимание что Image хоть и растягивает изображение при отображении, но в Bitmap выдает оригинал.
Или приблизительно так:
Add(MainForm,2953706,301,266)
{
Width=870
Height=623
}
Add(Image,5360148,392,238)
{
Left=5
Width=385
Height=500
Color=16777215
TabOrder=-1
WidthScale=1
HeightScale=10
ModeSp=1
Picture=[ZIPB601060078DAEDD6B1AD2A491040D11A07139B10880017099F9C8883404880C0A0196946388CD02060AAFB1CF19C5DFDDD575D75C53F1C2FDD2A1E76E5675B7EF65DC4B9FC74B1E9FFF9A9FCFBEB3AFA9FC10DC869E8377C7C7CB27D9EFB05327DF7EA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF4C2EF4FD0FFA6551B5FEF28FA35F3E6936D77F1CFDCAB6E2FF23FA95AD90F5CB42CAF52BA15FE5AA58BF4843C5FAA59A1C54AC5F2B0823A0DFA4EF6F16F4EB3BCB50FAC55795E9F44BDBE7ED96F4EBEFCC8645BFBE924CAD5F7C13195FBFBE80BC03FA75B45E03FD3A576FA25F1CAA97D1AF13F53EE8D7717A25FDE22CBD957E1D245E4CBF4ED1BBA15F47E8F5F48BF3F386FA75787849FD3A39EFA95F1C9B57D5AF4BC3ABEAD799795BF4EBC0BCB07EF1505E58BF4E0BEFAC5F47E5B5F5AB5F17E5B5F5EB9CF0E6FA75487879FDBA222FAF5FBC8CF7D7AFFBC1FBEBD7F1D802FA753676A15F37835DE8D7C16023FA752AF6A25FBC86BDE8D791603BFA7521D88E7E5D88EDE8D7796047FA751BD8917E1D864DE9D78378049BD2AFABC0A6F4EB24B02FFDBA07FBD2AF63C0D6F4EB12B035FD3A03EC4EBF6EC0EEF4EB06B03BFD3A006C50BFB66F83FAB57AEC51BFF66E4633EAD7DECDA85FFDBA6D33EAD7D28D694CFDDAB8318DA95F1B37A67EF56B4C63EAD7C68D694CFD5AB7494DAA5F576D52FDDAB5494DAA5FBB36A949F56BD1866D7D58FD1AD6B0FAB565C31A56BFB66C58C3EAD78ACDAB5FFB35AF79F56BBFE635AF7EEDD7BCE6D5AF7B36AF7EEDD7BCE6D5AFE51AD9C8FAB55923EBD7668D6C64FDDAAC918DAC5F9B35B291F5EB988DAC5F9B35B291F56BB34636B27E6DD6C8FAD5AF918DAC5F9B35B291F56BB34636B27E1DB391F56BADA636B57EEDD4D4A6D6AF9D9ADAD4FA75C9A6D6AF9D9ADAD4FA5DF04EC3E77F1FFDEAD73791A9F56BA7A636B57EEDD4D4A6D6AF9D9A5ABFFA35B5A9F56BA7A636B57EEDD4D4A6D6AF6336B27E6DD6C846D6AFCD1AD9C8FAB559231B59BF8ED9C8FAB559231B59BF366B6423EBD7668DAC5F9B35B291F56BB34636B27E6DD6C846D6AF6336B27E6DD6C846D6AFE59AD7BCFAB55FF3EA57BFE635AF7EEDD7BCE6D5AFFD9AD7BCFA75CFE6D5AF151BD6B0FAB565C31A56BFB66C58C3EAD7B086D5AF459BD4A4FAB56B939A54BF766D52FDDAB5494DAA5FEB36A631F56BE3C634A67E1DB631F56BE3C634A67E6DDC98C6D4AFA59B51BFFA35A319F56BEFD8A37EED1D7BD4AFD5DBA07E6D1F1BD4AF03C0EEF4EB06D0AF7EF56B77FA7506D89A7E5D02B6A65FC7605FFA750FD8977E9D0436A55F57814DE9D755D8947E1D0676A45FB7811DE9D779D88E7E3D0BB6A35F1782EDE8D791602FFA7527F6A25FA7828DE8D7C16017FA753376A15FEFE36C6C41BF8E07EFAF5FF783F7D7AF13F2F2FAF5507879FD3A24BCB97E9D93D746BF2ECA6BEBD751E19DF5EBB4F0C2FA755D5E58BF38306FAB5F678657D5AF4BF3AAE8D7B1794FFDE2D1BCA47E1D1EDE50BFCECFEBE91747E8DDF4EB14F162FA7590DE0AFD3A4BAFA45F1CA7F7D1AF13F532E8D7A17A13FDEAD7B97A0DFDE268BD837EEB7BE4303EFAF505646AF4EB9BC8B0FAC55792AF5DFD4AD874E8D75F2F0DA55F7C55F9DAD52FCD7C67F9DAD5AF45845F1BFDAAD8AFAA5FA4A15CFD525126CAD52F339289E67F07F42B64D9EA9785841CD9FEE3E89757B9CD88EEC33F8E7EF976D1131FF40BE817D02FE817D02FA05F40BFA05F40BF807E41BFFA05FD02FA05F40BFA05F40BE817D02FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F43BF6EBE3E393EB33F60B24FC0E8EB803AB8E899A]
Point(Handle)
}
Add(Img_Bmp,13848080,448,350)
{
Transparent=0
TransparentColor=16777215
link(onDraw,10281399:doRefresh,[(492,356)(492,290)(436,290)(436,223)])
link(Bitmap,10281399:Bitmap,[])
}
Add(PaintBox,10281399,448,217)
{
Left=410
Width=410
Height=500
Color=-16777196
}
Add(ScreenShort,16100733,399,350)
{
link(onCapture,13848080:doDraw,[])
link(Handle,5360148:Handle,[])
}
Add(Button,15419950,287,350)
{
Left=325
Top=515
link(onClick,16100733:doCapture,[])
}



карма: 11

0