社区
DataWindow
帖子详情
怎么用CREATE()函数,建立DATAWINDOW
xiejiaohui
2001-12-14 02:20:21
我要动态的建立报表,但是我看到例子程序,CREATE()函数的参数太多。有什么好的方法吗?我看到别人是用LibraryExport()函数 导出来的。请问有什么好的方法吗??
...全文
264
5
打赏
收藏
怎么用CREATE()函数,建立DATAWINDOW
我要动态的建立报表,但是我看到例子程序,CREATE()函数的参数太多。有什么好的方法吗?我看到别人是用LibraryExport()函数 导出来的。请问有什么好的方法吗??
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
bobi1314
2002-03-07
打赏
举报
回复
//定义一个数据窗口控件变量dwname
datawindow dw_name
//创建一个数据窗口控件
dw_name = create datawindow
//================================================
// 数据窗口创建对象
//================================================
datawindow dw_name
string sql,present,err,syntax
int code
// 定义数据窗口的数据来源
sql='select * from '+name
//定义数据窗口显示格式
present="style(type=grid)"
//读取数据窗口语法
syntax = tran.SyntaxFromSQL(sql,present,err)
//创建数据窗口
dw_name.Create(syntax,err)
code=1
return code
以上数据窗口对象是一个函数进行了创建的。其中的name是你所要表的名字
你看一下在pb帮助中有好多的好用的东西。
其中你使用的时候可以根据自己进行数据窗口的格式进行定义和设置
这是一个建议!!!
bobi1314
2001-12-19
打赏
举报
回复
你可以象创建对象一样啊!
objectvariable = CREATE objecttype
在帮助中有的
xiejiaohui
2001-12-14
打赏
举报
回复
谢谢你们两位 bjwulin(),susu_0807
bjwulin
2001-12-14
打赏
举报
回复
你先写好select语句(字符串),然后用syntaxfromsql()生成数据窗口的代码,最后用create()生成界面即可。如果界面不满意,可以用modify()修改。
咖啡
2001-12-14
打赏
举报
回复
pb的帮助里说得很详细呀,我相信你能看懂的.
不需重新编译,动态设置窗口中的所有
DATA
WINDOW
属性
窗口中将窗口所有参数调用后,可以将窗口中所有的
DATA
WINDOW
列出,可以动态设置大部分的属性(如:给字段添加校验,修改颜色等),并且可以保存到数据库(sqlserver 2000)中。同时:1、列显示时可以找出相关的中文标题;2、双击颜色和字体的相关属性,可以调出
WINDOW
S的颜色和字体设置窗口,并返回相关值相关调用有:一、设置窗口的DW属性:openwithparm(dw_attribute,窗口变量)二、窗口打开时自动装载设置好的属性:u_set_dwattribute usus =
create
u_set_dwattributeus.loadattributes(窗口变量)
PB 刷新
data
window
当前行的数据
当数据存在主次表时,当更新了次表数据后,主表数据在后台有更变时。可利用刷新主表当前行的方法重显主表数据。 /************************************************************
函数
名称: f_refresh_currentrow(adw) 功 能: 刷新DW当前行数据,不可刷新NO update or 带arguments的DW 参数说明: adw 目标DW 返 回 值: integer 成功返回1,失败返回-1 作 者: sean 创建时间: 2010年8月18日 ************************************************************/ string ls_
data
object string ls_keys[] //key Column Name string ls_dbname[] //key field Name string ls_coltype[] //field style string ls_tablenm //table name string ls_condition //sql Condition long ll_currentrow //Current Row numeric long ll_column //Column count integer i
data
window
ldw
data
store l
data
store ldw=adw if ldw.rowcount( )=0 then return -1 elseif trim(ldw.describe( "
data
window
.table.arguments"))<>'?' then messagebox('','刷新数据窗口当前行失败!,数据窗口需要参数',exclamation!) return -1 else ll_currentrow=ldw.getrow( ) FOR ll_column = 1 TO long(ldw.object.
data
window
.column.count)//key names If ldw.Describe("#"+string(ll_column)+".key") ='yes' Then i++ ls_keys[i]=ldw.Describe("#"+string(ll_column)+".name") ls_dbname[i]=ldw.Describe("#"+string(ll_column)+".dbname") ls_coltype[i]=ldw.Describe("#"+string(ll_column)+".coltype") End If NEXT if upperbound(ls_keys[])=0 then messagebox('','刷新数据窗口当前行失败!,没有主键',exclamation!) return -1 else ls_tablenm=left(ls_dbname[1],pos(ls_dbname[1],'.') -1) //table name for i=1 to upperbound(ls_keys[]) if pos('numb,deci,long,',LeftA(ls_coltype[i],4) +',')>0 then ls_condition+="and "+ls_dbname[i]+"="+string(f_getitem(ldw,ll_currentrow,ls_keys[i])) else ls_condition+="and "+ls_dbname[i]+"='"+string(f_getitem(ldw,ll_currentrow,ls_keys[i]))+"'" end if next ls_condition=mid(ls_condition,4) //sql Condition l
data
store=
create
data
store l
data
store.
data
object=ldw.
data
object l
data
store.settransobject( sqlca) if f_addwhere_retrieve(l
data
store,ls_condition)=1 then if l
data
store.rowcount( )=1 then ldw.object.
data
[ll_currentrow]=l
data
store.object.
data
[1] ldw.setitemstatus( ll_currentrow, 0, primary!, NotModified!) //if ldw.getrow( )<>ll_currentrow then ldw.scrolltorow( ll_currentrow) end if else messagebox('','刷新数据窗口当前行失败!,条件语法错误',exclamation!) return -1 end if destroy l
data
store end if end if
pb使用saveasascii
函数
导出excel得到所见所得的简便新方法(文本类型0不会被消除)
//本
函数
导出excel后string类型值前面含0的不会消除, //达到所见所得的效果。//例如:"0001"不会变成"1" //作者:翁斌,20100703 // //调用方法: //调用一个
data
store显示数据 string str
data
store ids_
Data
ids_
Data
=
Create
Data
Store //创建数据存储实例 /ids_
Data
.
Data
Object = dw_1.
data
object //将dw_condation数据窗口对象与ids_
Data
连接 ids_
Data
.SetTransObject(sqlca) dw_1.getfullstate(str) ids_
data
.setfullstate(str) gf_saveasascii2excel(ids_
data
)
create
-dw.rar_PowerBuilder_dw_powerbuilder dw
动态创建DW 动态创建DW 动态创建DW
Powerbuilder的文件操作
函数
、类库
PB的文件、路径、目录的操作
函数
与类库,在数据窗口中非常方便地实现文件操作。强大的日期管理功能。
DataWindow
611
社区成员
20,469
社区内容
发帖
与我相关
我的任务
DataWindow
PowerBuilder DataWindow
复制链接
扫一扫
分享
社区描述
PowerBuilder DataWindow
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章