Вверх ↑
Этот топик читают: Гость
Ответов: 184
Рейтинг: 0
#1: 2009-08-07 17:39:38 ЛС | профиль | цитата
Подскажите как убрать мерцание при передвижении картинкиcode_14509.txt
карма: 0

0
файлы: 1code_14509.txt [4.4KB] [142]
Ответов: 7
Рейтинг: 0
#2: 2009-08-07 18:34:30 ЛС | профиль | цитата
Так вроде не мерцает...а че за заготовка...к игрушке?



Add(MainForm,8886707,203,245)
{
Width=662
Height=649
link(onCreate,13702553:doWork2,[(270,266)(288,266)])
}
Add(Image,84451,311,140)
{
Left=10
Top=8
Width=630
Height=505
HalfTone=1
Point(Handle)
Point(Width)
Point(Height)
Point(onMouseDown)
Point(onMouseUp)
Point(onMove)
link(onMouseDown,14698:doMove,[(375,153)(375,335)])
link(onMove,13702553:doWork3,[(357,167)(357,188)(291,188)])
}
Add(Bitmap,10499811,430,168)
{
Picture=[ZIPB601060078DAEDD6B1AD2A491040D11A07139B10880017099F9C8883404880C0A0196946388CD02060AAFB1CF19C5DFDDD575D75C53F1C2FDD2A1E76E5675B7EF65DC4B9FC74B1E9FFF9A9FCFBEB3AFA9FC10DC869E8377C7C7CB27D9EFB05327DF7EA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF4C2EF4FD0FFA6551B5FEF28FA35F3E6936D77F1CFDCAB6E2FF23FA95AD90F5CB42CAF52BA15FE5AA58BF4843C5FAA59A1C54AC5F2B0823A0DFA4EF6F16F4EB3BCB50FAC55795E9F44BDBE7ED96F4EBEFCC8645BFBE924CAD5F7C13195FBFBE80BC03FA75B45E03FD3A576FA25F1CAA97D1AF13F53EE8D7717A25FDE22CBD957E1D245E4CBF4ED1BBA15F47E8F5F48BF3F386FA75787849FD3A39EFA95F1C9B57D5AF4BC3ABEAD799795BF4EBC0BCB07EF1505E58BF4E0BEFAC5F47E5B5F5AB5F17E5B5F5EB9CF0E6FA75487879FDBA222FAF5FBC8CF7D7AFFBC1FBEBD7F1D802FA753676A15F37835DE8D7C16023FA752AF6A25FBC86BDE8D791603BFA7521D88E7E5D88EDE8D7796047FA751BD8917E1D864DE9D78378049BD2AFABC0A6F4EB24B02FFDBA07FBD2AF63C0D6F4EB12B035FD3A03EC4EBF6EC0EEF4EB06B03BFD3A006C50BFB66F83FAB57AEC51BFF66E4633EAD7DECDA85FFDBA6D33EAD7D28D694CFDDAB8318DA95F1B37A67EF56B4C63EAD7C68D694CFD5AB7494DAA5F576D52FDDAB5494DAA5FBB36A949F56BD1866D7D58FD1AD6B0FAB565C31A56BFB66C58C3EAD78ACDAB5FFB35AF79F56BBFE635AF7EEDD7BCE6D5AF7B36AF7EEDD7BCE6D5AFE51AD9C8FAB55923EBD7668D6C64FDDAAC918DAC5F9B35B291F5EB988DAC5F9B35B291F56BB34636B27E6DD6C8FAD5AF918DAC5F9B35B291F56BB34636B27E1DB391F56BADA636B57EEDD4D4A6D6AF9D9ADAD4FA75C9A6D6AF9D9ADAD4FA5DF04EC3E77F1FFDEAD73791A9F56BA7A636B57EEDD4D4A6D6AF9D9A5ABFFA35B5A9F56BA7A636B57EEDD4D4A6D6AF6336B27E6DD6C846D6AFCD1AD9C8FAB559231B59BF8ED9C8FAB559231B59BF366B6423EBD7668DAC5F9B35B291F56BB34636B27E6DD6C846D6AF6336B27E6DD6C846D6AFE59AD7BCFAB55FF3EA57BFE635AF7EEDD7BCE6D5AFFD9AD7BCFA75CFE6D5AF151BD6B0FAB565C31A56BFB66C58C3EAD7B086D5AF459BD4A4FAB56B939A54BF766D52FDDAB5494DAA5FEB36A631F56BE3C634A67E1DB631F56BE3C634A67E6DDC98C6D4AFA59B51BFFA35A319F56BEFD8A37EED1D7BD4AFD5DBA07E6D1F1BD4AF03C0EEF4EB06D0AF7EF56B77FA7506D89A7E5D02B6A65FC7605FFA750FD8977E9D0436A55F57814DE9D755D8947E1D0676A45FB7811DE9D779D88E7E3D0BB6A35F1782EDE8D791602FFA7527F6A25FA7828DE8D7C16017FA753376A15FEFE36C6C41BF8E07EFAF5FF783F7D7AF13F2F2FAF5507879FD3A24BCB97E9D93D746BF2ECA6BEBD751E19DF5EBB4F0C2FA755D5E58BF38306FAB5F678657D5AF4BF3AAE8D7B1794FFDE2D1BCA47E1D1EDE50BFCECFEBE91747E8DDF4EB14F162FA7590DE0AFD3A4BAFA45F1CA7F7D1AF13F532E8D7A17A13FDEAD7B97A0DFDE268BD837EEB7BE4303EFAF505646AF4EB9BC8B0FAC55792AF5DFD4AD874E8D75F2F0DA55F7C55F9DAD52FCD7C67F9DAD5AF45845F1BFDAAD8AFAA5FA4A15CFD525126CAD52F339289E67F07F42B64D9EA9785841CD9FEE3E89757B9CD88EEC33F8E7EF976D1131FF40BE817D02FE817D02FA05F40BFA05F40BF807E41BFFA05FD02FA05F40BFA05F40BE817D02FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F43BF6EBE3E393EB33F60B24FC0E8EB803AB8E899A]
}
Add(Img_Bmp,15018464,318,308)
{
X=1
Y=1
DrawSource=1
Transparent=0
TransparentColor=16777215
link(Bitmap,16029144:Var2,[(324,275)])
link(SourceBitmap,1232528:Var1,[(331,278)])
}
Add(Timer,4262016,227,308)
{
Interval=0
AutoStop=1
OverCall=1
link(onTimer,15018464:doDraw,[])
}
Add(InfoTip,2964194,297,210)
{
Info=#0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|15:Отрисовка сетки|
Width=148
Height=165
}
Add(MoveWindow,14698,462,329)
{
link(Handle,16029144:Var3,[(468,271)])
}
Add(GetDataEx,16029144,315,266)
{
link(Data,84451:Handle,[(324,266)])
}
Add(HubEx,13702553,287,259)
{
}
Add(GetDataEx,1232528,385,273)
{
Angle=1
link(Data,10499811:Bitmap,[(436,278)])
}

