Как найти все MDI окна, а затем их все закрыть?

← →
serg128 (2004-08-18 13:10) [0]

← →
yaric (2004-08-18 13:11) [1]

for i:=0 to self.MDIChildCount-1 do
begin
MDIChildren[i].close;
end;

← →
yaric (2004-08-18 13:12) [2]

self єто MDI form

← →
Mim1 © (2004-08-18 13:13) [3]

[1] yaric (18.08.04 13:11)

Думается что в вашем коде будет AV :)

Только лучше это делать в нисходящем цикле. Иначе, если в OnClose прописано Action := aFree, получим out of range.

И Self не нужен. Он и так подразумевается по умолчанию.

← →
serg128 (2004-08-18 13:15) [5]

пасиба :)

Как найти все MDI окна, а затем их все закрыть? Найти похожие ветки