发新话题
打印

[PowerBuilder] PowerBuilder实用技巧八则(二)

本主题由 夜游神 于 2008-6-1 21:30 分类

PowerBuilder实用技巧八则(二)

五、数据窗口中实现自动折行

  有时为了界面的考虑需要将一些长字段折行显示,但又不能确保在所有情况下都会出现长字段。比如,我们要求当客户地址超过50个字符时将它分两行显示,对于没满50个字符的客户仍然按照正常格式显示。

  具体如下:

  1、在数据窗口中选择要自动折行的列Address。

  2、选择位置属性(Position)并选中Autosize Height选项

  3、 选择编辑属性(Edit)并去掉Auto Horz Scroll选项

  4、选择数据窗口中细目带的属性Autosize Height选项。注意,是当你拖动细目栏时出现的属性。

设置完毕后在左下角预览窗口中将显示图例的结果。

  在进行列自动折行显示的时候,还要注意一点,系统判断自动折行的断点是以空格或标点符号为依据的,如果我们输入一长串字符且中间没有任何标点符号或空隔的话,即使该字符串再长也无济于事。因此,我们一定要提醒用户在录入时适当的加入一些空格或回车。

  六、数据窗口中记录颜色的隔层显示

  相信你一定见过这样的显示,第一行记录的背景色是浅黄色,第二行记录的背景色是白色,第三行又是浅黄色,第四行又是白色……,依次类推。

  要想让显示的数据达到上述效果,我们首先要知道的是这些数据存放在数据窗口中的什么地方。很显然,数据窗口中的所有数据是在细目带中列出的,因此只要在细目带中设置一些数据属性就会影响到这个细目带中的所有内容。具体实现如下:

  1、打开数据窗口,单击细目带(Detail),注意是点击有“Detail”字的一栏,不是它存放数据的地方。点击它鼠标会出现上下小箭头。

  2、选择常规属性,单击颜色属性(Color)旁边的一个带有红色图标的小按钮。

  3、在表达式一栏中输入

  if ( Mod( GetRow(), 2) = 0, RGB(255, 255, 200), RGB(255, 255, 255))

  // RGB(255, 255, 200),浅黄色

  OK,预栏一下,效果不错,大功告成。

  七、实现数据窗口的动态排序

  在用到Windows的资源管理器的时候,当我们需要按照文件的类型或名称排序的时候只要用鼠标点击一下相应的标题栏,系统会按照升序或降序交替排序,这完全取决于用户鼠标点击的奇偶数。如此方便的操作何不用到我们的数据窗口中——实现按某列的动态排序。

  为了实现上述功能,程序首先需要用到一个全局变量(相对于PB来说可以用窗体变量),用它来控制连续两次点击之间的排序方向。因为字段的排序方向只有升序和降序两种,所以我们可以用一个Boolean型。本例中是Boolean ib_flag。接着在数据窗口控件的Clicked事件中写上如下代码

  /*****************************程序代码******************************/
  String ls_column, ls_sort
  ls_column = this.GetObjectAtPointer() // 得到鼠标按下位置的对象名
  ls_column = left(ls_column, len(ls_column) - 2) // 得到列标题名字
  if not Lower(right(ls_column, 2)) = "_t" then return// 如果不是缺省的列标题,即以“_t”结尾或鼠标根本没有点在列标题上则退出
  ls_column = left(ls_column, len(ls_column) - 2) // 去掉列标题末尾的“_t”,得到有效的列标题名
  // 进行升序和降序的切换
  if ib_flag then
  ls_sort = ls_column + " A" // 升序
  else
  ls_sort = ls_column + " D" // 降序
  end if
  ib_flag = not ib_flag // 为下一次排序准备
  ls_sort = ls_sort
  this.setsort(ls_sort)
  this.sort()
  /*****************************结束******************************/
  注:这里所叙述的数据窗口中列的动态排序是以系统默认的列标题名为前提,即在标题栏中列标题名字是以“_t”结尾。

  八、设置系统时间

  在开发具有数据服务器应用软件时,有时为了使所有计算机的时间都保持相同,或者接近相同,主要是为了避免数据录入时出现的时间差异,通常我们会在客户机每次使用应用软件前将本地时间设置成跟服务器相同。从而确保输入的数据在时间上具有较高的正确性。即,要实现系统时间的设置。下面就讲述一下实现的过程。

  本程序是通过调用外部函数SetSystemTime()实现系统时间的设置,该函数返回布尔型。查阅一下有关参考手册就会发现该函数需要一个表示系统时间结构(Struct)的数据类型作为参数。此结构的定义如下:

  struct _SYSTEMTIME
  {
   INT iYear;
   INT iMonth;
   INT iDayOfWeek;
   INT iDay;
   INT iHour;
   INT iMinute;
   INT iSecond;
   INT iMilliseconds; // 毫秒
  } str_SystemTime;
  
  要在程序中使用外部函数首先需要要进行外部函数声明,可以根据函数的使用范围放在全局外部函数声明区或局部外部函数区声明。具体声明如下:

  Function Boolean SetSystemTime(str_SystemTime str_MyTime) Library "Kernel32.dll"

  声明之后就可以使用了。下面代码实现将系统日期设置成“2000年8月10日”

  /*****************************程序代码******************************/
  str_SystemTime str_MyTime
  // 给结构赋值
  str_MyTime.iYear = 2000 // 2000年
  str_MyTime.imonth = 8 / /8月
  str_MyTime.iDay = 10 // 10日
  // 设置系统日期
  if SetSystemTime(ref str_MyTime)then
  Beep(1)
  MessageBox("提示","系统日期设置成功!")
  else
  Beep(1)
  MessageBox("提示","系统日期设置失败!")
  end if
  /*****************************结束******************************/
  
  注意,如果只有日期没有时间的话系统会将时间设置成默认的上午8点整。设置系统的时间方法和设置日期类似,只要将结构中的时、分、秒分别设置成想要的就行了。

TOP

技巧的东西学习应用实践中会更容易掌握的

TOP

发新话题