Показать сообщение отдельно
Старый 17.01.2011, 23:56   #1
Sora_Musoka
AnyKey`щик
 
Регистрация: 07.01.2011
Сообщений: 7
Написано 0 полезных сообщений
(для 0 пользователей)
Проблема с быстрым перемещением Изображения

Задача: цепляем изображение Курсором и перетаскиваем.
Проблема: Image отстает при "быстром" перемещении курсора, а если сказать точнее - нужно передвигать оооочень аккуратно.

Кто знает как решить проблему?

Вот простой пример:

Graphics 800, 600

SetBuffer BackBuffer() 
HidePointer

Global cursor=LoadImage("cursor.png")
Global image=LoadImage("image.jpg")
Global x = 400
Global y = 300

Repeat

If ImagesOverlap (cursor , MouseX(), MouseY(), image, x, y) And MouseDown(1) Then
	x = MouseX()
	y = MouseY() 
EndIf

Cls
DrawImage image, x, y
DrawImage cursor, MouseX(), MouseY()

Flip	
Until KeyHit(1)
End
Вложения
Тип файла: rar imageMove.rar (5.9 Кб, 518 просмотров)
(Offline)
 
Ответить с цитированием