![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Размер дочерних окон MDI-интерфейса
Trof © (2002-11-08 16:01:00)Добрый день. Пишу приложение с MDI-интерфейсом и хотелось бы, что бы при создании дочерних окон они имели размер, заданный при проектировании. Как этого можно добиться?
Рыжик (2002-11-10 12:44:00) [1]ChildForm.Position:=poDefaultPosOnly
lats (2002-11-10 11:49:00) [2]if (MDIChildCount<2) then
begin
Child := TMDIChild.Create(Application);
Child.Caption := Name;
ChildD := TMDIChild.Create(Application);
ChildD.Caption := Name;
ChildD2 := TMDIChild.Create(Application);
ChildD2.Caption := Name;
RaspredWin();
end;
Child.Top:=0;
Child.Left:=0;
Child.Height:=(MainForm.ClientHeight-74) div 2;
Child.Width:=(MainForm.ClientWidth-105) div 2;
Child.Image1.Height:=Child.Height-30;
Child.Image1.Width:=Child.Width-20;
Child.Shape1.Visible:=false;
и т.д.