C
cocoliu
Unregistered / Unconfirmed
GUEST, unregistred user!
准备开发个小程序，需要一个WAP浏览器的控件，找了几天没找到一个能用的：
M3GATE的不能设置网关，winwap的一运行就out of mem.
还有一个activex控件比较怪：
控件中有procedure SetHP(const strHomePage: WideString);
调用：
procedure TForm1.Button1Click(Sender: TObject);
var
b
widechar;
a: widestring;
begin
//a:='32767';
a:='http://wap.monternet.com';
wmlbrowse1.SetHP(a);
end;
运行出现错误"type mismatch"
但是如果a='-32678'~'32672'(shortint范围）就没有问题.
不知道什么原因，请高手指点。
M3GATE的不能设置网关，winwap的一运行就out of mem.
还有一个activex控件比较怪：
控件中有procedure SetHP(const strHomePage: WideString);
调用：
procedure TForm1.Button1Click(Sender: TObject);
var
b
widechar;a: widestring;
begin
//a:='32767';
a:='http://wap.monternet.com';
wmlbrowse1.SetHP(a);
end;
运行出现错误"type mismatch"
但是如果a='-32678'~'32672'(shortint范围）就没有问题.
不知道什么原因，请高手指点。
