Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];
ВнизНарод, как закрыть все MDIChild окна формы? Найти похожие ветки
← →
KIR (2002-09-20 10:58) [0]сабж.
Я делаю так:
procedure CloseChildren;
var
i: Integer;
begin
For i := 1 to MainForm.MDIChildCount do
begin
If Assigned(MainForm.MDIChildren[i]) then
MainForm.MDIChildren[i].Close;
end;
end;
результат - ни фига...
← →
vlv (2002-09-20 11:23) [1]For i := MainForm.MDIChildCount - 1 downto 0 do
//... все то же самое
← →
REA (2002-09-20 11:26) [2]или
While MainForm.MDIChildCount > 0 Do
MainForm.MDIChildren[0].Close();
← →
KIR (2002-09-20 11:31) [3]спас!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c