对象这样的声明能将操作对应对象属性,在给对象置属性的时候自动执行所需要的操作。
我做了个对象例子如下:
使用方法
uo_demo luTemp
luTemp = create uo_demo
//设置属性
luTemp.iInfo = "My Test Info"
//得到属性
MessageBox("Info",luTemp.iInfo)
DESTROY luTemp
$PBExportHeader$uo_demo.sru
forward
global type uo_demo from nonvisualobject
end type
end forward
global type uo_demo from nonvisualobject
end type
global uo_demo uo_demo
type variables
//定义访问属性
public:
INDIRECT string iInfo {of_SetInfo(*value),of_GetInfo()}
private:
string zisInfo
end variables
forward prototypes
public function integer of_setinfo (string asInfo)
public function string of_getinfo ()
end prototypes
public function integer of_setinfo (string asInfo);//Function: of_SetInfo()
IF NOT IsNull(asInfo) THEN
zisInfo = upper(asInfo)
END IF
RETURN 1
end function
public function string of_getinfo ();//Function:of_GetInfo()
Return zisInfo
end function
on uo_demo.create
TriggerEvent( this, "constructor" )
end on
on uo_demo.destroy
TriggerEvent( this, "destructor" )
end on
本文介绍了PowerBuilder中indirect函数的使用方法,通过一个uo_demo对象的例子,展示了如何利用indirect设置和获取对象属性,同时包含了类型定义、方法实现以及事件触发的相关代码。
1121

被折叠的 条评论
为什么被折叠?



