518 / 306 / 58
Регистрация: 30.07.2008
Сообщений: 607
|
|
1 | |
Прилипание формы к краям экрана как QIP например20.03.2009, 20:17. Показов 3025. Ответов 3
Метки нет (Все метки)
Я довольно таки просто сделал вариант прилипания формы к краям экрана.
Но вот незадача прилипание действует только тогда, когда отпускаешь кнопку мыши. Как можно сделать так, что бы форма прилипала, как в "QIP" или "Winamp", например взял форму и при приближении к краю экрана она сама к нему лепится? пробовал разные варианты "OnMouse..." но никакого результата =( Код
//--------------------------------------------------------------------------- void __fastcall TForm1::Image1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { // перетаскивание за объект long SC_DRAGMOVE = 0xF012; if(Button == mbLeft) { ReleaseCapture(); SendMessage(Handle, WM_SYSCOMMAND, SC_DRAGMOVE, 0); } // прилипание int start_ = 30; //высота панели задач int size_ = 20; //клоичество пикселей до края экрана int form_width = Form1->Width; //ширина формы int form_height = Form1->Height; //высота Формы int display_width = GetSystemMetrics(SM_CXSCREEN); //ширина экрана int display_height = GetSystemMetrics(SM_CYSCREEN); //высота зкрана int qq1 = display_height - form_height - start_ - size_; int qq2 = display_height - form_height - start_; int qw1 = display_width - form_width - size_; int qw2 = display_width - form_width; if (Form1->Top > qq1) Form1->Top = qq2; if (Form1->Left > qw1) Form1->Left = qw2; if (Form1->Top < size_) Form1->Top = 0; if (Form1->Left < size_) Form1->Left = 0; } //---------------------------------------------------------------------------
2
|
20.03.2009, 20:17 | |
Ответы с готовыми решениями:
3
Прилипание формы к краям экрана Прилипание окна к краям дисплея Как исправить растяжение объектов по краям экрана Как сделать полупрозрачную тень по краям формы |
518 / 306 / 58
Регистрация: 30.07.2008
Сообщений: 607
|
|||||||||||
27.09.2011, 00:29 [ТС] | 2 | ||||||||||
Сообщение было отмечено как решение
Решение
Много думал, и в итоге сделал красивое прилипание к краям экрана точ в точ как в QIP
Начал тут на днях одну прогу писать, и захотелось сделать красивый эффект прилипания - сделал (оказывается это так просто xD) потом вспомнил что задавался этим вопросом пару лет назад, и решил ответить сам себе, пользуйтесь *.h
7
|
518 / 306 / 58
Регистрация: 30.07.2008
Сообщений: 607
|
|||||||||||||||||||||
28.09.2011, 14:57 [ТС] | 4 | ||||||||||||||||||||
забыл кой что...
нужно
2
|
28.09.2011, 14:57 | |
28.09.2011, 14:57 | |
Помогаю со студенческими работами здесь
4
Прилипание блока к низу экрана, когда его не видно Создание окружности и движение по краям экрана Прилипание одной формы к другой Прилипание (выравнивание) одного PictureBox к другому по перемещению внутри формы Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |