Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

мне не нужно размножение битмапа!!! (как это убрать?)

289
26 февраля 2002 года
Jeyson
207 / / 20.04.2000
Доброго вам времени суток, уважаемые компьютерные гении и не только гении
Вопрос такой. Пишу прогу:

Graphics::TBitmap *Bitmap;
TRect MyRect, MyOther;

MyRect =Rect(0,0,SizeX,SizeY);
MyOther = Rect(0,0,SizeX,SizeY);
Bitmap=new Graphics::TBitmap;
Bitmap->LoadFromFile("net.bmp");
Form2->Canvas->BrushCopy (MyRect,Bitmap,
MyRect, clBlack);
Form2->Canvas->CopyRect(MyOther,
Bitmap->Canvas,MyRect);

delete Bitmap;

Короче происходит копирование картинки на канву формы. Задаем вертикальной и горизантальной полосам прокрутки свойство Range(если не ошибаюсь) большее чем клиентская область формы, т.е. полосы прокрутки появляются. Далее копируем рисунок (net.bmp) на канву формы. Он появляется, и вроде живи и радуйся, НО СТОП(!)... не все так безоблачно при прокрутке скролинга эта картинка начинает размножаться (не полностью, но ее отдельные части), хотя она и занимает всю клиентскую область формы. Такое впечатление, что она не перерисовывается. Выше приведенный код ставил и в обработчик OnPaint() формы - безрезультатно. Помогите плз...
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог