Текущий архив: 2003.03.31;
Скачать: CL | DM;
Вниз
MDIChild Найти похожие ветки
← →
Barman © (2003-03-18 09:30) [0]Мастера, прошу у вас совета.
Есть форма MDIChild. Ставлю ей Align:= alClient и тогда форма растягивается больше, чем надо. На главной форме появляются полосы прокрутки, т.е. ее размер не соответствует желаемому... Как этого избежать?
← →
Игорь Шевченко © (2003-03-18 11:00) [1]Не ставить Align:=alClient :-)
А попробовать вот так:
procedure TChildForm.FormShow(Sender: TObject);
var Rect : TRect;
begin
GetWindowRect (Application.MainForm.ClientHandle, Rect);
Height := Rect.Bottom - Rect.Top - GetSystemMetrics(SM_CXFRAME);
Width := Rect.Right - Rect.Left - GetSystemMetrics(SM_CXFRAME);
end;
← →
Barman © (2003-03-18 11:23) [2]Спасибо, сейчас попробую :-)
← →
Barman © (2003-03-18 11:45) [3]Большое спасибо, все получилось!
Только еще один вопрос: как сделать так, чтобы форму нельзя было таскать по экрану?
← →
myor © (2003-03-18 12:40) [4]максимизировать
← →
Игорь Шевченко © (2003-03-18 12:43) [5]Обрабатывать сообщение WM_NCHITTEST, возвращая HTCLIENT или HTTRANSPARENT или HTERROR
Страницы: 1 вся ветка
Текущий архив: 2003.03.31;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.02 c
