Как правильно отправить сообщение создаваемому в run-time окну?

← →
}|{yk © (2004-10-12 16:02) [0]

Просто отправляя
if Assigned(FormSelectWorker) then SendMessage(FormSelectWorker.Handle,CX_NEW_SET,0,0);
не выходит, потому что форма создается в run-time
with TFormSelectWorker.Create(self) do try ShowModal finally Free; end;

← →
}|{yk © (2004-10-12 16:03) [1]

FindWindow не предлагать, потому что заголовок окна может быть различным

for i := 0 to Screen.FormCount-1 do if Screen.Forms[i] is TFormSelectWorker then SendMessage(Screen.Forms[i].Handle,CX_NEW_SET,0,0);

Как правильно отправить сообщение создаваемому в run-time окну? Найти похожие ветки