编辑和运行Windows Phone应用是件很容易的事情，你只需在微软网站获取一个免费的工具包，在AppHub注册后，并跟着入门教程学习就可以了。 XAML是我的惯用格式。. WP7开发者也许能注意到应用程序标题和页名不再是默认的硬编码，而是通过通过应用的共享资源来实现。通过这种方式，你不必再每次再所有页中设置应用名称。 <phone:PhoneApplicationPage x:Cl...

[阅读全文]

在对数据窗口（DataWindow）进行操作时，很多时候需要获取或设置数据窗口的当前行，这可以通过数据窗口（DataWindow）的两个函数来实现：SetRow和GetRow，下面就对这两个函数进行详细地介绍。 1、设置当前行 如果要设置DataWindow中的某行为当前行，可以使用SetRow()函数。 语法格式：dw_control.SetRow(rownumber) 其中rownum...

[阅读全文]

我们经常需要在数据窗口（DataWindow）中插入或删除一行，这可以通过两个函数来实现：InsertRow和DeleteRow来实现。 1、在数据窗口中插入行 在DataWindow中插入一行，可以使用InsertRow()函数。 其语法格式为： dw_control.InsertRow(rownumber) dw_control是数据窗口控件名，rownumber是要插入行的的行号。...

[阅读全文]

VBA中IsDate函数用来判断一个值是否为日期型值，其语法格式如下： IsDate(expression) 这个函数返回Boolean 值，指出一个表达式是否为日期型值，同时，参数expression是必需的，其类型为Variant，包含日期表达式或字符串表达式，这里的字符串表达式是可以作为日期或时间来认定的。 使用说明： 如果表达式是一个日期，或可以作为有效日期识别，则 IsDate ...

[阅读全文]

VBA中的IsError函数用来判断一个表达式是否为一个错误的值，其语法格式如下： IsError(expression) 参数expression是必需的，可以是任何有效的表达式。 这个函数返回布尔类型值，即true或false。 该函数常用语以下情况中： 利用 CVErr 函数将实数转换成错误值就会建立错误值。IsError 函数被用来确定一个数值表达式是否表示一个错误。如果 exp...

[阅读全文]

Public Sub SelectionSort(ByRef lngArray() As Long) Dim iOuter As Long Dim iInner As Long Dim iLBound As Long Dim iUBound As Long Dim iTemp As Long Dim iMax As Long iLBound = LBound(lng...

[阅读全文]

Public Sub BubbleSort(ByRef lngArray() As Long) Dim iOuter As Long Dim iInner As Long Dim iLBound As Long Dim iUBound As Long Dim iTemp As Long iLBound = LBound(lngArray) iUBound = UBo...

[阅读全文]

游标是一个非常有效的记录集处理方式，在PB中游标用的地方比较广泛，下面是在PB中游标使用的整个过程，基本包括定义游标、打开游标、操作游标和关闭游标这几个步骤，具体如下代码所示： //定义游标 DECLARE C1 CURSOR FOR //游标的具体取值内容 select aln_cd,sum(cargo_aln_fare) from fare_daily_view where aln...

[阅读全文]

本文通过Kukoc:给的例子实现了在Access中存取图片的方法： SQLCA.AutoCommit = TRUE //取文件长度 ll_flength = FileLength(ls_bmpname) if IsNull(ll_flength) then ll_flength = -1 if ll_flength < 0 then Messagebox("错误信息", "图...

[阅读全文]

下面用两种方法实现了在PB程序中启动电子邮件的方法。 第一种方法： string url inet iinet_base url = "mailto:ferryman@163.net" GetContextService("Internet", iinet_base) iinet_base.HyperlinkToURL(url) 第二种方法： string ls_ferryman,...

[阅读全文]

本文使用两种方法实现在PB中启动浏览器的方法。 第一种方法： //打开浏览器 string url inet iinet_base url = "http://pbsite.yeah.net" GetContextService("Internet", iinet_base) iinet_base.HyperlinkToURL(url) 第二种方法： //打开浏览器 st...

[阅读全文]

很多时候在PowerBuilder中的数据需要传送到Excel中进行处理或打印，那么如何把PowerBuilder中的数据传动到Excel中呢，本文就介绍了相关的方法及要使用到的函数。 PowerBuilder是面向对象的数据库开发工具之一，它可以操纵很多大型数据库和桌面数据库，但它对中国式报表打印不太方便，而 Excel对此却非常容易，若把两者结合起来使用则可取长补短。 建立一个Excel工...

[阅读全文]

数据窗口在Retrieve后往往会返回很多条记录，而这些记录中的数据复杂，通常会造成视觉上的不便。因此如果能够使行与行之间用不同的颜色进行区分，既能极大地方便使用者，又能让您的应用程序增色不少。同时当使用者点击当前行时，颜色就会变成浅黄色，这样的效果谁都会喜欢。 数据窗口中的所有数据是在细目带（Detail）中列出的，因此只要在细目带中设置列对象（Column)的某项属性就会影响到它的显示效果。...

