【摘要】：六、用鼠标创建Shape当用户需要用鼠标创建Shape时，可以用以ReturnUser开头的请求实现。以上这些请求必须保证鼠标在视图显示区内活动，然后读出鼠标位置坐标，创建所需要的Shape。［例21］用鼠标创建ShapetheDisplay=theView．GetDisplaythePoint=theDisplay．ReturnUserPointtheCircle=theDisplay．ReturnUserCircletheRect=theDisplay．ReturnUserRect上例必须连接到工具来运行，而不能用按钮，因为按钮的控制项不会等待。“Apply”属性项的程序在按下该控件后，鼠标点击到文档时运行;而与Click相连的程序在图形用户界面上按下该控件时运行。
六、用鼠标创建Shape
当用户需要用鼠标创建Shape时，可以用以ReturnUser开头的请求实现。不同的Shape对应不同的请求(如ReturnUserPoint、ReturnUserLine、ReturnUserRect、ReturnUserpolyLine、ReturnUserCircle、ReturnUserpolyGon)，每一条请求都可以发送给视图的显示对象。若要状态栏中显示坐标值，可将请求(ReturnUserPoint除外)直接发送给视图或图版。
以上这些请求必须保证鼠标在视图显示区内活动，然后读出鼠标位置坐标，创建所需要的Shape。
［例21］用鼠标创建Shape
theDisplay=theView．GetDisplay
thePoint=theDisplay．ReturnUserPoint
theCircle=theDisplay．ReturnUserCircle
theRect=theDisplay．ReturnUserRect
上例必须连接到工具(Tools)来运行，而不能用按钮(Buttons)，因为按钮的控制项不会等待。工具拥有“Apply”属性和“Click”属性。“Apply”属性项的程序在按下该控件后，鼠标点击到文档(Doc)时运行;而与Click相连的程序在图形用户界面上按下该控件时运行。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
