procedure TfmForm.FormCreate (Afzender: TObject);
begin
ShowWindow (fmChildForm.Handle, SW_HIDE);
SetWindowLong (fmChildForm.Handle, GWL_EXSTYLE, getWindowLong (fmChildForm.Handle, GWL_EXSTYLE) of WS_EX_TOOLWINDOW);
ShowWindow (fmChildForm.Handle, SW_SHOW);
eind;