Delphi, MO, IMS 开发 WebGis 的 架构问题(200分)

  • 主题发起人 flyinsky
  • 开始时间
F

flyinsky

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟正要开发一个wengis工程,使用上诉东西.

1. 想要知道怎么样的架构最好点,因为工程中参杂了gis应用程序,以及html网页界面,
以及图形用户界面,在delphi里我只想关心根据用户请求去执行的查询服务等,而不想
将繁琐的html编辑放在里头,非常不利与调试.
是否有合理的架构可以将各个模块分离, 作个多层的架构,便于维护,编码,修改.

2. 同客户请求连接的一个事件是Ims中的Weblink空间的ONrequest事件
procedure TForm1.WebLink1Request(Sender: TObject;
const arguments,
values: IDispatch);
只有vb的例子,不知道delphi的怎么读取arguments, values 参数.
主要是不明白Idispatch的转换到MO的自定义的String类型的方法.

请各位赐教,谢谢

 
你可用JAVA SERLET 做WEB程序

其它的随你了,那样你方便就用哪样
 
十分关注!
 
对于第二个问题,在Delphi中是这样使用的

2.
procedure TForm1.WebLink1Request(Sender: TObject;
const arguments,
values: IDispatch);
var
StrCmd, StrValues: IMOStrings;
Idx: Integer;
begin

StrCmd := IMOStrings(arguments);
// 通过IMoStrings()将IDispatch类型装化到
StrValues := IMoStrings(values);
// IMoStrings,即可
Idx := StrCmd.Find(CMD', EmptyParam);
//在Arguments中找到合适的参数对象
if StrValues.Item(Idx) = 'Map' then
begin
//CMD参数值为'Map'
do
ShowEntireMap();
//显示整个地图
end
end;
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
787
DelphiTeacher的专栏
D
D
回复
0
查看
742
DelphiTeacher的专栏
D
D
回复
0
查看
729
DelphiTeacher的专栏
D
顶部