[阅读全文]

TreeView是Powerbuilder中非常重要的一个控件，在很多地方使用起来非常方便，但同步选择问题困扰了很多人，本文就给出了实现TreeView控件同步选择的一个方法。 TreeView控件能够清晰地表示层次关系，因而赢得了众多程序员的喜爱。在TreeView编程中，常见的一个问题是同步选择（即选择一个节点时，同时选择该节点的所有子节点；不选一个节点，同时去除该节点的祖先节点选择标志）。...

[阅读全文]

报表设计是MIS开发中非常重要的一环，本文介绍了如何省时省力的为用户设计出符合要求的报表的方法。 在通常的Server/Client方式MIS开发中，总是有没完没了的报表需要制作，调试报表花费的时间也是最多而且乏味，还常常不能满足客户的要求。要是能够让用户自己调整报表的格式和内容，然后将它保存下来，程序下次启动时它自动调用保存了的报表格式那有多好。本人通过如下方法最终实现了用的要求。 PB（P...

[阅读全文]

本文通过场上提供的IC卡编程接口实现了读写IC卡的功能。 在写相关的信息管理系统时，有时会遇见读写相关的外部设备等问题，这类的问题，在PowerBulider中实现这类的功能并不是一件难事，现在的相关外部设备厂商在提供产品时，基本都提供了相关编程接口，利用这些接口函数后ActiveX控件，结合PowerBulider中外部函数的调用，可以轻松的实现相关功能，以下提供读写IC卡实现的基本代码，以期...

[阅读全文]

本文介绍了在PowerBuilder（PB）中通过OleObject来访问Word的一种方法。 1、引言 在编程的时候，常常需要访问Word文档。除了使用DDE之外，PowerBuilder还有一种操作Word的方式，就是通过OLEObjcet和OLEControl。 OLEObject是不可视的OLE对象，而OLEControl则是可视的窗口控件。由于OLEObject较后者更灵活方便，如...

[阅读全文]

我在《PB中读取地磅称量数据》中简述了PB读取地磅操作过程，有网友反映对BCD码的读取及解码不是很清楚。在此，特追加此部分内容来解释BCD解码过程。 认识BCD编码 BCD编码是一种数字压缩存储编码，大家都知道一个字节有8个位，而数字0到9最多只需要使用4个位，如果用一个字节来存储一个数字相对就会有一定的浪费，尤其是在传输过程中，由此人们就想出了压缩的办法，于是BCD编码就产生了。 BCD编...

[阅读全文]

本文介绍了在PowerBuilder中使用动态SQL语句的4种方式。 PowerBuilder是目前最流行的数据库开发工具之一。PowerBuilder提供了在程序代码中加入嵌入式SQL语句的功能来支持对数据库的访问。但这种嵌入式SQL语句只能支持一些固定的标准的SQL语句，即在进行程序代码编译处理时这些SQL语句必须是确定的，例如：对哪张表哪几个字段进行操作在程序代码中是固定写明的，另外这种方...

[阅读全文]

