您当前的位置:delphi教程 > Delphi组件开发 > 请教类创建的问题

请教类创建的问题

我创建了一个类  
  TMyRect=class  
      public  
          x1,y1,x2,y2   :   integer;  
          point1:TPoint;  
          point2:TPoint;  
          Selected:boolean;  
          constructor   create;  
      end;  
   
   
   
  constructor   TMyRect.create;  
  begin  
      inherited;  
      Selected:=False;  
  end;  
   
  //当我声明了  
  var   MyRect:TMyRect;  
  var   Point1:TPoint;  
  begin  
        point1.x:=0;  
        point1.y:=0;  
   
  //然后将point1赋给MyRect.point1时候  
        MyRect.point1   :=   point1  
  //出现异常  
  end;  
   
  ------------------------》请问怎样解决这个问题啊?我怀疑是需要初始化myRect.point1但是我不知道怎样初始化。请高手帮忙啊!!!  
   
   
 


查看回复
关于我们 | 网站地图 | 广告刊登 | 友情链接
Copyright ©2008 - 2010  Delphi2007.net  ,All Rights Reserved  粤ICP备09038647号
业务联系:allceoad#gmail.com QQ:20008835 最佳分辨率 1024×768