wbwyc 发表于 2005-11-6 21:31:00

用Delphi打开CAD时，怎样控制CAD窗口的位置及大小

<P>用Delphi打开CAD时，怎样控制CAD窗口的位置及大小<BR>为什么下面的程序不对呢，应该是这样的呀</P>
<P>procedure TForm1.Button1Click(Sender: TObject);<BR>var&nbsp; AcadApp : OleVariant;<BR>begin<BR>&nbsp; AcadApp := CreateOleObject('AutoCad.Application');<BR>&nbsp; AcadApp.Left:=50;<BR>&nbsp; AcadApp.Top:=10;<BR>&nbsp; AcadApp.Width:=500;<BR>&nbsp; AcadApp.Height:=500;<BR>&nbsp; AcadApp.visible := true;</P>
页: [1]
查看完整版本: 用Delphi打开CAD时，怎样控制CAD窗口的位置及大小