国产精品一在线观看,久久精品国产亚洲a∨麻豆,日韩精品三级

Kodigo里面u_sheets昄��汉字昄��问题

KE — Mon, 06 Sep 2010 06:27:00 GMT

u_sheets控�g:

of_drawtabs�Ҏ��?
两处uo_paint.Drawtext(aul_hdc, istr_tabs[n].displaytext, lenA(istr_tabs[n].displaytext), istr_tabs[n].textrect, DT_END_ELLIPSIS)
修改�?
uo_paint.Drawtext(aul_hdc, istr_tabs[n].displaytext, -1, istr_tabs[n].textrect, DT_END_ELLIPSIS)

of_updatepoints�Ҏ��?

lnv_win32.GetTextExtentPoint32(aul_hdc, istr_tabs[n].displaytext, LEN(istr_tabs[n].displaytext), lstr_size)
修改�?
lnv_win32.GetTextExtentPoint32(aul_hdc, istr_tabs[n].displaytext, LENA(istr_tabs[n].displaytext), lstr_size)

w_tmp_resource中of_gettextwidth�Ҏ��

lnv_win32.GetTextExtentPoint32(ll_dc, as_text, LEN(as_text), lstr_size)

修改为：

lnv_win32.GetTextExtentPoint32(ll_dc, as_text, LENA(as_text), lstr_size)

轉自:http://blog.csdn.net/gogir/archive/2009/02/07/3867255.aspx

KE 2010-09-06 14:27 发表评论

KE — Sat, 21 Aug 2010 06:32:00 GMT

在开发环境下�q�行是没有问题的�?br /> 不过攑֜�客户端运行时�Q�由于缺��DLL文�g和Jar文�g报出了不��异常�?br />
相关异常�Q�只列出一部分�Q?br /> Could not initialize javaVM
Java Exception : java.lang.NoClassDefFoundError: com/sybase/powerbuilder/jdbc/PbjdbcSessionEx
Non SQL Error: Could not load class oracle.jdbc.driver.OracleDriver

��所需的DLL文�g�Q�位�?PB_HOME%\Shared\PowerBuilder�Q�COPY到项目文件下
libjcc.dll
libjutils.dll
pbdpl115.DLL
PBDWE115.DLL
PBJDB115.DLL
PBjvm115.DLL
PBLIB115.DLL
PBODB115.DLL
PBSHR115.DLL
PBVM115.DLL

��所需的JAR文�g复制�?JAVA_HOME%\jre\lib\ext�?br /> 如：
pbjdbc12115.jar�Q�位�?PB_HOME%\Shared\PowerBuilder�Q?br /> classes12.jar是（位于%ORACLE_HOME%\ora92\jdbc\lib�Q?/strong>

KE 2010-08-21 14:32 发表评论

pb通过jdbc�q�接oracle

KE — Mon, 09 Aug 2010 03:06:00 GMT

pb通过jdbc�q�接oracle

工具�Q�pb11.5
数据库：oracle 9

1、拷贝oracle安装目录 \jdbc\lib 下的classes12.zip到本地目录，�q�里有oracle的jdbc驱动

2、运行pb11�Q�打开tools->system options�Q�选择java��面�Q�在classpaths里添加刚才粘贴的classes12.zip文�g的全路径以及名称�Q�如�Q�d:\mypro \classes12.zip 。检查jvm status�Q�pb11默认会安装jdk1.5的�?br />
3、重新启动pb10�Q�注意：在进行了�W?步设�|�后必须重启pb才能使设�|�生效�?br />
4、打开tools->database profiles�Q�选择JDB JDBC�Q�新建jdbc�q�接�?/p>
在connection��面的driver name里填写oracle.jdbc.driver.OracleDriver    �Q?/p>
url里填�? jdbc:oracle:thin:@127.0.0.1:1521:DB1

�Q?27.0.0.1处应��Z��的数据库所在计��机的ip地址�Q�DB1处应��Z��的数据库实例名称�Q?br />
5、填写login id和password后即可连接�?br />
6、根据自己需要进行其他设�|��?/p>

下面是一个连接语�?/p>
SQLCA.DBMS = "JDBC"SQLCA.LogPass = <***>SQLCA.LogId = "admin"SQLCA.AutoCommit = FalseSQLCA.DBParm = "Driver=‘oracle.jdbc.driver.oracledriver‘,URL=‘jdbc:oracle:thin:@localhost:1521:dev‘"

KE 2010-08-09 11:06 发表评论

解決退出时,报pfc_closequery_savechanges 错误

KE — Fri, 06 Aug 2010 08:52:00 GMT
現象:
        在窗口中加上一个数据窗�?
在运行的时候更改了内容�Q�退出时候不保存
跳了个框框Predefined Message "pfc_closequery_savechanges " not found

解決�Ҏ��

        无法�q�接PFC数据库的错误�?��Z��个错误表
或者把该服务关�?nbsp;   gnv_app.of_seterror( false )

KE 2010-08-06 16:52 发表评论

�?鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

KE — Fri, 06 Aug 2010 07:53:00 GMT

鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

原文:http://blog.csdn.net/zm1313/archive/2006/04/04/650402.aspx

1、首先将DW属性中的Column Moving 和Mouse Selection 两项取消选中�Q?/strong>

2、在 DW 的Clicked 事�g中写代码�Q?/strong>

    //此处声明所用到的相兛_��量；

    long ll_curcol,ll_pos,ll_cols

    string ls_modstring,ls_colname,ls_color_1,ls_color_2,ls_curcol

    if row = 0 then return

    //此处�l�两个颜色变量赋��|��

    ls_color_1 = string(rgb(255,255,255))

    ls_color_2 = string(15780518) //此处讄��选中单元��gؓSKY天蓝�?/strong>

    //此处获取当前列号和��d��敎ͼ�

    //ll_curcol=dw_1.getcolumn()

    ls_curcol = left(dw_1.GetObjectAtPointer(),pos(dw_1.GetObjectAtPointer(),"~t") - 1)

    ll_cols = long(dw_1.Object.DataWindow.Column.Count)

    //此处��所有列的BACKGROUND�? MODE属性设��Z��透明�Q�（注：下面两句其实可以攑ֈ�FORM的OPEN事�g或DW的CONSTRUCTOR里面执行�Q�可以提高效率；�Q?nbsp;

dw_1.setredraw(false)

for ll_pos = 1 to ll_cols

    ls_colname = dw_1.Describe("#"+string(ll_pos)+".Name")

    dw_1.Modify(ls_colname+".Background.Mode='0'")

next

   //此处��所操作列的Background.Color属性设为带IF判断的表辑ּ��Q�而除此之外的各列的背景表辑ּ�均设为恒��|��

for ll_pos = 1 to ll_cols

     ls_colname = dw_1.Describe("#"+string(ll_pos)+".Name")

     //if ll_pos<> ll_curcol then

     if ls_colname <> ls_curcol then

         ls_modstring = ls_colname+".Background.Color='"+ls_color_1+"'"

     else

         ls_modstring = ls_colname+".Background.Color='"+ls_color_1+" ~t if (getrow()=currentrow(),"+ls_color_2+","+ls_color_1+")'"

     end if

     //此处执行背景颜色修改�Q?/font>

     dw_1.Modify(ls_modstring)

next

   //��h��昄��新的背景颜色�Q?

   dw_1.setredraw(true)

KE 2010-08-06 15:53 发表评论

<�?gt;如何在PB数据�H�口中修�Ҏ��?--讄��数据�H�口的更新属�?

