科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道应用软件PB编程技巧二则

PB编程技巧二则

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

在PB编程中,我们经常需要应用一些小的技巧,如:使数据窗口每页打印固定行、在系统中嵌入Excel对象等。下面,笔者将结合实际介绍这些小的技巧应用。

作者:51cto.com整理 来源:51cto.com 2007年9月15日

关键字: PB 编程 软件

  • 评论
  • 分享微博
  • 分享邮件

在PB编程中,我们经常需要应用一些小的技巧,如:使数据窗口每页打印固定行、在系统中嵌入Excel对象等。下面,笔者将结合实际介绍这些小的技巧应用。

一、页面的精确打印

关于数据窗口每页打印固定行的问题:

1.增加一个计算列,此计算列必须放在Detail段的Expression中输入:

ceiling(getrow()/20)

//这里20还可以用全局函数取代,这样可以允许用户任意设置每页打印多少行。

2.定义分组,选择选单“Rows->Create Group...”,并按计算列字段分组。最后一定将“check box-->New Page On Group Break”选中。

3.将此计算列设为不可视。

另外,如果需要最后一页不足补空行。也很简单,程序如下:

long ll_pagerow = 10

//每页打印行数

long ll_count, ll_row

ll_count = dw_report.retrieve(...) //取得现有报表的总行数

ll_count = ll_pagerow - mod(ll_count, ll_pagerow)

If ll_count < ll_pagerow then

for ll_row ="" 1 to ll_count

dw_print.insertrow(0)

//补足空行

next

end if

二、如何嵌入Excel对象

在进行程序开发时,有时会需要将PowerBuilder与Excel应用程序结合使用,如将数据检索出来后,按照格式要求,将数据转入到Excel表格中。实现步骤如下:

1.创建并连接对象:

oleobject loo_excel

oleobject loo_sheet

loo_excel=create oleobject

loo_excel.ConnectToNewObject("Excel.Application")

//设置缺省的字体与大小

loo_excel.Application.StandardFont = "Arial Narrow"

loo_excel.Application.StandardFontSize = "8"

loo_excel.Application.Workbooks.Add()

loo_sheet=loo_excel.Application.Workbooks(1).worksheets(1)

loo_excel.Application.Visible=true

loo_excel.Application.ScreenUpdating = false //屏蔽可见属性

2.调用Excel本身的属性,函数,通过数据窗口填写数据到Excel:

loo_excel.Application.ScreenUpdating = true //设置可见属性

3.断开连接并释放对象:

loo_excel.DisconnectObject()

//注:建议引用API函数,捕获Handle。

destroy loo_excel

以上程序已在PB6.0、Windows 98平台上运行通过.

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件
    闂侇収鍠曞▎銏㈡媼閵忋倖顫�

    濠碘€冲€归悘澶愬箖閵娾晜濮滈悽顖涚摃閹烩晠宕氶崶鈺傜暠闁诡垰鍘栫花锛勬喆椤ゅ弧濡澘妫楅悡娆撳嫉閳ь剟寮0渚€鐛撻柛婵呮缁楀矂骞庨埀顒勫嫉椤栨瑤绻嗛柟顓у灲缁辨繈鏌囬敐鍕杽閻犱降鍨藉Σ鍕嚊閹跺鈧﹦绱旈幋鐐参楅柡鍫灦閸嬫牗绂掔捄铏规闁哄嫷鍨遍崑宥夋儍閸曨剚浠樺ù锝嗗▕閳ь剚鏌ㄧ欢鐐寸▕鐎b晝顏遍柕鍡嫹

    重磅专题
    往期文章
    最新文章