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

Ваш аккаунт

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

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

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

и сНОВА о пЕРЕМЕЩЕНИИ оКОН

647
02 марта 2004 года
vital
73 / / 22.03.2003
нашел старые темы по этому вопросу но так ничего и не понял:
1. как взять текущие координаты курсора мыши например при нажатии клавиши.
2.как взять координаты окна.
3.
что же все таки такое сообщения виндовс и как с ними работать.
поподробнее.
спасибо. витал.
247
03 марта 2004 года
wanja
1.2K / / 03.02.2003
Цитата:
Originally posted by vital
нашел старые темы по этому вопросу но так ничего и не понял:
1. как взять текущие координаты курсора мыши например при нажатии клавиши.
2.как взять координаты окна.
3.
что же все таки такое сообщения виндовс и как с ними работать.
поподробнее.
спасибо. витал.


1. Обрабатывать событие onMouseDown, там есть параметры X и Y(как-то так)
2.Form->Top,Form->Left,Form->Left+Form->Width,Form->Top+Form->Height
3. Соббщения Виндовс - все вндявые проги на них построены, Виндовс их рассылает при каждом удобном случае всем заинтересованным объектам (закрытие окна, клик мышой и т.д.).Как работать? Читай Архангельского.

647
04 марта 2004 года
vital
73 / / 22.03.2003
Цитата:
Originally posted by vital
нашел старые темы по этому вопросу но так ничего и не понял:
1. как взять текущие координаты курсора мыши например при нажатии клавиши.
2.как взять координаты окна.
3.
что же все таки такое сообщения виндовс и как с ними работать.
поподробнее.
спасибо. витал.




Сам разобрался вот пример если кого интересует

void __fastcall TForm1::Image6MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
Form1->startx=X;
Form1->starty=Y;
mousedown=1;
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Image6MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
if(mousedown==1)
{
Form1->endx=X;
Form1->endy=Y;
Form1->dx=Form1->startx-Form1->endx;
Form1->dy=Form1->starty-Form1->endy;
Form1->Left=Form1->Left-Form1->dx;
Form1->Top=Form1->Top-Form1->dy;
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Image6MouseUp(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
mousedown=0;
}
//---------------------------------------------------------------------------

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