Y yyyxxue Unregistered / Unconfirmed GUEST, unregistred user! 2005-06-01 #1 请问最小化后的操作怎么实现:这里是每当打开的窗体最小化时,都自动进行其他的某个操作:如显示messagebox。谢谢![]
Y yyyxxue Unregistered / Unconfirmed GUEST, unregistred user! 2005-06-01 #2 请问最小化后的操作怎么实现:这里是每当打开的窗体最小化时,都自动进行其他的某个操作:如显示messagebox。谢谢![]
C caoweizhong123 Unregistered / Unconfirmed GUEST, unregistred user! 2005-06-02 #3 procedure TForm1.FormCreate(Sender: TObject); begin application.OnMinimize:=myonmin;//定义最小化消息 end; procedure tform1.myonmin(sender:tobject); begin showmessage('最小化啦!'); end;
procedure TForm1.FormCreate(Sender: TObject); begin application.OnMinimize:=myonmin;//定义最小化消息 end; procedure tform1.myonmin(sender:tobject); begin showmessage('最小化啦!'); end;
Y yyyxxue Unregistered / Unconfirmed GUEST, unregistred user! 2005-06-02 #4 to caoweizhong123, 我要的是每当窗体最小化时,自动的操作,如自动跳出messagebox. 还有当窗体(没有打开)处于托盘位置,有消息来时自动弹出messagebox(窗体打开时不需要messagebox提示)。多谢!!
to caoweizhong123, 我要的是每当窗体最小化时,自动的操作,如自动跳出messagebox. 还有当窗体(没有打开)处于托盘位置,有消息来时自动弹出messagebox(窗体打开时不需要messagebox提示)。多谢!!