activeform与web交互? 200分(200分)

  • 主题发起人 主题发起人 自由水手
  • 开始时间 开始时间

自由水手

Unregistered / Unconfirmed
GUEST, unregistred user!
我用activeform做了一个控件。想要通过web页面传递参数,如何定义该控件的属性?
我用的方法如下:
1.在type library 添加属性UserName(only write).
produre Set_UserName(value bstr){
UserName=value (怎样将value定义为String类型)
}
2. 属性定义
property UserName: WideString read m_UserName write Set_UserName;
m_UserName :widestring 为private 的全局变量

传递参数方式:
<PARAM NAME="UserName" value="Marthin">
但是我无法获得该值。

请各位大虾指点迷津!
 
不要手动在PAS文件添加,打开 *.tlb 文件,在这里添加你需要的属性、方法等,Delphi会为你自动生成代码
还有不能用String了,用PChar吧
 
给Object加一个ID,在客户端脚本中传值
例如
<object id=testId>
在客户端脚本中写,testID.UserName="Marthin";
 
能否提供一个例子呢
 
生成一个ActiveForm工程之后,会生成一个相应的*.tlb文件,如果你需要在网页里能"看见"你写的属性,
你需要打开这个tlb文件,在这里添加相应的属性,事件等
比如你New一个Property,会自动生成一个读一个写的方法,如你需要只写,那把读删了就行
像你这里的UserName,TYPE可选BSTR
保存后Delphi会自动为你生成相应的方法,你只需要找个相应的位置添加代码就可以了
完成之后可以用<PARAM NAME="UserName" value="Marthin">传入值
用 yxz123 的方法也同样可以赋值
 
ocx内部如何调用如UserName的属性呢?

我是直接调用UserName,但是编译时提示UserName没有申明,如何解决?

请多多指教!
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
505
import
I
I
回复
0
查看
812
import
I
后退
顶部