就拿库存量来说吧，最常用的是当某货物的库存量达到一个最低库存量时程序应能自动判别，并用警告色显示，通常是红色。此时，我们只要在运用了上述的方法后再在需要闪烁的字段上，比如，库存量，在它的颜色属性中写上相应的语句。下面这段代码实现“当某一物品的库存量小于20的时候，程序以红色闪烁显示警告” if ( Store_Num < 20, & 　if mod( Second(Now()),...

[阅读全文]

本文从理论上分析了PB与EAServer开发多层应用程序结构的优越特性。 PowerBuilder是在c/s应用中被普遍使用的开发工具，是公认的高效率的图形化4GL工具。EAServer是集动态页面发布和事务处理于一个身的企业级应用服务器。这二者的结合可以构成多层应用的开发和提交环境，开发人员可以不离开这个集成的开发环境进行应用的开发、调试、提交和运行。 PowerBuilder的一个重要特性...

[阅读全文]

本文介绍了如何在PowerBuilder下制作特殊形状的数据窗口及按钮的方法。以下是全部源码，可以把整个窗口的源代码导入到PBL里自己运行一下试试。 $PBExportHeader$w_button.srw forward global type w_button from window end type type cb_11 from commandbutton wit...

[阅读全文]

摘要：本文主要讨论基于Windows平台的PowerBuilder 8.0应用程序编译发布关键问题和解决方法，包括执行文件的建立、资源文件的创建、安装程序的建立及添加数据源和SQL anywhere 数据库移动处理等问题。 关键字：软件开发、PowerBuilder 8.0、应用程序发布、Setup程序制作。 引言 PowerBuilder+ODBC+SQL anywhere是目前开发数据库...

[阅读全文]

本文讲解了在PowerBuilder下压缩数据库的方法。 下面直接给出方法函数： （1）申明外部函数，用来取系统的临时路径。 FUNCTION ulong GetTempPath(ulong nBufferLength,ref string lpBuffer) LIBRARY "kernel32.dll" ALIAS FOR "GetTempPathA" （2）核心方法： global t...

[阅读全文]

程序制作完了，需要用户安装在自己的机器中运行，本文介绍了如何为PB程序制作安装程序地方法，同时让大家清楚PB制作的程序哪些文件需要打包。 要使Powerbuilder制作的可执行程序正常运行，要做不少的工作，用的数据库不同，则打包所需要的文件也会有些不同。 以PB自带的SQL ANYWHERE 5.0数据库为例，因为在没有开发环境的机器上不会装SQL ANYWHERE，所以你得自己来修改注册表...

[阅读全文]

本文介绍了使用PowerBuilder实现指示灯的方法。 相信大家在安装各种软件或微软公司产品时都会注意到那直观可爱的条状指示灯，它总是以最直接的方式告诉我们工作的进程情况，在PowberBuilder 中也可以实现。 （1）创建一个应用程序（working－out)。 （2）创建一个窗口（w_01）。 （3）在应用程序的Open事件中最未尾Open()函数改为Open(w_01)。 （...

[阅读全文]

本文介绍了使用WIN API函数实现消息框剧中显示的方法。 SharedObject系列函数和共享对象有关的函数包括：SharedObjectRegister、SharedObjectGet、SharedObjectUnregister和SharedObjectDirectory函数。 首先，用SharedObjectRegister函数初始化共享对象，并建立一个单独的线程。如： Share...

[阅读全文]

在前面的文章中，我们给出了获得应用程序当前路径的一种方法（详细参考PB中如何获得当前应用程序的路径一文），在这里使用另外一个API函数也可以实现同样的效果，下面是程序的源代码。 //获得当前的路径 FUNCTION ulong GetCurrentDirectoryA(ulong nBufferLength,ref string lpBuffer) Library kernel32.dll" ...

[阅读全文]

在编写一部分PB应用程序时，我们可能获得计算机的名称，在PB中没有提供这样的类或方法，但是我们可以借助API函数来实现，下面是具体的实现源代码。 //获得当前计算机的名称 FUNCTION boolean GetComputerNameA(ref string cname,ref long nbuf) LIBRARY "kernel32.dll" String ls_computername...

[阅读全文]

有时，我们在编写PB应用程序时，想获得当前应用程序的路径，我们可以借助API函数来实现，下面是具体的实现源代码。 //如何获得当前应用程序的路径 FUNCTION unit getmodulefilenamea(ulong hmodule,ref string lpfilename,ulong nsize)library "kernel32.dll" string ls_buffer=spa...

[阅读全文]