Mega Code Archive
Childformmessages
<![CDATA[
>How do I send a (custom) message to all MDI children windows of my
>MDI form?
Try this:
var
ChildIndex : Integer;
Form : TfrmChild;
begin
for ChildIndex := 0 to MDIChildCount - 1 do begin
Form := TfrmChild(MDIChildren[ChildIndex]);
if Form <> nil then
PostMessage(Form.Handle, WM_XXXX, 0, 0);
end;
end;
Hope it helps,
Daniel
]]>