Цитата:
|
Сообщение от Demonuka
Есть форма (Form1), на ней панель (Panel1), на панели картинка, загруженная в имэйдж (Image1). Задача- таскать имэйдж по панели. Для этого пересчитываю координаты имэйджа:
И не работает...  |
И правильно что не работает. Координаты получаете в системе Form1 и вызываете TForm1.ClientToParent. Т.е. переводите их в систему родителя Form1. А нужно в систему Panel1.
В таких случаях лучше вызывать сначала Form1.ClientToScreen, а затем Image1.Parent.ScreenToClient. И получите координаты в системе родителя Image1, что и нужно...