Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];

Вниз

как сделать   Найти похожие ветки 

 
Kozhanov   (2002-01-31 14:37) [0]

Господа, кто занимался написанием компонента, который похож
на дельфийский "GrabHandle", т.е. компонент, который позволяет
таскать компоненты на форме и менять их размеры ?
Нужна консультация : как это лучше сделать.
А лучше всего ссылки (ежели не жалко).


 
Юрий Зотов   (2002-01-31 17:49) [1]

Это самый обычный потомок TWinControl (можно TCustomControl). В него надо добавить поле "тип", который будет определять вид курсора и позицию на Parent"е. Написать же для него код перетаскивания мышью - не проблема.

Далее я создавал невидимое окно, которое тоже можно было перетаскивать и которые "накрывало" нужный контрол. На нем автоматически создавались 8 GrabHandl"ов и каждый из них при перетаскивании уведомлял Parent"а, а тот синхронно менял позицию/размеры и у себя, и у нужного контрола.


 
Kozhanov   (2002-02-01 11:33) [2]

> Юрий Зотов. Большое спасибо за отклик !
Если у Вас есть желание, то мне бы хотелось обсудить с Вами
этот вопрос по-подробнее. Дело в том, что у меня этот компонент
уже реализован по, схожему с Вашим, принципу, но там есть несколько подводных камней и я хочу их с Вами обсудить (может Вы
чего-нибудь присоветуете). Есть желание ?


 
Юрий Зотов   (2002-02-01 11:46) [3]

Открывайте ветку в "Потрепаться", там и обсудим. Глядишь - и другие присоединятся.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
3-42675
Aledo
2002-01-20 15:59
2002.02.14
Заполнение таблицы


6-42825
Serg5
2001-11-22 15:09
2002.02.14
Помогите сделать веб-форму в приложении, при нажатии Send, отправлялись бы данные без IE и др.


4-42892
Shadow77
2001-12-17 15:27
2002.02.14
Как узнать, активно или нет данное окно?


1-42747
perov
2002-01-30 09:48
2002.02.14
работа с объектами в TStringList


1-42788
st_Lexa
2002-01-31 17:40
2002.02.14
Рисую на канве





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский