PowerBuilder(以下简称PB)是Powersoft公司(已被Sybase收购)推出的基于客户机/服务器体系结构的强有力的开发工具 自问世以来深受开发人员的好评 Datawindow是PB中获取专利技术的控件 它对数据的处理方法相当简洁 数据窗口能处理各种显示格式 进行报表打印 对复杂的嵌套报表同样处理自如
数据窗口的处理机制首先是根据所需的显示方式将数据源表中的域设计好 在运行时将所要的数据从数据库服务器上下载到客户机上处理 然后将更改后的数据进行提交(Commit)或回滚(Rollback) 这种处理机制大大降低了数据的传输量 减轻了网络的负担 也提高了数据的处理速度 充分利用数据窗口的特点 可达到事半功倍的效果 但是如果有些问题不加注意就会出现意想不到的错误
几个函数
AcceptText()
AcceptText()函数的功能是将数据窗口当前编辑的数据转移到数据窗口的缓冲区中 程序通常在关闭窗口及其他情况下判断是否改变了当前数据 如果已改变数据 应提示用户保存 这就杜绝了用户在偶然的情况下丢失更改数据的现象 一般用ModifiedCount和DeletedCount函数判断数据是否改变
PB在处理数据窗口时 对应开辟了四个数据缓冲区 分别为Primary Buffer Deleted Buffer Filter Buffer SortBuffer 其中Deleted Buffer存放被删除的记录 Filter Buffer存放被过滤的记录 Sort Buffer存放排序的记录 Primary Buffer存放其他记录 函数ModifiedCount从Primary and Filter Buffers中取数据进行判断 DeletedCount则从Deleted Buffer中取数据进行判断
PB在接受用户输入时设置了一个浮动编辑框 用户输入或更改的内容并不直接进入Primary Buffer 而是在用户输入完后进入下一个域时 PB首先对它进行有效性检测 通过后转入Primary Buffer 如果只改变一项数据就关闭窗口则相关数据并没有进入Primary Buffer 系统判断ModifiedCount()为 所以不会提示保存数据 用AcceptText()函数就可以将浮动编辑框中的数据转入缓冲区中 在相应的程序段前加上Accepttext() 问题就解决了
FindRequired()
在实际应用中经常需要限制表中一些域的属性 例如银行客户表中账号就不能为Null 在提交数据前检查是否将必须输入的数据都赋值是一个很好的编程习惯 FindRequired函数可以解决此问题 它通过对数据窗口中数据的检查 将数据窗口中域的属性为Required 而并未赋值的域(包括相应的行 列)找出来
为了利用此函数 在构造数据窗口时就要注意将表中具有NOT NULL属性的数据列设为Required(方法为:在数据窗口相应域上按鼠标右键或双击左键 d出Column Object 框 选Edit页 将Required前的框选中 按Ok钮即可) 在相应事件中插入下列程序:
long ror= //行数赋
integer colnbr= //列数赋
string colname //用来存储列名
mle_required Text = //窗口中的多行编辑控件 用来存储找到域的行 列号
DO WHILE row <>
colnbr++ //继续找下一列
IF dw_ FindRequired(Primary! row colnbr colname FALSE) <THEN EXIT
//若程序出错则返回
IF row <>THEN
mle_required Text = mle_required Text + String(row) + ~t &+ colname + ~r~n //保存查出的行 列号
END IF
//当ROW返回为 则意味再没有查出 跳出循环
LOOP
程序执行完后 多行编辑框中显示的为出错的地方 用户根据提示可以轻易地更改
FindRequired函数中的Row Colnbr参数能自动增加或重置 Colname用来存放列的字符名
数据的突出显示及保护:程序运行中 用户希望显示的数据具有明显的区分 例如学生的成绩(不及格的分数要用红色显示) 有些数
据必须只能显示 不能让用户修改还有些数据在有些时候可以修改 有些时候不能修改等 以上情况可归结为两点:
数据的突出显示
数据窗口应该能使用户很快找到他们想要的信息 以颜 *** 分既满足用户的习惯 又不占系统资源 实现起来也很简单 以学生管理为例 要求成绩低于 分的以红色显示 其他不变 方法是:在数据窗口中对应成绩的列(例如 /CJ )上双击鼠标左键或单击鼠标右键 d出Column Object对话框 选取Expressions页 在Color后的框中输入:
if(cj<rgb( ) rgb( ))此句表示当成绩小于 则显红色 否则灰色显示
IF语句只可能有两种选择 如果要更多的条件判断则必须用CASE语句 例如成绩大于等于 用蓝色 小于 用红色 其他用绿色则应该用以下语句:
Case(cj WHEN IS >= THEN RGB( ) WHEN IS <THEN RGB( ) E
LSE RGB( ))
我们还可以输入更加复杂的公式
图形是最好的说明语言 为了更好体现数据的直观性 可以采用条件位图的方法 之所以称为条件位图 是因为它随数据的性质而决定是否显示 用可以在上述的成绩管理数据窗口的前面加上一个图片 双击位图 d出Picture Object对话框 选Expressions页 在Visible右的编辑框写入if(xb= ) 此句的意义为当性别为 (女)时蝴蝶出现 否则蝴蝶消失 程序运行起来相当直观 读者可以触类旁通 充分利用列的属性使用户的界面更加友善 漂亮
数据的保护
有很多情况需要对数据进行保护(即只能显示而不允许修改) 学生查询成绩时就是这种情况 进行数据保护的方法有很多 第一种是双击要保护的列 d出Column Object 选取Edit页 将Display Only框选中第二种将要保护的列的TabOrder置 则此列得不到焦点 当然就无从修改第三种是从根本作起 选取Rows菜单 再选取Update Properties d出Specify Update Properties对话框 将Allow Updates设为空 这样即使用户更改了也无法更新数据库 使更改毫无意义
以上情况都是事先已经确定需要保护的数据 如果有些数据要保护 有些不要保护则以上的方法就无法实现 例如合同台账管理:对于一个没有实施的合同可以更改 对于一个已经实施的合同则必须加以保护 这需要用列的保护属性来实现 方法如下:
双击每一列 d出Column Object对话框 选取Expressions页 在Protect后的框中写入:if(sfss= ) 其中sfss为表示合同是否实施 如果实施(值为 )则进行数据保护 否则可以更改 此方法可以在程序运行中动态控制数据的保护方式
数据窗口的多表更新
lishixinzhi/Article/program/SQL/201311/16236这个是直接导入的。还有一种方法,就是逐行逐列读取excel表格,这个方法效率不高,但是有个好处就是excel的数据文件和数据窗口不要求对应,就相当于excel是一个数据窗口,从这里取值,赋值到目标数据窗口一样的 *** 作。如果你需要我也可以帮你写一个例子。
先传一个直接导入的:这种导入要求excel和数据窗口的字段对应。
OLEObject ExcelServer
long excelok
string str_savename
string str_filename
string named
integer value
value = GetFileOpenName("打开文件",str_filename, named, "DOC", &
"文本文件 (*.TXT),*.TXT," &
+ "EXCEL 文件 (*.XLS),*.XLS,"+"EXCEL 文件 (*.XLSX),*.XLSX")
if value = 1 then
ExcelServer = CREATE OLEObject
ExcelOK = ExcelServer.ConnectToNewObject( "excel.application" )
if excelok <0 then
messagebox("连接excel失败,检查你的系统是否安装了office",string(excelok))
return
else
dw_1.reset()
ExcelServer.Workbooks.Open(str_filename)
str_savename="c:\temp.txt"
excelserver.activeworkbook.saveas(str_savename,3)
excelserver.displayalerts=false
ExcelServer.quit()
ExcelServer.DisconnectObject()
DESTROY ExcelServer
dw_1.ImportFile(str_savename)
filedelete(str_savename)
end if
end if
数据窗口数据窗口是PowerBuilder的一大特色,PowerBuilder作为一种数据库前端开发工具, *** 作的核心是数据库中的数据。而数据窗口是一个对象,它包含了对数据库中的数据进行特定 *** 作的信息。只要定义好一个数据窗口对象,以后就可以在多个应用程序中使用这个数据窗口对象,总之,可以把数据窗口看作封装了对数据库中的数据 *** 作的对象,它极大地方便了应用程序对数据库的使用。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)