KE — Fri, 06 Aug 2010 07:36:00 GMT
数据�H�口对象非常强大的原因之一��是能够很容易地修改数据库。当用户修改了数据窗口中的数据，插入了新的数据行或者删除了数据行以后，只要调用 update()函数��可以将修改了的数据保存到数据库中。但是，�q�需要一个前提，��是必须讄��数据�H�口的修改属性�?

        数据�H�口要修�Ҏ��据表�Q�首先清楚数据窗口只能修改一个数据表。当数据�H�口的数据来源于不止一个数据表�Ӟ��可以用脚本控制数据窗口的修改属性来�Ҏ��据表逐个 �q�行修改�Q�这�U�技术在后面有关章节介绍。下面介�l�一�ơ修改一个数据表的设定方法�?
        当数据窗口是用来接受用户的手工录入数据时�Q�应该设�|�两斚w��的属性才能确保数据窗口能够用来修�Ҏ��据表。一个是修改数据�H�口的修改属性，另一个是用户可以修改的字�D늚�相关属性倹{�?
        首先介绍数据�H�口的修改属性的讄��。在数据�H�口��L��中，使用菜单��Rows->Update Properties�Q�弹出如图所�C�的�H�口�?
        数据�H�口的所有修改属性都集中在该�H�口中。如果数据窗口对应的数据表中定义了主键或者惟一性烦引，则数据窗口创建时�~�省的就是允�怿�改，�q�且正确讄��了所有的修改属性。否则就需要手工进行设�|�。前面介�l�过�Q�当增加、删除或者重新选择了字�D�|��Q�PowerBuilder��数据窗口的修改属性置��Z��允许�Q�这�? 也应该进行手工设�|��?
        首先应该选中Allow Updates选项�Q�只有选中该选项�Q�才允许�l�箋�q�行其他属性的讑֮�。在Allow Updates右面的下拉列表框叫做Table to Update�Q�只能在该下拉列表框中选择一个，�q�且必须选择一个数据表名，选中的表��是要被更新的表�?
        选中了Allow Updates属性后�Q�接下来��p��指定在数据窗口中哪些列被更新。在Updateable Columns列表框中用鼠标单击被更新的字�D�c��当数据�H�口中的字段来自不止一个数据表�Ӟ��q�时一定要选择同一个表中的字段�Q�因��Z��个数据窗口一�ơ只能更 ��C��个数据表。当数据�H�口中增��M��字段�Ӟ��新增�ȝ��字段往往是不允许修改的，一定要在该列表框中选择该字�D�c�?
        选择了可以修改的字段后，��应该在Unique Key Columns(s)列表框中选择惟一标识一行的列。如果在定义数据表时定义了主键，单击右面的Primary Key按钮可以在该列表框中选中主键�?
        Where Clause for Update/Delete�l�框中包含了三个选项�Q�用来配�|�如何在Update和Delete SQL语句中构造where字句的。这三个选项为数据库加锁提供了三�U�不同的选择。当某行被选中�Ӟ��用户可以通过DataWindow对象来提供完整性保护，可以防止其他用户��索该行。这三个选项是：Key Columns、Key and Updateable Columns和Key and Modified Columns。下面分别详�l�介�l��?

1�Q�Key Columns
        当开发单用户应用�E�序或者用户都以加锁方式访问数据库时可以选中该选项。该选项表示数据�H�口只��用在Unique Key Column(s)列表框中指定的惟一列进行数据更新。��用这�U�方式来修改数据库，�q�发性很高，不同的用户都可以�q�发地访问数据库�Q�但是数据的完整性却�? 常差。因此要保证数据完整性，只有在单用户应用�E�序或者加锁访问方式下才��用这�U�修�Ҏ��式�?
        例如�Q�在add_book�Q�通讯录）数据表中定义�?个字�D�，id��Z��键，name、address、telephone、ICQ四个字段为可修改字段�Q? 某数据窗口包含这5个字�D��ƈ且��用Key Columns更新数据库。有如下一条数据：
id�Q?30602710327574
name�Q�朱�?
address�Q�胜利��a�?
telephone�Q?45-8557021
ICQ�Q?9661314
假设甲用户修改了�q�条数据�Q�将name改�ؓ“郭宝�?#8221;�Q�数据窗口��生如下的UPDATE语句�Q?
update add_book
set name = "郭宝�?
where id = "230602710327574"�Q?
其中的where字句中只包含在Unique Key Columns中指定的字段id�Q�用该字�D�|��定要修�Ҏ��据库中哪行数据。该update语句��成功执行。如果乙用户要将address字段修改�?#8220;冀�? 油田”�Q�甲、乙用户同时�q�发修改id�?30602710327574的数据，都会修改成功�Q�但会��生如下的数据�Q?
id�Q?30602710327574
name�Q�郭宝利
address�Q�冀东��a�?
telephone�Q?45-8557021
ICQ�Q?9661314
两个人同时修改了一条记录，本来地址是胜利��a田的郭宝利却成了冀东��a田的了�?

2�Q�Key and Updateable Columns
        �q�种修改方式是缺省的修改方式�Q�它用主键列和可以修改的列来创徏where子句�Q�具有很高的数据完整性，但是�q�发性却不是太好。推荐��用这�U�修�Ҏ��式�?
像上面例子一��P��如果甲用户做修改操作�Q�保存数据时��生如下的SQL语句�Q?
update add_book
set name = "郭宝�?
where id = "230602710327574"
and name = "�׃��"
and address = "胜利油田"
and telephone = "945-8557021"
and ICQ = "39661314"�Q?
该SQL语句中的where子句包含了主键id和所有的可修改字�D�c��如果乙用户是在甲保存修改了的数据之前检索的数据�Q�当乙用戯��address修改�? “冀东��a�?#8221;�Ӟ��产生如下的SQL语句�Q?
update add_book
set address = "冀东��a�?
where id = "230602710327574"
and name = "�׃��"
and address = "胜利油田"
and telephone = "945-8557021"
and ICQ = "39661314"�Q?
此时�Q�由于甲用户已经修改了数据，��name�Ҏ��?#8220;郭宝�?#8221;�Q�所以乙用户的where子句中指定的数据在数据库中已�l�不存在了，乙的修改不成功，从而保证了数据的完整性�?br />
3�Q�Key and Modified Columns
该方法是上面两种�Ҏ��的折��P��当不同的用户�q�发修改同一行数据的不同字段�Ӟ��都能成功修改�Q�所以它的�ƈ发性有了一定的限制�Q�数据的完整性比�W�一�U�修�Ҏ��? 有所提高。这�U�修�Ҏ��式��用主键和数据发生了变化的列来产生where子句。同��P��在上面的例子中，甲用戯��?#8220;�׃��”修改�?#8220;郭宝�?#8221;会��生如下的 SQL语句�Q?
update add_book
set name = "郭宝�?
where id = "230602710327574"
and name = "�׃��"�Q?
�q�时的where子句中只包含主键id和要修改的字�D�name。如果此时乙用户�q�发修改数据�Q�要��id�?#8220;230602710327574”的用��L�� address修改�?#8220;冀东��a�?#8221;�Q�乙用户也会成功修改�?

4�Q�时间标�?
如果数据库管理系�l�支持时间标讎ͼ�则可以在DataWindow对象的结果集中包含时间标记来获得最大的数据完整性。PowerBuilder��自动�ؓ�? 新和删除操作的where子句加上旉��标记�Q�而不昄��在可更新列的列表中。Oracle、SQL Server完全在服务器上处理时间标讎ͼ�在DataWindow中不要求有额外的工作�?

5�Q�Key Modification
该组框用来指定当用户修改了主键时�Q�数据窗口如何来更新数据表中的主键字�D�c��有两种选择�Q�Use Delete then Insert和Use Update�?
�W�一个选项是先删除原有主键��|��然后再��用新的主键值插入一个完整的行。��用这�U�更��C��键的方式可以减少�l�织数据的工作量�Q�但在数据库中各个数据表之间�? 在父子制�U�关�p�，�q�且依赖该主键的外部键被指定为��联删除时�Q�操作就不会成功的。因为��联删除方式要求当依赖主键的外部键有数据时��׃��能删除主键�?
当DBMS允许更新主键列时�Q�可以��用该选项�Q�该选项直接修改主键��|��所以防止了�U�联删除带来的操作不成功的问题�?

6�Q�Identify Column
该下拉列表框用于��Z��拉列表框中所指定的列�Q�通常是主键列�Q�生成序��P��当且仅当DBMS支持序号生成时该作用才有效�?
当正��进行了上述所有操作后�Q�单击OK按钮卛_��成了修改属性的讄��。如果数据窗口允许手工录入数据，接下来就应该讄��可修改字�D늚�相关属性了。主要包括如下属性：
l字段的Tab Order倹{�?
l字段的Protect属性�?
l字段的DisplayOnly属性�?
l字段的Visible属性�?
上述属性前3个中��L��一个都可以让用��h��法修改字�D�中的数据；最后一个属性决定字�D�|��否可见，不可见的字段不管其他属性如何设�|�，用户都无法修改字�D�中�? 数据�?
首先介绍如何讄��字段的Tab Order倹{��用菜单项Format->Tab Order可以在Design�H�口昄��各字�D늚�当前Tab Order��|��用鼠标单击要修改Tab Order值的字段�Q�然后手工将Tab Order值改为非0卛_��。在讄��Tab Order时要注意三点�Q?
�Q?�Q�用户可以手工修改的字段�Q�其Tab Order��g��能�ؓ0�?
�Q?�Q�在数据�H�口修改属性中�Q�不允许修改的字�D�其Tab Order值应该�ؓ0�Q�或者其Display Only属性应该选中�?
�Q?�Q�Tab Order取值决定字�D�获得焦点的��序。在数据�H�口中��用Tab按钮在字�D�间切换�Ӟ��Tab Order取值小的首先获得焦点，最大的最后获得焦炏V�?
字段的Protect属性设�|�字�D�|��否被保护。如果该属性设�|��ؓ1�Q�则不允许用户修改字�D�中的数据，即��Tab Order讄��为非零。字�D늚�DisplayOnly属性决定字�D�中的内�Ҏ��否只用来昄��Q�当属性设�|��ؓ1或者True�Ӟ��字段中的数据不允许用户修改，不管其他几个属性是如何讄��的。Protect属性只能��用表辑ּ��Q�选中字段后在属性视�H�General属性中单击右侧的红色小按钮�Q�如果已�l�有表达式，则按钮�ؓ�l�色�Q�，�q�入到表辑ּ�输入对话框，输入该属性的表达式即可。比如，讄��用户不能修改字段id原来的数据，可以输入如下的表辑ּ��Q?
if(isRowNew(),0,1)
字段的Display属性在属性视�H�Edit中，选中该选项表示该字�D�中的数据只用来昄��Q�不允许用户修改。该属性不能��用表辑ּ�。在PB中，�~�辑�c�d��? 控�g都有该属性，�q�且属性的作用也是相同的�?
当字�D늚�Tab Order��gؓ0�Ӟ��肯定不能获得焦点�Q�但是非0时也不一定能获得焦点�Q�还得看字段的Protect属性是否设�|��ؓ1�Q�当字段的Tab Order��g��?�Q�Protect属性不�?�q�且字段的Visible属性�ؓTrue�Ӟ��肯定可以获得焦点。DisplayOnly属性和焦点是否能够获得无关�?/p>

��Z��您的安全�Q�请只打开�? 源可靠的�|�址
打开�|�站     取消

来自: http://hi.baidu.com/vcvok/blog/item/9e83db1bbbf526dfad6e75cd.html

KE 2010-08-06 15:36 发表评论

PFC inv_resize of_Register

KE — Mon, 12 Jul 2010 09:23:00 GMT

this.of_setresize(true)
inv_resize.of_Register(dw_2,inv_resize.SCALErightBOTTOM)   //SCALEbottom   SCALErightBOTTOM

//inv_resize.of_Register(dw_2,inv_resize.FIXEDRIGHTbottom)

在需要��用的�H�口中定义一个实�?
n_cst_resize inv_resize;
在open事�g中注册窗口上的控�?
inv_resize = create nvo_resize
inv_resize.of_SetOrigSize (this.WorkSpaceWidth(), this.WorkSpaceHeight())
inv_resize.of_Register(dw_list, 0, 0, 0, 100)
inv_resize.of_Register(st_hsplitbar, 0, 0, 0, 0)
inv_resize.of_Register(dw_main, 0, 0, 100,0)
inv_resize.of_Register(st_vsplitbar, 0, 0, 0, 0)
inv_resize.of_Register(dw_preview, 0, 0, 100, 100)
//参数:
1.控�g对象
2.�U�d��时的X坐标位移癑ֈ��?
3.�U�d��时的Y坐标位移癑ֈ��?
4.�U�d��时的WIDTH坐标位移癑ֈ��?
5.�U�d��时的HEIGHT坐标位移癑ֈ��?

在resize事�g中写�?
inv_resize.Event wfc_Resize (sizetype, This.WorkSpaceWidth(), This.WorkSpaceHeight())
在需要��用的�H�口中定义一个实�?
n_cst_resize inv_resize;
在open事�g中注册窗口上的控�?
inv_resize = create nvo_resize
inv_resize.of_SetOrigSize (this.WorkSpaceWidth(), this.WorkSpaceHeight())
inv_resize.of_Register(dw_list, 0, 0, 0, 100)
inv_resize.of_Register(st_hsplitbar, 0, 0, 0, 0)
inv_resize.of_Register(dw_main, 0, 0, 100,0)
inv_resize.of_Register(st_vsplitbar, 0, 0, 0, 0)
inv_resize.of_Register(dw_preview, 0, 0, 100, 100)
//参数:
1.控�g对象
2.�U�d��时的X坐标位移癑ֈ��?
3.�U�d��时的Y坐标位移癑ֈ��?
4.�U�d��时的WIDTH坐标位移癑ֈ��?
5.�U�d��时的HEIGHT坐标位移癑ֈ��?

在resize事�g中写�?
inv_resize.Event pfc_Resize (sizetype, This.WorkSpaceWidth(), This.WorkSpaceHeight())

// Register the controls with the SplitBar
st_v1.of_Register(dw_1, st_v1.left)
st_v1.of_Register(lv_1, st_v1.right)

KE 2010-07-12 17:23 发表评论

PFC autoinstantiate object

KE — Tue, 06 Jul 2010 14:24:00 GMT

1 Declare an instance variable of type n_cst_tree:
n_cst_tree inv_tree
Because PFC defines this object with the autoinstantiate option, you don’t
need to code CREATE or DESTROY statements.

KE 2010-07-06 22:24 发表评论

PFC中关于TreeView的用法讲�?�?

KE — Sun, 04 Jul 2010 02:40:00 GMT

PFC中关于TreeView的用法讲�?/h2>
转自�Q?a style="color: red" >http://www.pb9.com.cn/showtopic-190.html

PFC中关于TreeView的用法讲�?br />
�Q�lily_banana�Q?br />
u_tvs

描述�Q?br /> ��Z�� TreeView 可视用户对象��先。该对象采用数据存储�Q�DataStores�Q�显�C�TreeView 的数据�?br /> U_tvs 是一个自更新的对象�?br /> 对应的库�Q?br /> PFCMAIN.PBL
PFEMAIN.PBL
对象关系�Q?br /> Object relationships
PFC 可视用户对象被设计用于从w_master�l�承来的�H�口。U_tvs 也用于：
m_tv
n_cst_infoattrib
n_ds
n_cst_luw
n_cst_tvsrv
n_cst_tvsrv_levelsource
n_cst_print
用法�Q?br /> 在窗口中用该可视用户对象代替PowerBuilder�?TreeView 控�g�?U_tvs 事�g的脚本可以和PFC的菜单进行集成�?br /> 要��?u_tvs:
1 在窗口中��d��一个u_tvs用户对象控�g�?br /> 2 �Ҏ��需要��TreeView 的服务可用：
this.of_SetPrint(TRUE)
this.of_SetLevelSource(TRUE)
this.of_SetBase(TRUE)
3 为树的每一层指定数据源�Q?br /> String ls_sql
Integer li_return

ls_keys[1] = "dept_id"
this.inv_levelsource.of_Register(1, "dept_name", "", "d_deptlist", SQLCA, "")
ls_keys[1] = "emp_id"
this.inv_levelsource.of_Register(2, "emp_lname", ":parent.1.dept_id", &
"d_empbydept", SQLCA, "")
4 �Ҏ��需要�ؓ树脂定其余的昄��信息�Q?br /> this.inv_levelsource.of_SetPictureColumn(1, "1")
this.inv_levelsource.of_SetSelectedPictureColumn(1,"2")
this.inv_levelsource.of_SetPictureColumn(2, "4")
this.inv_levelsource.of_SetSelectedPictureColumn(2, "5")

5 ��?TreeView的第一行：
this.event pfc_populate(0)
6 扩展pfc_Retrieve 事�g使检索参数生效：
Any la_args[20]
Integer li_level

IF IsValid(inv_levelsource) THEN
li_level = this.of_GetNextLevel(al_parent)
this.inv_levelsource.of_GetArgs(al_parent, li_level, la_args)
END IF
Return this.of_Retrieve(al_parent, la_args, ads_data)

7 �Ҏ��需要调用u_tvs 的其他函数�?br /> 要获取关于TreeView 的更多信息，参见《PowerBuilder User's Guide�?br />
n_cst_tvsrv_print

描述�Q?br /> TreeView 打印服务

对应的库
PFCAPSRV.PBL
PFEAPSRV.PBL

用法�Q?br />
要��用该�pȝ��Q?br />
1 调用u_tvs of_SetPrint 函数�Ȁ�z�该服务�Q?br /> tv_1.of_SetPrint(TRUE)
2 调用of_PrintTree 函数来打�?TreeView 数据�Q?br />
String ls_levelpicts[10]
String ls_levelselpicts[10]

ls_levelpicts[1] = "dept.bmp"
ls_levelpicts[2] = "emp.bmp"
ls_levelselpicts[1] = "deptsel.bmp"
ls_levelselpicts[2] = "empsel.bmp"
tv_1.inv_print.of_PrintTree(0, TRUE, ls_levelpicts, ls_levelselpicts)

of_Register 函数�Q?br /> 语法1 通过一个DataWindow 对象来显�C�数据�?br /> 描述�Q?br /> 通过��索DataWindow对象的行来徏立TreeView的各�U�数据层
范围�Q?br /> Public
语法�Q?br /> tvcontrol.instancename.of_Register ( level, labelcolumn, retrievespec, dwobject, trans, filterspec )

参数描述�Q?br /> tvcontrol u_tvs-based TreeView 控�g的实�?br /> instancename n_cst_tvsrv_levelsource的实�?( u_tvs 的确省��gؓ inv_levelsource)
level Integer 指定TreeView 数据的层�ơ及数据
labelcolumn String 指定u_tvs 用于TreeView��Ҏ��{��dwobject 的列名�?br /> retrievespec String 包含用于dwobject ��索条�?br /> dwobject String 指定用于数据��索的 DataWindow 对象
trans N_tr 用于��索dwobject的事务对象。如果该参数未指定，则dwobject必须已含有数据�?br /> filterspec String 包含需要的�q��o条�g

�q�回�?br /> Integer. 具体如下�Q?br /> �?1 成功
�?-1 参数有效性错�?br /> �?-2 Dwobject 没有指定键列�Q�key columns�Q?br /> �?-3 上一层被标记为��@环�?br /> �?-4 Column level datatype was not in the data source
�?-5 为数据源讄��事务对象出错
�?-7 Cache 注册错误

用法�Q?br /> TreeViwe的每一层调用该函数一�ơ�?br /> ��索参数的格式如下�Q?br /> :scope.level.column

where:

�?Scope 指定层（Level�Q�或者父层（Parent�Q�：
�?Level �l�对层数
�?Parent 和当前层相关的数

�?�Ҏ��Scope指定的数的性质不同�Q�Level 来制定一个绝�Ҏ��相对层数�?br /> Scope 指定 Level 指定
Level
你指定的�l�对数。例如：:level.1.emp_name 表示��索参数来自于��先�?1层的emp_name �?br />
Parent 你指定的��相对于当前层的倹{��例如， :parent.2.emp_name 表示��索参数来源于上两层祖先的emp_name �?br />
�?Column 指定含有用于��索参数值的DataWindow 对象的列�?br />

of_SetPictureColumn 函数�Q?br />
描述�Q?br /> 指定未选中时的图标
范围�Q?br /> Public
语法�Q?br /> tvcontrol.instancename.of_SetPictureColumn ( level, column )

参数描述�Q?br /> tvcontrol u_tvs-based TreeView 控�g的实�?br /> instancename n_cst_tvsrv_levelsource的实�?( u_tvs 的确省��gؓ inv_levelsource)
level Integer 指定被设�|�图标的层号
column String 指定下述之一�Q?br /> �?u_tvs 用于扑ֈ�囄��的DataWindow 对象的列名，该列可以包括一个文件名或者一个��|��指示 u_tvs 来找�?TreeView的图片序列号
�?��|�� 指示 u_tvs 来找�?TreeView的图片序列号

�q�回��|��
Integer. 1�Q�成功；-1�Q�失败�?br />
用法�Q?br /> 调用该函数前需要调用of_Register函数

KE 2010-07-04 10:40 发表评论

KE — Thu, 01 Jul 2010 13:35:00 GMT
文章来源�Q?font color="#ff0000">http://www.itfensi.com/exploit/FoxPro/11702662832718_8.html
�q�一章主要介�l�了什么是PFC的Services �Q�以及如何��用它们�?

　　一、应用程序服�?

　　 PFC提供了以下各�U�应用程序Services �Q?

DataWindow caching

Debugging

Error

Application preference

Most recently uesed object

Security

Transaction registration

　　你必��通过n_cst_appmanager�Q�应用程序管理器�Q�来控制�q�些 Services �Q�这些Services实际上是应用�E�序��理器的是数据成员）。应用程序管理器�Q�application manager�Q�通过调用成员函数来开启与关闭Services 。由于它们在应用�E�序��理器的范围内有效。而应用管理器是全局变量�Q�因此你可以在你的应用程序的��M��地方是��用应用程序Services �?

　　1. DataWindow caching service

　　概要�Q?

Datawindow caching service为Datawindow提供了数据缓册Ӏ�它��数据保存在内存中，从而减��了�E�序讉K��数据库的频率�Q�加快了�E�序的执行速度�?Datawindowcaching service支持如下的数据源�Q?

　　l_ Datawindow对象�Q�它的数据可以来自于数据库表也可以来自存储过�E��?

　　l_ SQL语句

　　l_ Datawindow控�g

　　l_ DataStore对象

　　l_ 数组中的数据

　　l_ 文�g

　　PFC使用Powerbuilder的Datastore来实现Datawindow caching service 。它对的对象是n_cst_dwcache �?

　　PFC的代码实际只在父�c�d��象中�q�本书讲�q�的都是扩展�cȝ��对象�Q�就�?n_cst_dwcache 。而实际上PFC的代码全在父�cȝ��对象中（pfc_n_cst_dwcache�Q��?

　　使用�Ҏ��

　　使用DataWindow caching 可以��数据库讉K��频率降到最低，可以加快�E�序�q�行速度�?

　　2 开启DataWindow caching

　　l_ 调用n_cst_appmanager的of_SetDWCache函数

　　gnv_app.of_SetDWCache�Q�TRUE�Q?

　　(1) 使用Datawindow caching �Q?

(1). 调用of_Register函数�q�行数据�~�存�Q�同时依据不同的数据提供相应的参数�?

　　l_ �~�存Datawindow对象从数据库中检索出的数据时�Q�你需要传递标识符�Q�identifier�Q�、事务对象、Datawindow对象名、其他参敎ͼ�如果存在的话�Q��?

　　l_ �~�存SQL语句从数据库中检索出的数据时�Q�你需要传递标识符�Q�indentifier�Q�、事务对象、SQL语句�?

　　l_ ��数据缓存到数组中：传递标识符�Q�identifier�Q�、Datawindow对象名、数据�?

　　l_ �~�存DataWindow控�g中的数据�Q�传递标识符�Q�identifier�Q�、Datawindow控�g�?

　　l_ �~�存DataStore中的数据�Q�传递标识符�Q�identifier�Q�、DataStore对象�?

　　l_ �~�存文�g中的数据�Q�传递标识符�Q�identifier�Q�、文件名�?

　　(2) 你可以��用函数of_IsRegistered�Q�参数是对象本��n�Q�，��定DataWindow对象是否已经在caching service中注册了�?

　　(3) 调用函数of_GetRegistered函数讉K��已经�~�存的数据�?

　　 Gnv_app.inv_dwcache.of_GetRegistered�Q�攄_emplist敚琲ds_datastore�Q?

　　 Ids_datastore.ShareData�Q�dw_emplist�Q?

　　(4) 调用函数of_Refresh��索已�l�缓存数据的DataWindow �?

　　(5). 调用函数of_UnRegister函数停止数据�~�存服务�?

　　(6) �Q�可选）调用n_cst_appmanager的of_SetDWCache函数关闭DataWindow cachi ng service �?

　　gnv_app.of_SetDWCache�Q�FALSE�Q?

　　通常你没必要昄��的关闭DataWindow caching service 。PFC在删除对象n_cst_dwcache时会自动的关闭它�?

　　2. Debugging service

　　概要�Q?

　　Debugging service 在应用程序遇到错误时会自动显�C�错误信息。PFC的消息�\由当发现需要调用的事�g不存在时便会使用Debugging service昄��出错信息�?

　　重要说明�Q?/strong>PFC debugging service 只是一个开发工兗��在用户的应用程序中不要开启它�?

　　使用�Ҏ��

　　使用debugging service 可以帮助你在PFC的开发过�E�中解决问题�?

　　(1) 调用n_cst_appmanager的of_SetDebug函数开启Debugging service �?

　　 gnv_app.of_SetDebug�Q�TRUE�Q?

　　(2) PFC的对象首先检��应用程序的debugging状态，然后在适当的情况下昄��错误信息�?

　　(3) �Q�可选）调用n_cst_appmanager�?of_SetDebug函数关闭Debugging service�?

　　 gnv_app.of_SetDebug�Q�FALSE�Q?

　　多数情况下，你不需要显�C�的关闭Debugging service �?

　3. Application preference service

　　概要�Q?/strong>

　　你可以利用Application preference service保存、恢复应用程序、用��L��信息到INI文�g或WINDOWS�?a class="infotextkey" target="_blank">注册�?/a>中。保存和恢复应用�E�序讄��有如下两个好处：

　　l_ 延箋性：保存应用�E�序的设�|�可以��得用户在下次使用软�g时可以看��C��上次关闭软�g的样子。也��是说用户不必每�ơ��用��Y件时都重新设�|�他的��Y�?a class="infotextkey" target="_blank">环境�?

　　l_ �Ҏ��l�护�Q�你可以无须更改n_cst_appmanager的代码的情况下更新应用程序的讄��?

　　PFC通过用户自定义对象n_cst_apppreference提供Application preference ser vice �?

　　�q�个Service保存应用�E�序的如下信息：

　　用户键（User key�Q?

MicroHelp

Help File

Version

Logo bitmap

Copyright notice

DDETimeOut property

DisplayName property

DWMessage Title property

MicrohelpDefault property

RightToLeft property

ToolbarFrameTitle property

ToolbarPopMenuText property

ToolbarSheetTitle property

ToolbarUserControl property

Application preference service 同时保存如下的用户信�?

ToolbarText property

ToolbarTips property

User ID

　　保存、恢复设�|?

　　Application perference service 在应用程序开启的时候会自动恢复应用�E�序在关闭时保存的设�|�。这些信息可以保存到注册�?/a>中（只限于Windows95和Windows NT�Q�或者INI文�g中。你可以按照如下说明�Q?

　　l_ 保存�?a class="infotextkey" target="_blank">注册�?/a>中：调用函数of_SetUserKey �Q�指定你需要保存的键�?

　　l_ 保存到INI文�g中：调用函数of_SetUserINIFile �Q�指定用于保存信息的INI文�g名�?

　　使用步骤�Q?

　　(1) 调用n_cst_appmanager的of_SetAppPref函数开启Application preference s ervice �?

　　gnv_app.of_SetAppPref�Q�TURE�Q?

　　(2) 依据不同的执行��^台采用不同的方式保存应用�E�序信息。下面的例子��是在应用程序的构造事件中保存应用�E�序的信息。同时假设你已经�?n_cst_appmanager中徏立好了应用程序信息键、用户信息键、应用程序INI文�g、用户INI文�g�?

IF this.of_IsRegistryAvailable() THEN

this.inv_apppref.of_SetAppKey(this.of_GetAppKey()) this.inv_

apppref.of_SetUserKey(this.of_GetUserKey())

ELSE

this.inv_apppref.of_SetAppINIFile(this.of_GetAppINIFile()) this.inv_ap

ppref.of_SetUserINIFile(this.of_GetUserINIFile())

END IF

　　(3) 调用函数of_SetRestoreApp和of_SetRestoreUser函数讄��需要保存信息的�c�d��Q?

this.inv_apppref.of_SetRestoreApp(TRUE)

this.inv_apppref.of_SetRestoreUser(TURE)

　　4. Most recentily used object service

　　概要

　　你可以��用Most recentily used object service�Q�最�q��用对象Service�Q�将最�l��用的对象、表单列在文件菜单下。默认情况下只允许显�C?个最�l��用对象�?

　　但是�Q�你可以改变�q�个数量�?

　　PFC 通过n_cst_mru用户自定义对象提供MRU Service�Q�Most recentily uesd ob ject service�Q��?

　　MRU Service在应用程序启动时会自动的��应用程序关闭时保存的最�l��用过的对象信息加载到应用�E�序中。这些信息可以保存到注册�?/a>或者INI文�g中。你可以通过如下的方式：

　　l_ 保存�?a class="infotextkey" target="_blank">注册�?/a>中：调用函数of_SetUserKey函数��定要保存到注册�?/a>中的MRU信息�?

　　l_ 保存到INI文�g中：调用函数of_SetUserINIFile函数指定用于保存MRU信息的INI文�g�?

　　l_ 你必��还要额外编写代码：

　　��Z��使用MRU Service �Q�你必须在你惛_��用MRU Service的窗口的两个事�g中编写代码�?

　　l_ pfc_MRUProcess �Q�在�H�口开启时加蝲MRU信息�?

　　l_ pfc_PreMRUSave �Q�在�H�口关闭时保存MRU信息�?

　　与PFC菜单的结�?

　　PFC�?m_master菜单的FILE菜单包括了五个MRU菜单��，你还可以自己��d��?

　　如果你的应用�E�序没有使用PFC的菜单，那么请以 m_master为模板徏立你自己的M RU菜单��V�?

　　使用MRU Service步骤

　　(1) 调用n_cst_appmanager中的of_SetMRU函数开启MRU Service �?

　　 gnv_app.of_SetMRU�Q�TRUE�Q?

　　(2) 调用n_cst_appmanager的函数of_SetUserKey�Q�尽适用于WIN95与WINNT�Q�或of

　　 _SetUserINIFile函数�Q��用于所有的�q�_��Q�确定需要保留的信息。下面的例子假设你已�l��ؓn_cst_appmanager建立好了的用户键�Q�保存到注册�?/a>�Q�或者INI文�g�Q�保存到INI文�g�Q�。下面的代码位于应用�E�序��理器（n_cst_appmanager�Q�的构造事件�?

IF this.of_IsRegistryAvailable() THEN

this.inv_mru.of_SetUserKey(this.of_GetUserKey())

ELSE

this.inv_mru.of_SetUserINIFile(this.of_GetUserINIFile())

END IF

(3) Register IDs with the MRU service by calling the n_cst_mru of_Regis

ter function. An ID is the identifier that the window will use to retr

ieve information out of the MRU service. This is an example of code yo

u can add to the pfc_PreOpen event of the MDI frame window:

IF IsValid(gnv_app.inv_mru) THEN gnv_app.inv_mru.of_Register("myapp")

END IF

(4) Extend the pfc_MRUProcess event in each window that uses exclusive

processing, adding code to open the sheet passing the necessary argume

nts (be sure to add similar code to the frame window if you want to sp

ecify exclusive items on the frame menu):

Window lw_frame, lw_window n_cst_menu lnv_menu n_cst_mruattrib lnv_mru

attrib // Check parameters. IF IsNull(ai_row) THEN Return -1 END IF

IF NOT IsValid(gnv_app.inv_mru) THEN Return -1 END IF // Retrieve row

from DataStore. gnv_app.inv_mru.of_GetItem & (ai_row, lnv_mruattri

b) // Get the MDI frame, if necessary. lnv_menu.of_GetMDIFrame(this.me

nuid, lw_frame) OpenSheet(lw_window, & lnv_mruattrib.is_classname,

lw_frame) Return 1

Performing other actions in the pfc_MRUProcess eventTo see other types

of processing you can perform in the pfc_MRUProcess event, see the co

mments in the pfc_w_master pfc_MRUProcess event.5Extend the pfc_PreMRU

Save event in each window that uses the MRU service. In this event, po

pulate the n_cst_mruattrib object with the id, classname, key, item, a

nd MicroHelp to be saved:

anv_mruattrib.is_id = "myapp" anv_mruattrib.is_classname = this.ClassN

ame() anv_mruattrib.is_menuitemname = this.Title anv_mruattrib.is_menu

itemkey = this.ClassName() anv_mruattrib.is_menuitemmhelp = & "O

pens " + this.Title Return 1 6Extend the pfc_MRURestore event in eac

h window that uses the MRU service. In this event, set the ID of the i

nformation you want to display on the menu:

If IsValid(gnv_app.inv_mru) Then Return gnv_app.inv_mru.of_Restore

("myapp", This) End If

5. Error message service

　　概要

　　Error Message service提供了许多用于显�C�、纪录应用程序的错误信息。你既可以显�C�PowerBuilder提供的标准的Message对话框，也可以显�C�PFC 的W_Message对话框。两�U�显�C�效果都��h��如下的功能：

　　l_ 消息日志�Q�将消息�U�录到文件中�Q�支持多�U��^台。PFC会自动的��严重��别大于某个值的消息�U�录到文件中�?

　　l_ 支持MAPI�Q�通过Email发出错误警告。PFC会自动将严重�U�别大于某个值的消息作�ؓ 邮�g发出�?

　　l_ 消息数据库：通过已经定义好的形式�Q�可以是数据库或文�g�Q�来存取消息。定义好了消息格式，使得消息有一�U�标准的形式、消息的重复减到最��、容易查询�?

　　l_ 参数替代�Q�消息可以具有参敎ͼ��q�样它会依据�E�序�q�行而变化�?

　　l_ 不显�C�，直接�U�录�Q�消息可以不昄��直接�U�录到日志中�?

　　l_ 注释与打华ͼ�用户可以打印消息�Q�甚臛_��以增加注释。对消息日志用于邮�g旉��常有用的�?

　　l_ 自动关闭�Q�w_message�q�了数秒后会自动关闭�?

　　W_message 位图

　　如果你��用w_message �Q�位囑֜��q�行时必��L��效�?

　　用法

　　Error service可以处理应用�E�序所有的错误信息。如果你打算��错误信息保存到数据库中�Q�你可以使用PFC.DB中关于消息的几个表，或��用消息管道将它传��C��的数据库中�?

　　使用Messages�?

　　大多数情况下�Q�你应该��Messages表复制到你的数据库中。这个表已经包含了PFC的错误信息格式�?

　　使用步骤�Q?

　　(1) 调用n_cst_appmanager的of_SetError函数开启error message service�Q�创建n_cst_error实例�Q�，下面的代码位于n_cst_appmanager的pfc_Open事�g�Q?

　　 this.of_SetError�Q�TRUE�Q?

　　(2) 定义错误消息的源�Q?

　　l_ 如果消息源是文�g�Q�调用如下函敎ͼ�

　　 this.inv_error.of_SetPredefinedSource(�?/eisapp/eiserr.txt?

　　l_ 如果消息源是数据库，调用如下函数�Q?

　　this.inv_error.of_SetPredefinedSource �Q�itr_error�Q?

　　消息源：当你使用文�g作�ؓ消息源时�Q�文件中必须包括PFC.DB中Messages表中的所有数据。同时列必须由TAB键隔开�?

PFC uses predefined messages in certain situations. If you enable the

error message service and receive message display errors, make sure th

e error message source has been established correctly. Additional user

-defined messages must conform to the format of the messages table (al

so used by the d_definedmessages DataWindow object).

　　l_ �Q�可选）讄��日志文�g名（调用函数of_SetLogFile参数为空字符串可以不�q�行日志�U�录�Q�：

　　 this.inv_error.of_SetLogFile�Q�擟:/pb6/errlog.txt�?

　　l_ �Q�可选）讄��用户ID�Q�用于日志文�Ӟ��Q?

this.inv_error.of_SetUser�Q�this.of_GetUserID�Q�）�Q?

　　l_ �Q�可选）讄��什么类型的消息需要自动纪录：

this.inv_error.of_SetNotifySeverity�Q?�Q?

this.inv_error.of_SetLogSeverity�Q?�Q?

　　l_ �Q�可选）如果你的应用�E�序使用了错误自动通告功能。你需要设�|�当前用��L��Email、密码。还可以讄��其他的Email用户与密码。下面的例子展示了如何设�|�Email ID与Password �?

this.inv_error.of_SetNotifyConnection(ims_mailsess) this.inv_error.of

_SetNotifyWho(is_autonotify)

　　说明�Q�以上的代码都可以在n_cst_appmanager的pfc_Open事�g中�?

　　l_ 在应用程序的错误��中�Q��用函数of_Message昄��对话框。同时你�q�可以将它纪录到日志中。函数of_Message可以使用数据库中的消息，也可以动态的指定消息。下面的例子��是使用数据库中的消息：

　　gnv_app.inv_error.of_Message

　　使用参数表（只限于已定义的消息）

　　(1) 在消息表中定义如下的数据�?�q�行时将被替换：

　　 EIS1030 Unable to find the file % in %

　　(2) 定义一个参数数�l�：

　　String ls_parms[]

　　ls_parms[1] = 揕ogfile.txt?

　　 ls_parm[2] = �?/windows/system?

　　(3) 调用of_Message �Q�传递参敎ͼ�

　　gnv_app.inv_error.of_Message�Q�擡IS1030敚琹s_parms�Q?

　　PFC在显�C�消息时使用数组中的�W�一个元素替换第一�? �Q�第二元素替换第二个%�?br />
　6. Security service

　　概要

　　PFC的安全机制可以处理许多你的应用程序安全性问题。它包括应用�E�序��理员组件、安全对象（security object�Q�n_cst_security �?

　　用法�Q�在使用Security service�Ӟ��你必��要定义用户�l�与用户�Q�然后分别与�H�口、菜单、用户对象、控件相兌��Q�然后再�~�写代码�?

　　使用步骤�Q?

　　(1) 定义用户、用��L��。参考第七章擯FC Utilities?

　　��Z��的窗口控件、菜单、用户对象、其他控件定义安全属性�?

　　(2) 调用n_cst_appmanager的of_SetSecurity函数创徏安全对象this.of_SetSecurity�Q�TRUE�Q?

　　(3) 为安全对象徏立一个事务对象�?

　　Itr_sec = Create n_tr

　　Connect using itr_sec�Q?

　　(4) 调用函数of_InitSecurity初始化安全对象�?

　　 This.inv_security.of_InitSecurity�Q�itr_sec.擡ISAPP敚琯nv_app.of_GetUserID�Q�）

　　(5) 以上的代码全部在n_cst_appmanager的pfc_Open事�g中编写�?

　　(6) 应用�E�序关闭�Ӟ��断开事务对象的连接、删除事务对象。以下的例子在n_cst _appmanager的pfc_Close事�g中�?

　　Disconnect using itr_sec;

　　Destroy itr_sec

　　7. 在你需要��用安全对象的�H�口的Open事�g或pfc_PreOpen事�g中调用函数of_SetSecurity�Q�）

IF NOT gnv_app.inv_security.of_SetSecurity(this) THEN

MessageBox("Security","Unable to set security")

Close(this)

End if

　　说明�Q�你可以在其他对象（Datawindow、可视用户对象、菜单，所有你惛_��现安全机制的对象�Q��?

　　7. Transaction registration service

　　概要

　　 Transaction registration service可以�q�踪你的应用�E�序中的事务对象的��用过�E�。这个服务只对基于n_tr的对象有效。PFC使用n_cst_trregistration 对象实现Transaction registration service �?

　　用法

　　当应用程序中使用多个事务对象�Ӟ��你应该��用Transaction registration service跟踪所有的事务对象。当你的应用�E�序关闭�Ӟ��该对象将会自动删除所有已注册的事务对象。��用n_tr的函�?of_SetAutoRollback讄��ib_autorollback的倹{��如果ib_SetAutoRollback的��gؓFalse �Q�则事务对象关闭时将会自动提交。如果ib_SetAutoRollback的��gؓTrue �Q�则事务对象关闭时会自动回滚�?

　　启动 Transaction registration service

　　l_ 调用n_cst_appmanager的of_SetTrRegistration函数 gnv_app.of_SetTrRegistration�Q�True�Q�当应用�E�序关闭�Ӟ��应用�E�序会自动删�?Trasaction registration service �?

　　注册事务对象�Q?

　　l_ 调用n_cst_trregistration的of_Register函数 gnv_app.inv_trregistration.of_Register�Q�SQLCA�Q?控制当事务对象正处于�q�接时被删除时的行�ؓl_ 调用n_tr的of_SetAutoRollback函数SQLCA.of_SetAutoRollback�Q�True�Q�如果你讄��为True �Q�同时该对象正处于连接状态，当它被删除时Service会回滚该事务。如果你讄��为False �Q�Service回提交该事务。尽��如此，你应该显�C�的提交或回滚、断开�q�接�?

　　2 Datawindow服务

　　概要

　　大部分的PowerBuilder的应用程序都大量的��用了Datawindow控�g。PFC因此提供了功能强大的Datawindow Services 。大部分的Service使用时只需一点代码或者根本不需要编码。PFC的Datawindow Servies实际上都是由一个公��q��父类对象�Q�不可视用户自定义对象）�l�承而来。这个父�c�d��象包括了许多Service的函数、事件、实例变量。同时么每个Datawindow Service�q�有自己的函数、事件、实例变量�?

　　讉K��Datawindow Services

　　��Z��使用DataWindow Services�Q�你应该建立��Z��u_dw的Datawindow对象。U_dw对象包括�Q?

　　l_ 用于开启、关闭Datawindow Services的函数�?

　　l_ 用于调用各种Services的函数、事件、实例变量的引用变量�?

　　l_ 调用Datawindow Service的函数、事件的Precoded事�g、用户事�?

　　l_ 可供你编写代码的�I�Z��件在你的应用�E�序中所有的DataWindow控�g都必��L��u_dw的子�c�R�?

　　开启DataWindow Services

　　只开启Datawindow控�g需要的Servie �Q�这��h��能将应用�E�序的负荷将到最��。以下表格列��Z��所有的Datawindow Service �Q�以及对应的对象�?

　　 DataWindow Service 对应的对�?br />

Datawindow service的基�c?n_cst_dwsrv

Dropdown search service n_cst_dwsrv_dropdownsearch

Filters service n_cst_dwsrv_filter

Find andreplace service n_cst_dwsrv_find

Linkage service n_cst_dwsrv_linkage

Multitable update service n_cst_dwsrv_multitable

Print preview service n_cst_dwsrv_printpreview

DataWindow property service n_cst_dwsrv_property

Querymode service n_cst_dwsrv_querymode

Reporting service n_cst_dwsrv_report

Required column service n_cst_dwsrv_reqcolumn

DataWindow resize service n_cst_dwsrv_resize

Row management service n_cst_dwsrv_rowmanager

Row selection service n_cst_dwsrv_rowselection

Sort service n_cst_dwsrv_sort

　8. DataWindow Services 的父�c?

　　概要

　　 DataWindow Services的父�c�d��括了所有DataWindow Services需要的Instance变量、事件、函数。PFC使用n_cst_dwsrv实现DataWindow Services的父�c�R�?

　　DataStore Service�Q�DataStore Service的对象是n_cst_dssrv

　　用法

　　你可以��用这些Service实现如下功能

　　l_ 获取、设�|�DataWindow信息

　　l_ 修改、获取DataWindow脚本函数

　　l_ 默认DataWindow service

　　父类函数在子�c�M��有效

　　因�ؓn_cst_dwsrv是所有DataWindow services的父�c�，因此所有在n_cst_dwsrv的函数在它的子类中都有效�?

　　开启Basic DataWindow service

　　l_ 调用u_dw的of_SetBase函数

　　 dw_emplist.of_SetBase�Q�TRUE�Q?

　　当Datawindow被删除时u_dw会自动删除该Service �?

　　讉K��DataWindow

　　l_ 调用n_cst_dwsrv中的函数

　　l_ 定义�c�d��为n_cst_conversion的变�?

　　n_cst_conversion inv_conversion

　　因�ؓn_cst_conversion是自动实例化�Q�因此不需要��用Create或者Destroy语句�?

　　调用转换服务的函敎ͼ�

　　l_ 调用函数

　　下面的例子假设inv_conversion是实例变量：

　　 String ls_checked

　　Ls_checked = inv_conversion.of_String�Q�cbx_confirmed.Enabled�Q?

　　MessageBox

　　7 日期/旉��服务

　　概要

　　PFC的日�?旉��提供了许多用于计��日期、时间的函数。例如，你可以��用of_SecondsAfter函数计算两个旉��之间的秒数。它对应的对象是n_cst_datatime �?

　　对象 n_cst_datatime对象是自动实例化�Q�因此你无须使用Create或Destroy语句�?

　　使用说明�Q?

　　你可以��用日�?旉��服务�q�行有关日期/旉��的计��。该服务提供了以下函敎ͼ�

　　l_ ��Julian日期转换成Gregorian日期

　　l_ ��秒数�{换成��时

　　l_ ��秒数�{换成天数

　　l_ ��Gregorian日期转换成Julian日期

　　l_ 计算两日期之间的�q�数

　　l_ 计算两日期之间的月䆾

　　l_ 计算两日期之间的周数

　　l_ 计算两日期之间的�U�数

　　l_ 计算两日期之间的毫秒

　　l_ 判断日期是否有效

　　l_ 判断某日是否是��^日（非周日）。原文：Determine if a date falls on a weekday

　　l_ 判断某日是否是周�?

　　l_ Halt processing until a specified date/time

　　你可以将n_cst_datetime定义成全局变量、实例变量、局部变量�?

　　日期/旉��函数使用说明变量�c�d��

　　贯穿整个应用�E�序全局变量或者n_cst_appmanager的实例变�?

　　针对一个对�?该对象的实例变量

　　针对一�D�代�?局部变�?

　　开启日�?旉��服务�Q?

　　l_ 定义�c�d��为n_cst_datetime的变�?

　　n_cst_datetime inv_datetime

　　�c�d��n_cst_datetime是自动实例化的，因此无须使用 Create或Destroy语句调用日期/旉��服务的函敎ͼ�

　　l_ 直接调用函数

　　下面的例子假�?inv_datetime是实例变�?

　　Long ll_seconds,ll_days

　　Ll_seconds = Long�Q�sle_seconds.Text�Q?

　　Ll_days = inv_datetime.of_Days�Q�ll_seconds�Q?

　　MessageBox�Q�擠ate/Time敚琒 tring�Q�ll_seconds�Q? ?seconds is equal t

　　o ?+ String�Q�ll_days�Q?+ ?days。摚?

　8 文�g服务

　　概要

　　PFC的文件服务��得你的应用程序可以具�?a class="infotextkey" target="_blank">文�g��理器功能。例如，你可以��用f_FileRename函数改变文�g名称。文件服务支持多�U?a class="infotextkey" target="_blank">操作�pȝ��Q�针对各�U?a class="infotextkey" target="_blank">操作�pȝ��该服务会自动的调用相应的外部函数。它对应的对象是n_cst_filesrv �?

　　使用说明�Q?

　　通过文�g服务你可以��用如下操作：

　　l_ Assembling a concatenated filename �?

　　l_ 建立、删除目录�?

　　l_ 诅R��写、重命名、复制文件。适用于大�?2765字节的文件�?

　　l_ 讉K��文�g信息�Q�包括日期、时间�?

　　l_ 在一个目录下创徏、排序文件�?

　　你可以将n_cst_filesrv定义成全局、实例、局部变量�?

　　使用情况变量�c�d��

　　贯穿整个应用�E�序全局变量或者n_cst_appmanager的实例变量针对一个对�?对象的实例变量针对一�D�代�?局部变量由于PFC会根据特定的�q�_��创徏n_cst_filesrv的子�c�R��因此它没有使用PB的自动实例化功能。你必须昄��的调用Destroy语句删除该对象�?

　　开启文件服务：

　　1. 定义�c�d��为n_cst_filesve的变�?

　　 n_cst_filesrv inv_filesrv

　　2. 调用全局函数f_set_filesrv�Q?

　　 f_SetFilesrv�Q�inv_filesrv,TRUE�Q?

　　该函��C��自动的徏立对象inv_filesrv �?

　　3. 使用完毕后删除对�?

　　Destroy inv_filesrv

　　调用文�g服务的函敎ͼ�

　　l_ 直接调用函数

　　该例子调用函数of_FileRead讉K��文�g信息。该例子假设inv_filesrv是实例变量：

Integer li_return

String ls_file[]

li_return = inv_filesrv.of_FileRead(sle_filename.text, ls_file)

CHOOSE CASE li_return

CASE ?

MessageBox("Error", "Error accessing file")

CASE ELSE

// File processing goes here

END CHOOSE

　　删除该服务：

l_ 使用DESTROY语句

DESTROY inv_filesrv

　　9 INI文�g服务

　　概要

　　PFC的INI文�g服务提供了许多读、写INI文�g的函数。它对应的对象是n_cst_ini file�?

　　使用说明�Q?

　　你可以��用INI文�g做到如下�Q?

　　l_ ��索INI文�g中的所有键

　　l_ ��索INI文�g中的所有段

　　l_ 删除INI文�g中的所有行

　　l_ 删除INI文�g中一�?

　　l_ 删除INI文�g中一�D?

　　你可以同时��用ProfileInt、ProfileString�?SetProfileString讉K��INI文�g�?

　　INI文�g服务对大��写不敏感�?

　　开启INI文�g服务�Q?

　　l_ 定义�c�d��为n_cst_inifile的变量：

　　n_cst_inifile inv_ini_handler

　　该类型属于自动实例化�Q�因此你无须调用Create与Destroy �?

　　使用INI文�g服务�Q?

　　l_ 调用n_cst_inifile的对象函敎ͼ�

String ls_keys[]

Integer li_count, li_size

Li_size = inv_ini_handler.of_GetKeys�Q�gnv_app.of_GetAppINIFile�Q�）�Q?

CustApp s_keys�Q?

Lb_keys.Reset�Q�）

For li_count = 1 to li_size

Lb_keys.AddItem�Q�ls_keys[li_count]�Q?

Next

10 数字服务

　　概要

　　PFC的数字服务提供的函数使得你可以处理二�q�制数。例如，你可以��用of_GetB it函数判断一位是开�q�是兟�?

　　使用说明�Q?

　　你可以��用数字服务中的函数做刎ͼ�

　　l_ 判断一位是开�q�是�?

　　l_ ��十�q�制转换成二�q�制

　　l_ ��二�q�制转换成十�q�制

　　与Window SDK共同使用该对象：Windows SDK中许多函数都使用位返回倹{��因此你需要��用函数f_GetBit�?

　　你可以将n_cst_numerical定义成全局、实例、局部变量��用说�?变量�c�d��贯穿整个应用�E�序全局变量或者n_cst_appmanager的实例变量针对一个对�?对象的实例的变量针对一�D�脚�?局部变量开启数字服务：

　　 l_ 定义�c�d��为n_cst_numerical的变�?

　　n_cst_numerical inv_numerical

　　�c�d��n_cst_numerical自动实例化，你无��M��用Create或者Destroy语句�?

　　调用数字服务�Q�numerical service�Q�函敎ͼ�

　　l_ 直接调用函数

　　下面的例子假�?inv_numerical是实例变量：

Long ll_base10

String ls_binary

Ll_base10 = Long�Q�sle_base10.text�Q?

Ls_binary = inv_numerical.of_Binary�Q�ll_base10�Q?

MessageBox("Numerical", String(ll_base10) + " base 10 is equal to " +

String(ll_base10) + " base 10 is equal to " + ls_binary + " in binary.

")

　　11 �q�_��服务

　　概要

　　PFC的��^台服务提供的函数使到你的应用�E�序可以使用特定�q�_��的函数。你可以使用该服务实现支持多�q�_��的应用程序，而无��d��你的应用�E�序中加入有兛_�^台检��的代码。例如，你可以调用函�?of_GetFreeMemory��定现在所剩的内存大小。��^台服务此时便会依据不同的�q�_��调用相应的外部函数而完成工作。该服务对应的对象是 n_cst_platform以及不同�q�_��的相应的子类�?

　　打印与页面设�|�对话框�Q�PFC的��^台服务会�Ҏ��不同的��^��C��相应的调整�?

　　使用说明�Q?

　　�q�_��服务提供的函数有�Q?

　　l_ ��定可用内存�I�间

　　 l_ ��定可用资源�I�间

　　l_ ��定某一字符串的高度、宽度，单位是PBUs

　　你可以将 n_cst_platform定义成全局变量、实例变量、局部变量��用说�?变量说明贯穿整个应用�E�序全局变量、n_cst_appmanager的实例变量针对一个变�?对象的实例变量针对一�D�代�?局部变量��^台服务没有��用自动实例化功能�Q�因此你必须昄��的删除n_cst_platform �?

　　在Macintosh上：�?Macintosh上函数of_GetTextSize无法使用�?

　　开启��^台服务：

　　(1) 定义�c�d��n_cst_platform的变量：

　　n_cst_platform inv_platform

　　 (2) 调用f_SetPlatform全局函数

　　f_SetPlatform�Q�inv_platform�Q�TRUE�Q?

　　函数f_SetPlatform会自动徏立该对象�?

　　调用�q�_��服务函数�Q?

　　l_ 直接调用函数

　　下面的例子调用函数of_GetFreememory在状态栏处显�C�可用内存的大小�?

Long ll_free_monery

ll_free_memory = inv_platform.of_GetFreeMemory�Q�）

gnv_app.of_GetFrame�Q�）. SetMicroHelp�Q�擣ree memory�Q?+ String�Q�ll_

free_memory�Q�）

　　删除服务

　　l 调用 Destroy 语句

　　Destroy inv_platform

未完。。�?/span>

KE 2010-07-01 21:35 发表评论

PB 学习�W�记

KE — Tue, 29 Jun 2010 08:09:00 GMT

//取得关键字的字段�c�d��
ls_type1 = dw_base.Describe(""+scolumnname+".ColType")
ls_type2 = dw_base.Describe(""+sDispColumn+".ColType")
sdbColumnName=dw_base.Describe(""+scolumnname+".dbName")//关键字的字段�?Modify By GangL 04/12/06 PM 2:17
sdbDispColumn=dw_base.Describe(""+sDispColumn+".dbName")

long ll_found
IF not(isnull(ls_keyword) or ls_keyword = '') then
IF ls_type1 = 'long' THEN
  ll_found = dw_base.Find(""+sColumnName+" = "+ls_keyword+"",1,dw_base.RowCount())
ELSE
  ll_found = dw_base.Find(""+sColumnName+" = '"+ls_keyword+"'",1,dw_base.RowCount())
END IF
dw_base.ScrollToRow(ll_found)
dw_base.SetRow(ll_found)
sle_1.setfocus()

PB数据�H�口使用SetSqlSelect�Q�）函数应注意的问题

Limitations to using SetSQLSelectUse SetSQLSelect only if the data source for the DataWindow object is a SQL SELECT statement without retrieval arguments and you want PowerBuilder to modify the update information for the DataWindow object:

dw_1.Modify("DataWindow.Table.Select='select...'")

Modify will not verify the SELECT statement or change the update information, making it faster but more susceptible to user error. Although you can use Modify when arguments are involved, it is not recommended because of the lack of checking.

在脚本中修改数据�H�口语法�Ӟ��如果數據�H�口沒有檢烦條�g�Q�可以��?font face="Times New Roman">Getsqlselect��d��sql语句�Q�修改�ؓ自己需要的sql语句后可�?font face="Times New Roman">Setsqlselect重新讄��查询条�g�Q�也可以�?font face="Times New Roman">MODIFY�Q�）函数修改�Q�如讄��不同�?font face="Times New Roman">where条�g�Q�另外设�|�过后要恢复原来数据�H�口�?font face="Times New Roman">sql语句�?/p>
如果有检索条件就不能�?font face="Times New Roman">setsqlselect�Q?/p>
只可以用dw_1.Modify("DataWindow.Table.Select='select...'")

Eg�Q?/p>
ls_original=dw_1.getsqlselect()

if rb_3.checked=true then //base salary

       ls_newsql=ls_original +" and (staff_master.monthly_pay=0 )"

else               // fixed salary

       ls_newsql=ls_original +" and (staff_master.monthly_pay in ('1','2','3') )"

end if

//int i

//i=dw_1.setsqlselect(ls_newsql) //// 数据�H�口没有讄��索参数可以用setsqlselect

string ls_tmp

//ls_tmp="DataWindow.Table.Select='"+ls_newsql+"'"http://// 加入�?font face="Times New Roman">where条�g中用到单引号‘’�q�时dw_1.Modify("DataWindow.Table.Select='select...'")中的单双引号应互�?/p>
ls_tmp='DataWindow.Table.Select="'+ls_newsql+'"'

ls_tmp=dw_1.Modify(ls_tmp) ////有检索参数就只能�?font face="Times New Roman">dw_1.modify()

dw_1.setsqlselect(ls_original)

KE 2010-06-29 16:09 发表评论

KE — Wed, 16 Jun 2010 12:08:00 GMT
下面的代码打开四个�H�口�Q�其中被打开的窗口名�U�存攑֜�字符变量中；
你要打开不同的窗口只需要改变字�W�变量的值就可以了；

window w_stock_win[ ]
string ls_stock_type[4]
ls_stock_type[1] = "w_stock_wine "
ls_stock_type[2] = "w_stock_scotch "
ls_stock_type[3] = "w_stock_beer "
ls_stock_type[4] = "w_stock_soda "
FOR n = 1 to 4
//该语句执行后�Q�w_stock_win[n]的窗口从ls_stock_type[n]变量中指定的�H�体创徏
Open(w_stock_win[n], ls_stock_type[n])
NEXT

KE 2010-06-16 20:08 发表评论

PB�pȝ��函数 �?日期旉��函数

KE — Wed, 09 Jun 2010 06:52:00 GMT

PB�pȝ��函数 �? 日期旉��函数Day()
—————————————————————————�?
功能得到日期型数据中的号�?1�?1之间的整数�?�?br /> 语法Day ( date )
参数date�Q�要得到��h��的日期��D��回�? Integer。函数执行成功时�q�回��h��(1�?1之间的整数�?。如果date参数的��gؓNULL�Q�则Day()函数�q�回NULL�?br /> —————————————————————————�?#8211;

DayName()
功能得到指定日期是一周中的星期几(例如�Q�Sunday, Monday…)�?br /> 语法DayName ( date )
参数date�Q�date�c�d��值或变量�q�回值String。函数执行成功时�q�回指定日期的星期表�C?例如�Q�Sunday, Monday…)。如果date参数的��gؓNULL�Q�则DayName()函数�q�回NULL�?br /> —————————————————————————�?#8211;

DayNumber()
功能得到日期型数据是一星期中的�W�几�?�?�?之间的整数表�C�，星期天�ؓ1�Q�星期一�?�Q?#8230;)�?br /> 语法DayNumber ( date )
参数date�Q�date�c�d��值或变量�q�回值Integer。函数执行成功时�q�回指定日期是一星期中的�W�几�?�?~7表示�Q�星期天�?�Q�星期一�? 2�Q?#8230;)。如果date参数的��gؓNULL�Q�则DayNumber()函数�q�回NULL�?br /> —————————————————————————�?#8211;

DaysAfter()
功能得到两个日期间的天数�?br /> 语法DaysAfter ( date1, date2 )
参数date1�Q�date�c�d��Q�指定�v始日期date2�Q�date�c�d��Q�指定终止日期返回值Long。函数执行成功时得到两个日期之间的天数。如�? date2的日期在date1的前面，那么DaysAfter()函数�q�回负倹{��如果�Q何参数的��gؓNULL�Q�则DaysAfter()函数�q�回 NULL�?br /> —————————————————————————�?#8211;

Hour()
功能得到旉��g��的小�Ӟ��采用24��时制�?br /> 语法Hour ( time )
参数time�Q�time�c�d��的��D��回值Integer。函数执行成功时得到time参数中的��时�Q?0�?3之间�Q�。如果time参数的��gؓNULL�Q�则 Hour()函数�q�回NULL�?br /> —————————————————————————�?#8211;

Minute()
功能得到旉��g��的分钟，有效值在00�?9之间�?br /> 语法Minute ( time )
参数time�Q�time�c�d��的��D��回值Integer。函数执行成功时得到time参数中的分钟�Q?0�?9之间�Q�。如果time参数的��gؓNULL�Q�则 Minute()函数�q�回NULL�?br /> —————————————————————————�?#8211;

Month()
功能得到日期��g��的月份，有效值在1�?2之间�?br /> 语法Month ( date )
参数date�Q�date�c�d��的��D��回值Integer。函数执行成功时得到date参数中的月䆾�Q?�?2之间�Q�。如果date参数的��gؓNULL�Q�则 Month()函数�q�回NULL�?br /> —————————————————————————�?#8211;

Now()
功能得到客户机的当前�pȝ��旉��Q�返回��gؓTime�c�d��?br /> 语法Now()�q�回值Time。该函数�q�回客户机的当前�pȝ��旉��?br /> —————————————————————————�?#8211;

RelativeDate()
功能得到指定日期前多��天或后多少天的日期�?br /> 语法RelativeDate(date,n)
参数date�Q�Date�c�d��Q�指定基准日期n�Q�integer�c�d��Q�指定天数返回值Date。当n的值大�?时返回参数date指定日期后第n天的日期�Q? 当n的值小�?时返回参数date指定日期前第n天的日期。如果�Q何参数的��gؓNULL�Q�则RelativeDate()函数�q�回NULL�?br /> —————————————————————————�?#8211;

RelativeTime()
功能得到指定旉��前多��秒或后多少�U�的旉��Q�采�?4��时制�?br /> 语法RelativeTime ( time, n )参数time�Q�time�c�d��Q�指定基准时间n�Q�long�c�d��Q�指定秒数返回值Time。当n的值大�?时返回参数time指定旉��后第n�U�的旉��Q�当n 的值小�?时返回参数time指定旉��前第n�U�的旉��。如果�Q何参数的��gؓNULL�Q�则RelativeTime()函数�q�回NULL�?br /> —————————————————————————�?#8211;

Second()
功能得到旉��g��的秒�Q�有效值在00�?9之间�?br /> 语法Second ( time )
参数time�Q�time�c�d��的��D��回值Integer。函数执行成功时得到time参数中的�U�（00�?9之间�Q�。如果time参数的��gؓNULL�Q�则 Second()函数�q�回NULL�?br /> —————————————————————————�?#8211;

Today()
功能得到当前�pȝ��日期�Q�在某些情况下，同时得到当前�pȝ��旉��?br /> 语法Today()�q�回值Date。该函数�q�回当前�pȝ��日期。用法单独调用Today()函数�Ӟ��该函数��L��q�回当前�pȝ��日期�Q�但是，虽然Today() 函数的返回值类型�ؓDate�Q�在该函数用做某些函数的参数、而该参数要求DateTime�c�d��的值时�Q�Today()函数也能够在�q�回当前�pȝ��日期的同�? �q�回当前�pȝ��旉��。再如，Today()函数作�ؓ数据�H�口控�gSetItem()函数的参敎ͼ�该函数参��C��指定的数据窗口列的数据类型�ؓ DateTime�Q�那么当前系�l�日期和旉��同时设�|�到数据�H�口指定��中�?br /> —————————————————————————�?#8211;

Year()
功能得到日期��g��的年�?有效取�?000�?000)�?br /> 语法Year(date)
参数date�Q�date�c�d��的��D��回值Integer。函数执行成功时得到date参数中的�q�䆾�Q�采用四位数字）�Q�发生错误时�q�回1900�Q�如果date 参数的��gؓNULL�Q�则Year()函数�q�回NULL。用法当应用�E�序把有两位数字表示�q�䆾的字�W�串转换成日期时�Q�PowerBuilder�Ҏ��下述规则选择世纪�Q�如果年份值在00�?9之间�Q�PowerBuilder��年份中的世�U�（前两位数字）当作20�Q�如果年份值在50�?9�? ��_��PowerBuilder��年份中的世�U�（前两位数字）当作19。比如，字符�?#8221;20-10-25″被PowerBuilder转换�? 2020-10-25�Q�字�W�串”98-10-25″被PowerBuilder转换�?998-10-25。因此，如果应用�E�序中需要指�?950�q�之�? 的日期，应该使用四位数字表示�q�䆾�Q�以避免引�v歧义。PowerBuilder能够处理的年份从1000�?000之间�?/span>

KE 2010-06-09 14:52 发表评论

PB String ( data, { format } )

KE — Wed, 09 Jun 2010 06:24:00 GMT

函数作用�Q? 该函数有两种用法�Q�一�U�是�q�行�c�d��转换�Q�见语法格式二；另一�U�是�q�行�c�d��转换的同时还�q�行数据格式的�{换，见语法格式一。重�Ҏ��格式一的学习和理解�?

函数语法�Q?格式一�Q�String ( data, { format } )

格式二：String ( Blob )

data�Q�要�q�行�c�d��和格式�{换的数据�Q�可以是date、DateTime、数字类型、time�? 者string�c�d��?

format�Q�格式串�Q�用来指定参数data的显�C�格式�? �Ҏ��参数data的数据类型的不同而不同。当参数data为String�c�d��Ӟ��该参数是必需的，否则��没有必要��用该函数了�?

�q?�?��|�� String。函数执行成功时�q�回以字�W�串方式表示的指定数据，如果data参数的数据类型与format参数指定的格式不匚w��、format参数指定�? 格式无效、或data参数不是前面提到的适宜数据�c�d��Ӟ��String()函数�q�回�I�字�W�串�Q?"�Q��?

使用说明�Q�format是个用掩码表�C�的字符�Ԍ��参数data的类型不同有不同的用法：

对data参数为数值类型的情况来说�Q�格式�ؓ�Q?

正数格式�Q�负数格式；零的昄��格式�Q?

�I�的昄��格式除第一部分必须提供外，其它部分可以省略。数值型昄��格式中��用两个掩码字�W�：#�?�Q�其中，使用#代表0"9之间的�Q意数字，0代表每个雉��要显�C�。另外，货币�W�号�Q?或��E�Q�、百分号�Q?�Q�、小数点�Q?�Q�、逗号�Q�，�Q�等字符也可以出现在格式字符串中�Q�但是，除小数点�Q?�Q��? 逗号�Q�，�Q�能够出现在格式字符#�?之间外，其它字符只能攄��在格式串的前面或后面�Q�例如，###,###$###是个错误的格式串�Q? �K?##,###,###是个正确的格式串。省略format参数�Ӟ��String()函数使用PowerBuilder�~�省格式。注意，如果昄��格式�? 多个部分�Q�各部分之间的分��P��Q�）不能省略。其它字�W�也可以出现在显�C�格式字�W�串中（只能攑֜�格式串的开头和末尾�Q�，但它们没有特�D�意义，�pȝ��只是照原�? 昄��。例如，用显�C�格式字�W�串“收入##”格式化数�?2�Ӟ��昄��l�果�?#8220;收入12”�?

对data参数为字�W�串�Q�String�Q�类型的情况来说�Q�format参数的语法格式�ؓ�Q?

正常字符串格式；�I�值时格式

�?#8220;正常字符串格�?#8221;中，@代表字符串中的�Q意字�W�，除此之外的�Q何字�W�照原样昄��Q�例如，如果定义了下面的格式�Q?

�Q�@@�Q�@@@@-@@@@

则字�W�串0166767593昄��为：

�Q?1�Q?676-7593

对data参数为日期（Date�Q�类型的情况�? ��_��format参数的语法格式�ؓ�Q?

正常日期格式�Q�日期�ؓ�I�值时的格�?

日期格式中格式字�W�意义如下：

d -- 开头不�?的日敎ͼ��?�Q?

dd -- 开头带0的日敎ͼ��?8�Q?

ddd -- 星期的英文羃写（如Mon、Tue�Q?

dddd -- 星期的英文全�U�ͼ�如Monday、Tuesday�Q?

m -- 开头不�?的月份（�?�Q?

mm -- 开头带0的月份（�?8�Q?

mmm -- 月䆾的英文羃写（如Jan、Feb�Q?

mmmm -- 月䆾的英文全�U�ͼ�如January、February�Q?

yy -- 两位数字表示的年份（�?7�Q?

yyyy -- 四位数字表示的年份（�?997�Q?

另外�Q�还可以使用下面的关键字作�ؓ日期的显�C? 格式�Q?

[General] Windows�pȝ��中定义的短日期格�?

[LongDate] Windows�pȝ��中定义的长日期格�?

[ShortDate] Windows�pȝ��中定义的短日期格�?

对data参数为时��_��Time�Q�类型的情况来说�Q�语法格式�ؓ�Q?

正常旉��格式�Q�时间�ؓ�I�值时的格�?

旉��格式中格式字�W�意义如下：

h -- 开头不�?的小�Ӟ��比如6�Q?

hh -- 开头带0的小�Ӟ��比如06�Q?

m -- 开头不�?的分钟（比如6�Q?

mm -- 开头带0的分钟（比如06�Q?

s -- 开头不�?的秒�Q�比�?�Q?

ss -- 开头带0的秒�Q�比�?6�Q?

f -- 开头不�?的微�U�，可以指定1"6个f�Q�每个f代表一部分微秒

AM/PM -- 用AM/PM昄��上、下午时��_��12��时�?

am/pm -- 用am/pm昄��上、下午时��_��12��时�?

A/P -- 用A/P昄��上、下午时��_��12��时�?

a/p -- 用a/p昄��上、下午时��_��12��时�?

另外�Q�显�C�格式中�q�可以��用关键字 [Time]�Q�它表示按当前Windows�pȝ��定义的格式显�C�时间�?nbsp;

�? data参数为日期时��_��DateTime�Q�类型的情况来说�Q�语法格式�ؓ�Q?

正常日期旉��格式�Q�日期时间�ؓ�I�值时的格�?

日期旉��c�d��使用的掩码就是把日期掩码�? 旉��掩码�l�合��h��卛_��?

代码实例�Q?

�?、下面的语句��指定日期�{换�ؓ�Q?Jan 1,1998的格式：

string(1998-01-31,”mmmm dd,yyyy”)

�?、下面的语句把DateTime�c�d��的��D�{换�ؓ�Q�Jan 1,1998 6 hrs and 8 min的字�W�串�Q?

string(DateTime(1998-01-31,06:08:00),’mmmm dd,yyyy h “hrs and” m ”min”’)

�?、下面的语句把string1讄��?123�Q?

integer li_num = 123

string ls_temp

ls_temp = string(li_num,”0000;(000);****;�I?#8221;)

�?、下面的语句把string1讄��?23�Q?

integer li_num = -123

string ls_temp

ls_temp = string(li_num,”000;(000);****;�I?#8221;)

�?、下面的语句把string1讄��?***�Q?

integer li_num = 0

string ls_temp

ls_temp = string(li_num,”0000;(000);****;�I?#8221;)

�?、下面的语句把string1讄��为空�Q?

integer li_num

string ls_temp

SetNull(li_num)

ls_temp = string(li_num,”0000;(000);****;�I?#8221;)

KE 2010-06-09 14:24 发表评论

KE — Sun, 06 Jun 2010 15:19:00 GMT

不能�?DB-Library�Q�如 ISQL�Q�或 ODBC 3.7 或更早版本将 ntext 数据或仅使用 Unicode 排序规则�?Unicode 数据发送到客户端�?br />
在PB开发过�E�中�Q�由于数据库中��用了 ntext字段�Q�出��C��下提�C�错误，
PB报错: 不能�?DB-Library�Q�如 ISQL�Q�或 ODBC 3.7 或更早版本将 ntext 数据或仅使用 Unicode 排序规则�?Unicode 数据发送到客户端�?/p>

�׃��sql server中，ntext和nvarchar字段是用unicode�~�码存储内容的，因此php通过mssql扩展��d��带ntext和nvarchar�c�d��字段的时候会抱错�?/p>
如果 title 字段�c�d��?nvarchar�Q�content 字段�c�d��?ntext �Q�那么下面的sql语句会报错：

select title,content from article where 1

正确的写法是�Q?/p>
select convert(varchar(255),title) as title, convert(text,content) as content from article where 1

或者不使用ntext字段

KE 2010-06-06 23:19 发表评论

PB ImportFile导入数据

KE — Tue, 01 Jun 2010 14:47:00 GMT

转自�Q�http://hi.baidu.com/zydpc/blog/item/3268273eb8e80ce055e72338.html

描述
Inserts data into a DataWindow control, DataStore object, or graph control from data in a file.一个文件插入数据到一个数据窗口控�Ӟ��数据存储对象�Q�图形或数据控制�?/span> The data can be tab-separated text, comma-separated text, XML, or dBase format 2 or 3.�q�些数据可以制表�W�分隔的文本�Q�以逗号分隔的文本，XML或dBASE格式2�?�?/span> The format of the file depends on whether the target is a DataWindow (or DataStore) or a graph and on the type of graph.该文件的格式取决于该目标是一个数据窗口（或数据存储）或图和图型�?/span>

For DataWindow and DataStore syntax, see the ImportFile method for DataWindows in the DataWindow Reference or the online Help .对于数据�H�口和DataStore的语法，请参�?em>联机帮助 ImportFile 的方法，在数据窗口DataWindows参考或 �?/span>

Applies to适用�?/span>

Graph controls in windows and user objects.图控制在�H�口和用户对象�?/span> Does not apply to graphs within DataWindow objects, because their data comes directly from the DataWindow.不适用于在数据�H�口对象的图形，因�ؓ它们的数据直接来自数据窗口�?/span>

Syntax句法

graphname . ImportFile ( { importtype}, filename {, startrow {, endrow {, startcolumn } } } ) graphname。ImportFile�Q�（importtype�Q�，�Q?/strong>文�g名，startrow�Q�，endrow�Q�，startcolumn�Q�）�Q�）

Argument论据

Description描述

graphname graphname

The name of the graph control to which you want to copy data from the specified file.该控件的名称图，您要复制文�g数据从指定的�?/span>

importtype (optional) importtype�Q?/em>可选）

An enumerated value of the SaveAsType DataWindow constant.一个数据窗口不断枚丑ր�的SaveAsType�?/span> If this argument is specified, the importtype argument can be specified without an extension.如果该参数指�?em>�Q�importtype参数可以指定不带扩展名�?/span> Valid type arguments for ImportFile are:论点ImportFile有效的类型有�Q?/span>

Text!文字�Q?/span>

CSV! CSV格式�Q?/span>

XML! XML的！

DBase2! DBase2�Q?/span>

DBase3! DBase3�Q?/span>

filename 文�g�?/em>

A string whose value is the name of the file from which you want to copy data.一个字�W�串�Q�其值是文�g名从你要复制的数据�?/span> The file must be an ASCII, tab-separated file (TXT), comma-separated file (CSV), Extensible ), or dBase format 2 or 3 file (DBF).该文件必��L��一个ASCII�Q�制表符分隔的文�Ӟ��TXT�Q�，逗号分隔文�g�Q�CSV�Q�，可扩展）�Q�或2�?的dBase格式文�g�Q�DBF的）�?/span> Specify the file's full name.指定文�g的全名�?/span> If the optional importtype is not specified, the name must end in the appropriate extension.如果没有指定可选的importtype�Q?/em>名称必须�l�束在适当廉��?/span>

If you do not specify filename or if it is null , ImportFile prompts the user for a file name.如果你不指定文�g�?/em> �Q�或者如果它为null�Q�ImportFile提示文�g的名�U�Cؓ一个用戗��?/span> The remaining arguments are ignored.剩余的参数将被忽略�?/span>

startrow (optional) startrow�Q?/em>可选）

The number of the first detail row in the file that you want to copy.该文件要拯��数的�W�一行中的细节�?/span> The default is 1.默认�?�?/span>

For default XML import, if startrow is supplied, the first N ( startrow -1) elements are skipped, where N is the DataWindow row size.对于默认XML导入�Q�如�?em>startrow提供�Q?�W?/em>一�?em>N�Q�startrow -1�Q�的元素都被跌��Q?其中 N是数据窗口行的大��?/span>

For template XML import, if startrow is supplied, the first对于XML导入模板�Q�如�?em>startrow提供�Q�首 ( startrow -1) occurrences of the repetitive row mapping defined in the template are skipped. �Q�startrow -1�Q�发生了重复的行映射模板中定义蟩�q��?/span>

endrow (optional) endrow�Q?/em>可选）

The number of the last detail row in the file that you want to copy.该文件要拯��数的最后细节行中�?/span> The default is the rest of the rows.默认的是该行的其余部分�?/span>

For default XML import, if endrow is supplied, import stops when N * endrow elements have been imported, where N is the DataWindow row size.对于默认XML导入�Q�如�?em>endrow提供�Q�进口停�?em>�?/em> N * endrow内容已经�q�口的，其中 N是数据窗口行的大��?/span>

For template XML import, if endrow is supplied, import stops after endrow occurrences of the repetitive row mapping defined in the template have been imported.对于XML导入模板�Q�如�?em>endrow提供�Q�该模板中定义导入后停止endrow行中出现的重复测�l�已导入�?/span>

startcolumn (optional) startcolumn�Q?/em>可选）

The number of the first column in the file that you want to copy.匮乏的拷贝数列的�W�一个文件中的你�?/span> The default is 1.默认�?�?/span>

For default XML import, if startcolumn is supplied, import skips the first ( startcolumn - 1) elements in each row.对于默认XML导入�Q�如�?em>startcolumn提供�Q�进口蟩�q�第一�Q�startcolumn - 1�Q�在每个行元素�?/span>

This argument has no effect on template XML import.�q�一论点�q�没有对模板的效果XML导入�?/span>

Returns�q�回

Long.�ѝ�?/span> Returns the number of rows that were imported if it succeeds and one of the following negative integers if an error occurs:�q�回发生错误的行的数目进口，如果成功�Q�它下面的一个负整数�Q�如果一�Q?/span>

-1 No rows or startrow value supplied is greater than the number of rows in the file -1没有行或startrow值是文�g大于供给的数量的�?/span>

-2 Empty file or input data does not match number of columns or required column type -2文�g为空或输入的数据�c�d��不匹配的列数或要求列

-3 Invalid argument -3无效参数

-4 Invalid input -4输入无效

-5 Could not open the file -5无法打开文�g

-6 Could not close the file -6无法关闭文�g

-7 Error reading the text -7错误阅读文本

-8 Unsupported file name suffix (must be *.txt, *.csv, *.dbf or *.xml) -8不支持的文�g名后�~��Q�必��L��*. txt文�g�Q?. CSV格式�Q?. dbf�?. xml的）

-10 Unsupported dBase file format (not version 2 or 3) -10不受支持的dBASE文�g格式�Q�而不是版�?�?�Q?/span>

-11 XML Parsing Error; XML parser libraries not found or XML not well formed -11 XML解析错误; XML解析器库不存在或没有很好形成的XML

-12 XML Template does not exist or does not match the DataWindow -12 XML模板不存在或不匹配的数据�H�口

If any argument's value is null , ImportFile returns null . If the optional importtype argument is specified and is not a valid type, ImportFile returns -3.如果��M��参数的�?strong>�?/strong> null�Q?�q�回 null ImportFile�?/strong>如果可�?em>importtype参数指定�Q�而不是一个有效的�c�d���Q�ImportFile�q�回-3�?/span>

Usage用法

The format of the file can be indicated by specifying the optional importtype parameter, or by including the appropriate file extension.该文件的格式�Q�可通过指定可选的昄��importtype参数�Q�或通过包括适当的文件扩展名�?/span>

For graph controls, ImportFile only uses three columns and ignores other columns.对于囑�Ş控制�Q�ImportFile只��?列，而忽略其他列�?/span> Each row of data must contain three pieces of information.每个数据行中必须包含三个信息件�?/span> The information depends on the type of graph:该信息取决于图表�c�d��Q?/span>

For all graph types except scatter, the first column to be imported is the series name, the second column contains the category, and the third column contains the data.对于所有类型，除了散布图，�W�一列从外地输入的是该系列的名称�Q�第二列包含�c�，�W�三列包含的数据�?/span>

For scatter graphs, the first column to be imported is the series name, the second column is the data's x value, and the third column is the y value.对于散布图，�W�一列从外地输入的是该系列的名称�Q�第二列是数据的x��|��W�三列是y倹{�?/span>

You can add data to more than one series by specifying different series names in the first column.您可以添加数据到多个�p�d��的第一列指定不同的�p�d��名称研究�?/span> To let users select the file to import, specify a null string for filename . PowerBuilder displays the Select Import File dialog box.��Z��让用户选择要导入的文�g�Q?文�g�?/em>指定一�?strong>�I?/strong>字符丌Ӏ�PowerBuilder中显�C�选择导入文�g对话框�?/span>

Double quotes The location and number of double quote marks in a field in a tab delimited file affect how they are handled when the file is imported. 双引�?/strong>双数场引号中的位�|�和一个制表符分隔的文件媄响到他们如何处理�Ӟ��该文件是�q�口的�?/span> If a string is enclosed in one pair of double quotes, the quotes are discarded.如果字符串被双引��h��在一对的报�h��被丢弃�?/span> If it is enclosed in three pairs of double quotes, one pair is retained when the string is imported.如果是双引号括在三对�Q�一�Ҏ��保留字符串时是进口的�?/span> If the string is enclosed in two pairs of double quotes, the first pair is considered to enclose a null string, and the rest of the string is discarded.如果字符串引��h��在双两对�Q�第一对被认�ؓ是一个空字符串括��h��Q�而其余的字符串将被丢弃�?/span>

When there is a double quote at the beginning of a string, any characters after the second double quote are discarded.当有一个双引号的字�W�串开始时�Q�双引号的所有字�W�后�Q�第二次��被丢弃�?/span> If there is no second double quote, the tab character delimiting the fields is not recognized as a field separator and all characters up to the next occurrence of a double quote, including a carriage return, are considered to be part of the string.如果没有�W�二个引��P��制表�W�分隔的�q�回字段是不承认所有作为字�D�分隔符和字�l�成的一个运输的下一个出现的一个双引号�Q�包括被认�ؓ是字�W�串的一部分�?/span> A validation error is generated if the combined strings exceed the length of the first string.验证错误�Q�如果合�q�生成字�W�串的字�W�串长度��过了第一�?/span>

Double quotes after the first character in the string are rendered literally.双引号字�W�的字符串字面呈现后的第一�ơ�?/span> Here are some examples of how tab-delimited strings are imported into a two-column DataWindow:�q�里有一些例子，说明制表�W�分隔的字符串被导入��C��个两列的数据�H�口�Q?/span>

Text in file文本文�g

Result�l�果

"Joe" TAB "Donaldson" “�?#8221;�l�计�?#8220;唐纳��?#8221;

Joe Donaldson乔唐�U�x��

Bernice TAB """Ramakrishnan"""伯尼斯统计表“”“��q��克里斯南”“”

Bernice "Ramakrishnan"伯尼�?#8220;��q��克里斯南”

""Mary"" TAB ""Li"" “”玛丽“”标签“�Q?#8221;�C?#8220;”

Empty cells�I�细�?/span>

"Mich"ael TAB """Lopes""" “�q�克”机场快线�l�计�?#8220;”“�z�佩�?#8221;“”

Mich "Lopes"�q�克“�z�佩�?#8221;

"Amy TAB Doherty" “艄��l�计表多��蒂”

AmyDoherty in first cell, second cell empty艄��键多��蒂在第一个单元格�Q�第二个单元��gؓ�I?/span>

3""" TAB 4" 3“”“标签4”

3""" 4" 3“”“4”

Specifying a null string for file name If you specify a null string for filename , the remaining arguments are ignored. 指定一个文件名�U�Cؓ�I?/strong>字符�?/font> �Q�如果你指定一�?strong>�I?/strong>字符串�ؓ文�g�?/em> �Q�其余的参数被忽略�?/span> All the rows and columns in the file are imported.文�g的所有行和列的都是进口的�?/span>

Examples范例

Example 1 �C�Z��1

This statement copies all the data in the file D:\EMPLOYEE.TXT to gr_employee starting at the first row:本声明中的所有数据复制的文�gD�Q�\ EMPLOYEE.TXT�?em>gr_employee行开始在�W�一�Q?/span>

gr_employee. ImportFile ("D:\EMPLOYEE.TXT") gr_employee。ImportFile�Q?/em>�?#8220;D�Q�\ EMPLOYEE.TXT”�Q?/span>

Example 2 �?

This statement copies the data from the file D:\EMPLOYEE.TXT starting with row 2 column 3 and ending with row 30 column 5 to the graph gr_employee :本声明的副本文�g D中的数据来自�Q�\ EMPLOYEE.TXT开始，�W?行第3列和行结��5�?0列图gr_employee�Q?/em>

gr_employee. ImportFile ("D:\EMPLOYEE.TXT", 2, 30, 3) gr_employee。ImportFile�Q?/em>�?#8220;D�Q�\ EMPLOYEE.TXT”�Q?�Q?0�Q?�Q?/span>

Example 3 �?

The following statements are equivalent.下面的语句是�{��h的�?/span> Both import the contents of the XML file named myxmldata :�q�两�U�导入XML文�g的内容命�?em>myxmldata�Q?/em>

gr_control.ImportFile(myxmldata.xml) gr_control.ImportFile�Q�myxmldata.xml�Q?/span> gr_control.ImportFile(XML!, myxmldata) gr_control.ImportFile�Q�XML的！�Q�myxmldata�Q?/span>

Example 4 范例4

This example causes PowerBuilder to display the Specify Import File dialog box:�q�个例子使PowerBuilder中显�C�指定文件导入对话框�Q?/span>

string null_str字符串null_str

SetNull(null_str) SetNull�Q�null_str�Q?/span>

dw_main. ImportFile (null_str) dw_main。ImportFile�Q�null_str�Q?/em>

KE 2010-06-01 22:47 发表评论

KE — Tue, 01 Jun 2010 08:08:00 GMT

可用 DataWindow.Processing 判断 DataWindow 对象的类型，dw的类型如下：
    0 (Default) Form, group, query, or tabular
    1 Grid
    2 Label
    3 Graph
    4 Crosstab
    5 Composite
    7 RichText

�C�Z��一�Q?br /> This.Object.Datawindow.Processing = '0'

�C�Z��二：
String    ls_processing

ls_processing = idw_requestor.Describe("datawindow.Processing")
If ls_processing = "4" Then
    idw_requestor.Modify("DataWindow.Crosstab.StaticMode=Yes")
End If

KE 2010-06-01 16:08 发表评论

PB变量的作用域

KE — Mon, 24 May 2010 02:25:00 GMT

变量的作用域

作用域定义变量在什么范围内有效。PowerBuilder的变量作用域共有四种�Q�全局变量、实例变量、共享变量和局部变量。不同作用域的变量需要在不同的位�|�说明，下面分别予以介绍。在�~�程�H�口、窗口画�W�、用户对象画�W�或菜单�ȝ��中，选择“Declare”菜单中的“Global Variables”�?/span>“Instance Variables”�?/font>“Shared Variables”可以分别声明全局、实例和�׃�n�q�三�c�d��量�?/span>

全局变量

全局变量在整个应用程序中都可讉K��Q�它的作用域是整个应用程�? �?/span>

实例变量

实例变量与对象相兌��Q�只有在该对象的事�g处理�E�序或函��C��才能使用��对象定义的实例变量。实例变量在它所兌��的对象被打开时创建，被关闭时消失�?/font>

�׃�n变量

�׃�n变量是一�U�静态变量，�q�不仅意味着它所在的对象关闭后再�ơ打开�Ӟ��׃�n变量依然保持对象关闭时的��|��而且�q�意味着同一个类多个实例中的同名�׃�n变量�? 持相同的倹{�?/font>

局部变�?/font>

局部变量在使用它的事�g处理�E�序或函��C��说明�Q�其作用域仅限于说明它的�E�序�D�，在该�E�序�D늚��M��地方均可讉K��局部变量，但其它程序段都不能访问本�E�序�D�中的局部变量。运行程序后�Q�进入某个程序段�Ӟ��pȝ��自动为局部变量分配内存，退出程序段�Ӟ��局部变量占用的内存被释放�?/font>

KE 2010-05-24 10:25 发表评论

PB �Ҏ��字符

KE — Mon, 24 May 2010 01:40:00 GMT
�Ҏ��字符
在字�W�串当中可以包括�Ҏ��字符。它们的写法如下�Q?/font>

新行�Q�NEWLINE�Q�：~n

制表�W�（TAB�Q�：~t

垂直制表�Q�VERTICAL TAB�Q�：~v

回�R�Q�CARRIGE RETURN�Q�：~r

换页�Q�FORMFEED�Q�：~f

退��|��BACKSPACE�Q�：~b

双引��P��~"

单引��P��~'

弯曲�W�：~~

KE 2010-05-24 09:40 发表评论

数据�H�口控�g函数(�?

KE — Mon, 24 May 2010 01:19:00 GMT

数据�H�口控�g函数

本节��介�l�：
· 与数据库有关的函�?
· 行操�?
· 列操�?
· 数据操作

本节重点�Q?br /> · 数据�H�口控�g的作�?

本节隄��Q?
· 　

本节要求�Q?br /> · 掌握数据�H�口控�g的作�?

PowerBuilder为数据窗口控件提供了丰富的函敎ͼ��q�些函数使用戯��够在使用数据�H�口控�g时得心应手�?br />
与数据库有关的函�?/font>
�q�类函数完成与数据库有关的功能�?/p>
一、连接数据库

�q�接数据库也��是指定事务对象。PowerBuilder提供了两个函敎ͼ�SetTrans()和SetTransObject()�?br /> 语法格式�Q?br /> dw_control.SetTrans(TransactionObject)
dw_control.SetTransObject(TransactionObject)
其中�Q�dw_control是所使用的数据窗口控�Ӟ��transactionObject是所要指定的事务对象�?br /> �q�两个函数有一个重要的区别��是在��用SetTrans()函数�Ӟ��用户不需做�Q何数据初始化或事务对象初始化工作。用户只需要在�q�里填充一个事务对象，PB��׃��自动完成对该事物对象的初始化以及和数据库�q�接的工作。而��用SetTransObject()函数�Ӟ��用户必须首先把所用的事务对象�q�接�? 数据库上�?br /> 但是�Q�这�q�不意味着SetTrans()函数比SetTransObject()函数更好�Q��用SetTrans()函数�Ӟ��每调用一�ơ函数必��连接一��? 数据库，因�ؓ�q�个函数在每个事务处理的末端都会执行Disconnect语句。与此相反，使用SetTransObject()函数可以为数据库�l�持一�? 开放性的�q�接。因此在一般情况下�Q��ؓ了提高效率，��L��采用SetTransObject()函数�?br /> �q�两个函数都是成功时�q�回1�Q�发生错误时�q�回-1�?/p>
二、检索数�?/h3>

用于��索数据的函数只有一个，��是Retrieve()函数�?br /> 语法格式�Q?br /> dw_control.Retrieve()
如果数据�H�口控�g上的数据�H�口对象是有��索参数的�Q�就要在�q�个函数调用时加上检索参数。而且��索参数必��d��数据�H�口对象中定义顺序一致�?br /> 此函数返回一个长整型的数据，代表��索出来的数据行数。如果发生错误，��返�?1�?/p>
三、更新数�?/h3>

当用户对数据�H�口对象内的数据修改后，��x��q�些修改反映到数据库中去�Ӟ��必须使用Update()函数�?br /> 语法格式�Q?br /> dw_control.Update()
�q�个更新可能成功�Q�也可能��p�|。一般在�q�个函数被调用之后，��L��要做一个检查。请看下面的例子�Q?br /> Int li_return
li_return = dw_1.Update()
IF li_return = 1 THEN
     COMMIT USING SQLCA;
ELSE
     ROLLBACK USING SQLCA;
END IF
在这�D�代码中�Q�首先对数据�H�口控�g�q�行更新操作。但是更新只是把数据写入到客��h��的内存，�q�没有提交到数据库中。如果更新成功，��把它提交到数据库中�Q�如果更新失败，��回滚到当前的事务�?br />
行操�?/span>
行操作的函数主要是对数据库中的数据进行插入、删除或选择操作�?br />

一、插入行

在DataWindow中插入一行，可以使用InsertRow()函数�?br /> 语法格式�Q?br /> dw_control.InsertRow(rownumber)
dw_control是数据窗口控件名�Q�rownumber是要插入行的的行受��如果这个参��Cؓ0�Q�代表在当前DataWindow的最后一行插入一�I? 行�?br /> InsertRow()函数�q�回一个长整型��|��以此来代表插入的行号。如果插入失败，则返�?1�?/p>
二、删除行

要删除DataWindow内的一行数据，则要使用DeleteRow()函数�?br /> 语法格式�Q?br /> dw_control.DeleteRow(rownumber)
其中rownumber是要删除的行受��如果该��gؓ0�Q�表�C�删除当前行。如果删除成功，�q�回1�Q�失败则�q�回-1�?/p>
三、设�|�当前行

如果要设�|�DataWindow中的某行为当前行�Q�可以��用SetRow()函数�?br /> 语法格式�Q?br /> dw_control.SetRow(rownumber)
其中rownumber是要讄��为当前行的行受��如果函数返�?表示成功�Q�返�?1代表��p�|�?/p>
四、获取当前行

如果惌��获取DataWindow中的某行为当前行�Q�可以��用GetRow()函数�?br /> 语法格式�Q?br /> dw_control.GetRow()
该函数没有参敎ͼ�它返回一个长整型�Q�代表当前行受��如果返�?1代表��p�|。如果返�?代表没有选中��M��行�?/p>
五、选择�?/h3>

如果惌��在DataWindow中加亮显�C�某一行或取消加亮昄��某一行，可以使用SelectRow()函数�?br /> 语法格式�Q?br /> dw_control.SelectRow(rownumber,select)
其中�Q�rownumber表示要加亮或者取消加�q�显�C�的行号�Q?表示所有行。select是一个布��类型的��|��TRUE表示加亮�Q�FALSE表示取消加亮昄��。该函数�q�回1时表�C�成功，�q�回-1时表�C�失败�?br /> 如果惌��直接讄��某一行�ؓ加亮�Q�需要首先取消其它行的加亮显�C�状态，采用如下的两行代码：
dw_1.SelectRow(0,FALSE)
dw_1.SelectRow(rownumber,TRUE)

六、获取选择�?/h3>

如果惌��获取当前DataWindow中加亮显�C�的行，可以使用GetSelectRow()函数�?br /> 语法格式�Q?br /> dw_control.GetSelectRow(rownumber)
其中�Q�rownumber为开始查扄��行的行号�Q?表示从头开始查找。该函数�q�回一个长整数�Q�表�C�Z��rownumber开始查扄��一个加亮显�C�的行的�? 受��如果失败返�?�?/p>
七、滚动行

如果在DataWindow的末��插入一行数据，而当前行是在DataWindow的中央，那么�q�种插入可能不会被用戯��察。�ؓ了改变这�U�情况，可以滚动行到DataWindow的末��，�q�样用户��p��发现新的改变。要滚动行，可以使用ScrollToRow()函数�?br /> 语法格式�Q?br /> dw_control.ScrollToRow(rownumber)
该函数返�?时表�C�成功，�q�回-1时表�C�失败�?br /> 与ScrollToRow()函数据功能相关的�q�有如下几个函数�Q?br /> ScrollPriorRow()�Q�向上滚动一�?br /> ScrollNextRow()�Q�向下滚动一�?br />
列操�?/span>
列操作类的函��C��要是选择指定的列和获取列的信息�?br />

一、获取列

如果要获取当前的列号�Q�可以��用GetColumn()函数�Q�如果要获取当前的列名，可以使用GetColumnName()函数�?br /> 语法格式�Q?br /> dw_control.GetColumn()
dw_control.GetColumnName()
�q�两个函数都没有参数�Q�GetColumn()函数�q�回一个长整型��|��代表当前的列��P��GetColumnName()函数�q�回当前列的列名。如果返�? 0�Q�表�C�当前没有�Q何列被选择�q�回-1表示��p�|�?/p>
二、设�|�列

要设�|�某一列�ؓDataWindow中的当前列，可以使用SetColumn()函数�?br /> 语法格式�Q?br /> dw_control.SetColumn(column)
其中column既可以是列号�Q�也可以是列名。当该函数返�?时表�C�成功，�q�回-1时表�C�失败�?br />
数据操作
数据操作�cȝ��函数主要是对DataWindow中的数据�q�行获取、设�|��?br />

一、获取数�?/h3>

如果要从DataWindow的指定行和列中获取数据，��p��使用GetItem�p�d��的函数。这个系列的函数共有五个�Q�分别是对字�W�串、数字、日期、日期时间和��数�?br /> 语法格式�Q?br /> dw_control.GetItemString(rownumber,column)
dw_control.GetItemNumber(rownumber,column)
dw_control.GetItemDate(rownumber,column)
dw_control.GetItemDateTime(rownumber,column)
dw_control.GetItemDecimal(rownumber,column)
其中�Q�rownumber参数表示行号�Q�column可以是列��h��列名�?/p>
二、设�|�数�?/h3>

与获取数据所用的函数不同�Q�设�|�DataWindow内指定行列处的数据只要��用一个SetItem()函数��可以了�?br /> 语法格式�Q?br /> dw_control.SetItem(rownumber, column, value)
其中rownumber表示行号�Q�column可以是列��P��也可以是列名�Q�value表示要设�|�的倹{��但是该必须与DataWindow中指定的行列处的数据�c�d��一��_��不然PowerBuilder会报错�?br /> SetItem()函数�q�回1时表�C�成功，�q�回-1时表�C�失败�?/p>
三、数据排�?/h3>

如果希望对DataWindow内的数据�q�行重新排序�Q�而又不想重新从数据库中检索数据，可以使用SetSort()和Sort()函数。这两个函数一�? 完成对DataWindow�q�行排序的功能。其中SetSort()函数用于讄��如何排序�Q�Sort()函数用于对DataWindow实际�q�行排序�?br /> 语法格式�Q?br /> dw_control.SetSort(expression)
dw_control.Sort()
其中expression是一个字�W�串�Q�表�C�排序的表达式，它的具体值是一个列名后面加一个空��|��然后�?A"�Q�表�C�升序，�?D"�Q�表�C�降序。如果有�? 个列要同时进行排序，它们之间用逗号隔开�?br /> 例：dw_1.SetSort("name A,xh D")
�q�两个函数都是返�?表示成功�Q�返�?1表示��p�|�?/p>
四、数据过�?/h3>

如果希望对DataWindow内的数据�q�行�q��o而不重新从数据库中检索数据，可以使用SetFilter()和Filter()函数。它们一起完成对�? 据的�q��o功能。其中SetFilter()函数用来讄��q��o条�g�Q�Filter()函数用于对DataWindow�q�行�q��o�?br /> 语法格式�Q?br /> dw_control.SetFiter(expression)
dw_control.Fiter()
其中expression是一个字�W�串�Q�表�C��滤的条�g�Q�它实际是一个逻辑表达式�?br /> 例：
dw_1.SetFilter("id>\'003\' AND name like\'�?\'")
dw_1.Filter()
�q�两个函数都是返�?表示成功�Q�返�?1表示��p�|�?/p>
五、数据检�?/h3>

PowerBuilder提供了两个函数用于数据的��查，它们是DeleteCount()和ModifiedCount()�Q�其作用分别是检�? DataWindow中的数据自上一�ơ更新到现在�Q�被删除的行数和被修改的行数。它们一般在�H�口的CloseQuery事�g中��用，用来��查该�H�口�? DataWindow中的数据是否有尚未保存的修改�?br /> 语法格式�Q?br /> dw_control.DeleteCount()
dw.control.ModifiedCount()
它们分别�q�回从上一�ơ更新到现在�Q�DataWindow中被删除和被修改的行数。如果没有行被删除或被修改，那么它们�q�回0。如果出现错误则�q�回-1�?br /> 一般情况下�Q�如果窗口中含有可供修改的数据窗口对象，那么在窗口的CloseQuery事�g中通常使用如下代码��查数据窗口对象中是否有尚未保存的数据�Q?br /> Int li_return
IF dw_1.ModifiedCount() > 0 OR dw_1.DeletedCount() >0 THEN
     li_return = MessageBox("提示","数据��未保存�Q�是否保存？",Question!,YesNoCancel!,3)
     CHOOSE CASE li_return
            CASE 1
                 TriggerEvent(\'ue_save\')
                 RETURN 0
            CASE 2
                 RETURN 0
            CASE 3
                 RETURN 1
    END CHOOSE
END IF

转自:http://hi.baidu.com/sundl2268/blog/item /ecd8c513085daa0b5baf532d%2Ehtml

KE 2010-05-24 09:19 发表评论

国产精品一在线观看,久久精品国产亚洲a∨麻豆,日韩精品三级

Kodigo里面u_sheets昄��汉字昄��问题

pb通过jdbc�q�接oracle

解決退出时,报pfc_closequery_savechanges 错误

�?鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

<�?gt;如何在PB数据�H�口中修�Ҏ��?--讄��数据�H�口的更新属�?

PFC inv_resize of_Register

PFC autoinstantiate object

PFC中关于TreeView的用法讲�?�?

PB 学习�W�记

PB�pȝ��函数 �?日期旉��函数

PB String ( data, { format } )

PB ImportFile导入数据

Applies to适用�?/span>

Syntax句法

Returns�q�回

Usage用法

Examples范例

Example 1 �C�Z��1

Example 2 �?

Example 3 �?

Example 4 范例4

PB变量的作用域

PB �Ҏ��字符

数据�H�口控�g函数(�?

一、连接数据库

一、插入行

二、删除行

三、设�|�当前行

四、获取当前行

七、滚动行

一、获取列

二、设�|�列

国产精品一在线观看,久久精品国产亚洲a∨麻豆,日韩精品三级

Kodigo里面u_sheets昄���汉字昄���问题

pb通过jdbc�q�接oracle

解決退出时,报pfc_closequery_savechanges 错误

�?鼠标单击TabSequence=0的单元格旉���色选中色变为其他颜�?

鼠标单击TabSequence=0的单元格旉���色选中色变为其他颜�?

<�?gt;如何在PB数据�H�口中修�Ҏ���?--讄���数据�H�口的更新属�?

PFC inv_resize of_Register

PFC autoinstantiate object

PFC中关于TreeView的用法讲�?�?

PB 学习�W�记

PB�pȝ��函数 �?日期旉���函数

PB String ( data, { format } )

PB ImportFile导入数据

Applies to适用�?/span>

Syntax句法

Returns�q�回

Usage用法

Examples范例

Example 1 �C�Z��1

Example 2 �?

Example 3 �?

Example 4 范例4

PB变量的作用域

PB �Ҏ��字符

数据�H�口控�g函数(�?

一、连接数据库

一、插入行

二、删除行

三、设�|�当前行

四、获取当前行

七、滚动行

一、获取列

二、设�|�列

Kodigo里面u_sheets昄��汉字昄��问题

�?鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

鼠标单击TabSequence=0的单元格旉��色选中色变为其他颜�?

<�?gt;如何在PB数据�H�口中修�Ҏ��?--讄��数据�H�口的更新属�?

PB�pȝ��函数 �?日期旉��函数