delphi+mapinfo的小问题(30分)

  • 主题发起人 青山侠客
  • 开始时间

青山侠客

Unregistered / Unconfirmed
GUEST, unregistred user!
我在用delphi调用mapinfo编程时遇到以下问题:在一主窗口中添加panel放置地图, 一个tbutton然后:
procedure TForm1.FormCreate(Sender: TObject);
var
sWinHand:string;
begin

mapinfo:=createoleobject('MapInfo.Application');
Str(panel1.Handle, sWinHand);
MsgString := 'Set Nextdo
cument Parent ' + sWinHand + ' Style 1';
MapInfo.Do(MsgString);
end;

在button事件中只有一句:mapinfo.runmenucommand(102) //即调用打开表命令;
但在运行后,单击button,打开表对话框却跑到我的主窗口后面去了,如果我把主窗口最大化,则完全看不到对话框窗口
请问是什么原因?怎样控制对话框的位置?
 
mapinfo怎么定义的?
 
mapinfo的定义应该没问题,为一variant类型, 与MsgString(string类型)放在Form1:TForm1;
之后说明.我已能成功调用mapinfo的菜单命令了,只是显示不正常,对话框跑到后面去了!
 
顶部