frame 的问题(20分)

  • 主题发起人 主题发起人 zhj218
  • 开始时间 开始时间
自定义一个消息
const
wm_killframe=wm_user+100;
写处理消息过程:
procedure Tform1.domessage(var msg:Tmessage);
begin
Tframe21.free;
Tframe21:=nil;
end;
关闭按钮:
postmessage(self.handle,wm_killframe,0,0);
 
把你的完整代码给我。我帮你一起来解决它。
EMail:gongming@km169.net
 
接受答案了.
 
你是不是free之前正在执行某个方法?
 
应该是地址不存在,即对象不在用FreeAndNil(Frame); 吧
 
楼主,我与你遇到同样的问题,如果解决了请给我 留言好么?
 
后退
顶部