карма: 1

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#3: 2009-08-07 18:36:11 ЛС | профиль | цитата
Android, учимся пользоватся тэгами code
карма: 22

0
Ответов: 7
Рейтинг: 0
#4: 2009-08-07 18:39:11 ЛС | профиль | цитата
и как..? первый раз не в курсе я нажал добавить файл...пишет нету прав
карма: 1

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#5: 2009-08-07 19:01:19 ЛС | профиль | цитата
Android писал(а):
и как..? первый раз не в курсе

Обмен файлами
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#6: 2009-08-07 20:30:38 ЛС | профиль | цитата
nesco, а если выделил часть текста и хочу изменить цвет - не подскажешь как без танцев
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#7: 2009-08-07 20:49:49 ЛС | профиль | цитата
Tad, если в коде, то понятия не имею, как там цвет меняют
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#8: 2009-08-07 20:52:51 ЛС | профиль | цитата
Нет, в обыкновенном тексте.

Вот выделил слово "обыкновенном", хотел сделать красным, а тэги улетели чорт те куда
(нажми "Правка" - увидишь тэги)
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#9: 2009-08-07 20:57:53 ЛС | профиль | цитата
Да нет, нормально делаются
------------ Дoбавленo в 20.59:
У тебя я проверил. Выделил весь текст и выбрал цвет, все сработало без проблем
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#10: 2009-08-07 21:07:13 ЛС | профиль | цитата
nesco, У тебя IE
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#11: 2009-08-07 23:13:20 ЛС | профиль | цитата
Tad писал(а):
У тебя IE

