用Delphi打开CAD时,怎样控制CAD窗口的位置及大小
用Delphi打开CAD时,怎样控制CAD窗口的位置及大小为什么下面的程序不对呢,应该是这样的呀
procedure TForm1.Button1Click(Sender: TObject);
varAcadApp : OleVariant;
begin
AcadApp := CreateOleObject('.Application');
AcadApp.Left:=50;
AcadApp.Top:=10;
AcadApp.Width:=500;
AcadApp.Height:=500;
AcadApp.visible := true;
页:
[1]