|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.12.2007, 10:01 | #1 |
Форумчанин
Регистрация: 24.12.2007
Сообщений: 288
|
Перетаскивание объектов по программе
Как можно сделать панель, в каторую можно добавить к примеру Memo1 или CheckBox. Но так чтоб её можно было таскать по форме пользователю???
|
25.12.2007, 10:21 | #2 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
Тема была и не один раз
Код:
|
25.12.2007, 10:38 | #3 |
Форумчанин
Регистрация: 24.12.2007
Сообщений: 288
|
неполучается
|
25.12.2007, 10:44 | #4 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
Что не получается?
Бросьте на форму одну панель, она будет Panel1. В инспекторе объектов дважды щелкните на событии OnMouseDown для панели, появится заготовка процедуры. Наполните ее приведенным содержимым. Запускайте программу на исполнение и таскайте мышкой панель. |
25.12.2007, 12:51 | #5 |
Форумчанин
Регистрация: 24.12.2007
Сообщений: 288
|
О заработало, наверно я папал на ChekBox когда 1 раз делал.. Спасибо, а можно теперь в подробностях каждое слово, я ж должен выучить запомнить, а так зазубриваьб ерунда будет !!! А как паймёш, сможеш обьяснить на русском так и учить не надо
|
27.12.2007, 20:42 | #6 |
Форумчанин
Регистрация: 31.05.2007
Сообщений: 486
|
Сам так делал, всё работало, но почему - можно только догадываться.
SC_DragMove = $F012; - ну, это просто значение которое передается в функцию. Везде где читал, написано что это "магическое число". Думаю, что магия здесь ни причем, просто в двоичном виде установлены некие флаги. ReleaseCapture; - что делает не знаю, возможно "захват" мыши. Panel1.perform(WM_SysCommand,SC_Dra gMove,0); - панель посылает сама себе сообщение. По всей видимости это сообщение заставляет считать, что схватили заголовок окна, ведь TPanel - это "оконный" класс и от классического окна программы отличается только внешним видом и с точки зрения системы ничем не отличается от формы. Т.е. вся поверхность элемента имитируется как заголовок. Впрочем, на 100% не уверен. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перетаскивание | geniy | Компоненты Delphi | 9 | 12.01.2009 02:10 |
Перетаскивание окон | werat | Свободное общение | 2 | 18.08.2008 11:58 |
Перетаскивание обьектов | Witaliy | Общие вопросы Delphi | 6 | 27.04.2008 19:22 |
Перетаскивание формы | s-force | Общие вопросы Delphi | 13 | 07.09.2007 15:38 |