我在窗口FrmWork  Create的时候有以下代码
  FrmDuty:= TFrmDuty.Create(nil);
  FrmDuty.ShowModal;
  FrmDuty.Free;
  VInit(self.Handle,WM_VPRMsg)                       --接收收某动态库中传过来的消息
以上每次都很正常,从FrmDuty回到FrmWork都能接收到消息在运行了一段时间后还需要
  FrmDuty:= TFrmDuty.Create(nil);
  FrmDuty.ShowModal;
  FrmDuty.Free;
回到FrmWork时消息就接收不到了另外两个窗口都是全屏显示,不知道有没有影响,请各位大侠指点指点