|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
|
Пользовательские окна интерфейса работы с документами (MDI), представляемые объектом TDMIClient, управляют дочерними окнами MDI приложения MDI. Методы TMDIClient предназначены для работы с дочерними окнами MDI.
В более ранних версиях ObjectWindows TMDIClient наследовал из TControl. В данной версии TMDIClient является прямым потомком TWindow.
ClientAttr содержит запись атрибутов окна клиента MDI.
TClientCreateStruct определен следующим образом:
Ниже описываются методы, определенные в данном объекте.
Создает объект пользовательского окна MDI c AParent в
качестве порождающего окна. Вызывает конструктор Init, наследуемый
из TWindow, затем добавляет в Attr.Style стиль ws_ClipChildren.
Кроме того, Init удаляет окно клиента из списка порожденных окон
его предка, так что оно не интерпретируется (как другие дочерние
окна) как блоки списка и командные кнопки.
См. также: TWindow.Init.
Строит и загружает окно клиента MDI из потока S, вызывая
сначала TControl.Load, а затем считывая дополнительное поле
(CLientAttr), введенное TMDIClient.
См. также: TControl.Load.
Упорядочивает и минимизирует порожденные окна MDI в нижней
части окна клиента MDI.
Настраивает размер и упорядочивает все неминимизированные
дочерние окна MDI в окне клиента MDI. Дочерние окна могут
перекрываться, хотя заголовок каждого окна остается видимым.
Возвpащает имя класса окна объекта TDMIClient - 'MDIClient'.
Возвращает True, поскольку класс окна клиента MDI
предварительно зарегистрирован в Windows.
См. также: TWindowsObject.Register.
Сохраняет окно клиента MDI в потоке S, вызывая сначала
TControl.Store, а затем записывая дополнительное поле
(ClientAttr), введенное в TMDIClient.
См. также: TControl.Store.
Поля
ClientAttr: TClientCreateStruct;
type
PClientCreateStruct = ^TClientCreateStruct;
TClientCreateStruct = record
hWindowMenu: THandle;
idFirstChild: Word;
end;
Методы
Init (переопределяется редко)
constructor Init(AParent: PMDIWindow);
Load
constructor Load(var S: TStream);
ArrangeIcons (переопределяется редко)
procedure ArrangeIcons; virtual;
CascadeChildren (переопределяется редко)
procedure CascadeChildren; virtual;
GetClassName (никогда не переопределяется)
function GetClassName: PChar; virtual;
Register
function Register: Boolean; virtual;
Store
procedure Store(var S: TStream);