mapbasic的右键菜单问题(100分)

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-22

• #1

mapbasic客户化一个panel，载入地图后，出来的右键菜单是mapinfo的。
能否替换成 delphi自己的菜单？

有没有地图直角坐标系转经度、纬度的方法？

 

G

gaolang2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-22

• #2

大伙的 大富翁全文检索 现在能用起来吗？我一用就提示网页有错误，不知是IE出问题了，还是别的原因？

 

N

next

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-22

• #3

重载Application的onMessage事件.然后在自己的OnMessage事件中添加如下代码：
if (msg.message=wm_rbuttondown) and (msg.hwnd=Panel.handle) then

begin

handled:=true;
//在这里弹出自己的菜单.
end;


另处一种方法是用setwindowlong重新定义窗口函数，在里面捕获wm_rbuttondown消息

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-23

• #4

老兄，我试过了
我原以为和普通的activex一样
用Application的onMessage就可以搞定
谁知，试了一下，不行

注意，它不是activex
是ole化一个控件

 

M

mklvvu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-23

• #5

Create Menu "MapperShortcut" ID 17 As
"图层控制[&L]..."
HelpMsg "打开图层控制对话框。"
calling layer_control,
"(-",
"清除装饰图层[&Y]"
HelpMsg "清除装饰图层中的所有对象。"
calling 810,
"(-",
"改变视图[&V]..."
HelpMsg "设定地图的宽度、比例尺、大小和中心。"
calling 805,
………………
这个就是右键菜单。。。。

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #6

mklvvu兄，
这样还是mapbasic的菜单
不是delphi的菜单！

 

M

mklvvu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #7

不好意思，我开始没有看清楚，毕竟我用mapbasic多与delphi,你要实现什么功能可以在右键中调用啊，或者将你要调用的
delphi过程做成一个dll在mapbasic中调用，就是calling p/f,就可以了么。

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-25

• #8

如果，mapbasic里只是调用一小部分delphi的代码还好
关键是，实际中，往往，很多情况下都是
delphi中要调用mapbasic中的功能

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-05

• #9

多人接受答案了。