Форум: "Основная";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
ВнизПеретягивание картинки в произвольную часть экрана... Найти похожие ветки
← →
KpeHgeJIb (2003-03-03 16:44) [0]Народ помогите, я уже задавал этот вопрос сдесь но так и не получил ответа, и совреминем ветка ушла аж на треть страницу и никто ее не видет.
У меня есть обьект TImage который находится на форме. Задача состоит в том что его надо перетошить в Произвольную часть экрана. Выгляжить это должна приблезительно как перетягивание иконки из проводника куданибуть в другое место.Окончательно переносить его не надо нужно просто чтоб картинка тянудась вместе с курсором мыши и при сбрасывании возвращалась назад на форму.
Я просто пишу прогу которая умеет по таймеру выполнять различные операции. Одна из операций это управление окнами приложеий (закрыть, минимизировать и тд.). Естественно для этого мне нужен хендл окна который я получаю при помощи процедуры WindowFromPoint(mouse.CursorPos), именно вовремя сброса картинки (мишени).
Так работает мишенька в Windows Spy (если кто пользовался). Так вот мне нужно сделать тоже самое с моей картинкой.
Если кто знает подскажите чайнику.
← →
grei (2003-03-03 19:36) [1]Ну если перетащить в другую часть экрана, то это будет очень тяжело, нужно будет пыхтеть. А если в другую част формы так это так:
BEGIN
RANDOMIZE;
IMAGE.LEFT := RANDOM(FORM1.HEIGHT);
IMAGE.TOP := RANDOM(FORM1.WIEGHT);
END;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c