| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как изменить максимальные размеры окна на АПИ?
LeReve © (2003-03-08 14:51:00)как изменить максимальные размеры окна на АПИ?
Игорь Шевченко (2003-03-11 09:52:00) [1]Получается.
procedure TfMain.WMGetMinMaxInfo(var Message : TWMGetMinMaxInfo);
var
Sz : SIZE;
begin
Sz := FullScreenHandler.MaxSize;
with Message.MinMaxInfo^ do begin
ptMaxSize := TPoint(Sz);
ptMaxTrackSize := TPoint(Sz);
end;
end;
function TFullScreenHandler.GetMaxSize : SIZE;
var
ARect : TRect;
begin
{
При большом желании обращение к свойствам переменной Screen можно заменить
на вызовы функции GetSystemMetrics(SM_CXSCREEN) и
GetSystemMetrics(SM_CYSCREEN).
}
SetRect(ARect, 0, 0, Screen.Width, Screen.Height);
InflateRect(ARect, 10, 50); //Любые числа, лишь бы превышали размер
//неклиентской области окон
Result.cx := ARect.Right - ARect.Left;
Result.cy := ARect.Bottom - ARect.Top;
end;
LeReve (2003-03-08 17:07:00) [2]не получается создать окно которое больше чем разрешение экрана =(
theodor_iv (2003-03-08 16:12:00) [3]Написать обработчик сообщения WM_GETMINMAXINFO
LeReve (2003-03-08 15:33:00) [4]what"s parametrs????
Diamond Cat (2003-03-08 15:30:00) [5]setwindowpos or setwindowplacement
| |