Нет, Opera
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#12: 2009-08-07 23:28:01 ЛС | профиль | цитата
Понятно.
У меня IE8
Кроме Color, все остальное работает нормально.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Гость
Ответов: 17029
Рейтинг: 0
#13: 2009-08-08 08:39:13 правка | ЛС | профиль | цитата


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

0
Администрация
Ответов: 15295
Рейтинг: 1519
#14: 2009-08-08 11:36:02 ЛС | профиль | цитата
правильно делать так, как сделано тут
http://dev.hiasm.com/forum.html?q=3&t=51445
карма: 26
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#15: 2009-08-08 13:21:02 ЛС | профиль | цитата
Специально для таких целей я сделал компонент RGN_OutlinePicture (если кто создавал форму по рисунку, тот знает, как это выглядит). Так вот, теперь, с помощью него, любой контрол можно обрезать по контуру любого рисунка
[svn]RGN_OutlinePicture.pas[/svn]

А вот схема A_S_X с использованием этого компонента



Add(MainForm,9980148,126,301)
{
Width=662
Height=649
link(onCreate,14787156:doTimer,[])
}
Add(Image,84451,224,217)
{
Left=10
Top=8
Width=630
Height=505
Visible=1
AutoSize=0
ViewStyle=4
Picture=[ZIPB601060078DAEDD6B1AD2A491040D11A07139B10880017099F9C8883404880C0A0196946388CD02060AAFB1CF19C5DFDDD575D75C53F1C2FDD2A1E76E5675B7EF65DC4B9FC74B1E9FFF9A9FCFBEB3AFA9FC10DC869E8377C7C7CB27D9EFB05327DF7EA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F4EB3940BF807E01FD827E01FD02FA05FDEA17F40BE817D02FE817D02FA05F40BFA05F40BF807E41BF807E01FD02FA05FD02FA05F40BFAD52FE817D02FA05FD02FA05F40BF4C2EF4FD0FFA6551B5FEF28FA35F3E6936D77F1CFDCAB6E2FF23FA95AD90F5CB42CAF52BA15FE5AA58BF4843C5FAA59A1C54AC5F2B0823A0DFA4EF6F16F4EB3BCB50FAC55795E9F44BDBE7ED96F4EBEFCC8645BFBE924CAD5F7C13195FBFBE80BC03FA75B45E03FD3A576FA25F1CAA97D1AF13F53EE8D7717A25FDE22CBD957E1D245E4CBF4ED1BBA15F47E8F5F48BF3F386FA75787849FD3A39EFA95F1C9B57D5AF4BC3ABEAD799795BF4EBC0BCB07EF1505E58BF4E0BEFAC5F47E5B5F5AB5F17E5B5F5EB9CF0E6FA75487879FDBA222FAF5FBC8CF7D7AFFBC1FBEBD7F1D802FA753676A15F37835DE8D7C16023FA752AF6A25FBC86BDE8D791603BFA7521D88E7E5D88EDE8D7796047FA751BD8917E1D864DE9D78378049BD2AFABC0A6F4EB24B02FFDBA07FBD2AF63C0D6F4EB12B035FD3A03EC4EBF6EC0EEF4EB06B03BFD3A006C50BFB66F83FAB57AEC51BFF66E4633EAD7DECDA85FFDBA6D33EAD7D28D694CFDDAB8318DA95F1B37A67EF56B4C63EAD7C68D694CFD5AB7494DAA5F576D52FDDAB5494DAA5FBB36A949F56BD1866D7D58FD1AD6B0FAB565C31A56BFB66C58C3EAD78ACDAB5FFB35AF79F56BBFE635AF7EEDD7BCE6D5AF7B36AF7EEDD7BCE6D5AFE51AD9C8FAB55923EBD7668D6C64FDDAAC918DAC5F9B35B291F5EB988DAC5F9B35B291F56BB34636B27E6DD6C8FAD5AF918DAC5F9B35B291F56BB34636B27E1DB391F56BADA636B57EEDD4D4A6D6AF9D9ADAD4FA75C9A6D6AF9D9ADAD4FA5DF04EC3E77F1FFDEAD73791A9F56BA7A636B57EEDD4D4A6D6AF9D9A5ABFFA35B5A9F56BA7A636B57EEDD4D4A6D6AF6336B27E6DD6C846D6AFCD1AD9C8FAB559231B59BF8ED9C8FAB559231B59BF366B6423EBD7668DAC5F9B35B291F56BB34636B27E6DD6C846D6AF6336B27E6DD6C846D6AFE59AD7BCFAB55FF3EA57BFE635AF7EEDD7BCE6D5AFFD9AD7BCFA75CFE6D5AF151BD6B0FAB565C31A56BFB66C58C3EAD7B086D5AF459BD4A4FAB56B939A54BF766D52FDDAB5494DAA5FEB36A631F56BE3C634A67E1DB631F56BE3C634A67E6DDC98C6D4AFA59B51BFFA35A319F56BEFD8A37EED1D7BD4AFD5DBA07E6D1F1BD4AF03C0EEF4EB06D0AF7EF56B77FA7506D89A7E5D02B6A65FC7605FFA750FD8977E9D0436A55F57814DE9D755D8947E1D0676A45FB7811DE9D779D88E7E3D0BB6A35F1782EDE8D791602FFA7527F6A25FA7828DE8D7C16017FA753376A15FEFE36C6C41BF8E07EFAF5FF783F7D7AF13F2F2FAF5507879FD3A24BCB97E9D93D746BF2ECA6BEBD751E19DF5EBB4F0C2FA755D5E58BF38306FAB5F678657D5AF4BF3AAE8D7B1794FFDE2D1BCA47E1D1EDE50BFCECFEBE91747E8DDF4EB14F162FA7590DE0AFD3A4BAFA45F1CA7F7D1AF13F532E8D7A17A13FDEAD7B97A0DFDE268BD837EEB7BE4303EFAF505646AF4EB9BC8B0FAC55792AF5DFD4AD874E8D75F2F0DA55F7C55F9DAD52FCD7C67F9DAD5AF45845F1BFDAAD8AFAA5FA4A15CFD525126CAD52F339289E67F07F42B64D9EA9785841CD9FEE3E89757B9CD88EEC33F8E7EF976D1131FF40BE817D02FE817D02FA05F40BFA05F40BF807E41BFFA05FD02FA05F40BFA05F40BE817D02FE817D02FA05FD02FA05F40BF807E41BF807E01FD827E01FD02FA05F40BFA05F40BE817F43BF6EBE3E393EB33F60B24FC0E8EB803AB8E899A]
HalfTone=1
Point(Handle)
Point(onMouseDown)
Point(onMouseUp)
Point(onMove)
Point(doVisible)
link(onMouseDown,14698:doMove,[(330,230)(330,314)])
}
Add(MoveWindow,14698,343,308)
{
link(Handle,12513148:Var3,[(349,286)])
}
Add(RGN_OutlinePicture,12271944,224,308)
{
Point(doPicture)
link(onOutlinePicture,4035968:doSetRegion,[])
link(SrcBitmap,84451:ImageBitmap,[])
}
Add(RGN_SetToWindow,4035968,273,308)
{
link(onSetRegion,84451:doVisible,[(318,314)(318,204)(208,204)(208,237)])
link(Handle,12513148:Var2,[])
}
Add(GetDataEx,12513148,273,281)
{
Angle=3
link(Data,84451:Handle,[(237,286)])
}
Add(Timer,14787156,175,315)
{
Interval=25
Enable=1
AutoStop=1
link(onTimer,12271944:doPicture,[])
}

карма: 22

2
Голосовали:Assasin, Konst
Сообщение
...
Прикрепленные файлы
(файлы не залиты)