Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Перетаскивание формы мышью за все места!

1.8K
31 августа 2004 года
kas
71 / / 03.02.2004
Все знают как переместить по экрану форму, взять её мышью за панель заголовка и перетасчить! А как можно сделать чтобы её можно было перетаскивать за саму форму. Просто нажать в любую точку формы и не отпуская мышью таскать форму! Как в IM Miranda .
621
31 августа 2004 года
Бешеный кролик
151 / / 23.03.2004
Цитата:
Originally posted by kas
Все знают как переместить по экрану форму, взять её мышью за панель заголовка и перетасчить! А как можно сделать чтобы её можно было перетаскивать за саму форму. Просто нажать в любую точку формы и не отпуская мышью таскать форму! Как в IM Miranda .




Попробуй так:

void __fastcall Form1::MouseMove(TShiftState Shift,int X, int Y)
{
if (!Shift.Contains(ssLeft)) return;
ReleaseCapture();
Perform (WM_SYSCOMMAND,0xF012,0);
}

1.8K
31 августа 2004 года
kas
71 / / 03.02.2004
Цитата:
Originally posted by Бешеный кролик



Попробуй так:

void __fastcall Form1::MouseMove(TShiftState Shift,int X, int Y)
{
if (!Shift.Contains(ssLeft)) return;
ReleaseCapture();
Perform (WM_SYSCOMMAND,0xF012,0);
}



Большое спасибо! Все работает! =)

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог