急需PowerBuilder7.0入门教材

1. 如何使PB窗口总在最上层 通过SetWindowPos函数吧窗口的显示层次修改为HWND_TOPMOST，就可以使指定窗口永远不会被其它窗口覆盖，该函数声明为：

Function Long SetWindowPos(Long hwnd, Long ord, Long x, Long y, Long

dx, Long dy, Long uflag) Library “user32.dll”

参数1为要顶层显示的窗口句柄，参数2指定显示的层次，参数7为附加选项，其余

参数指定窗口位置和大小，均可忽略。在窗口的Open或Activate事件中加入如下

函数调用：

SetWindowPos(Handle(This),-1,0,0,0,0,3)

参数2取-1表示在最顶层显示窗口，取1表示在最底层显示；最后一个参数若取1，

表示窗口大小保持不变，取2表示保持位置不变，因此，取3（=1+2）表示大小和

位置均保持不变，取0表示将窗口的大小和位置改变为指定值。

2. 在PB中如何获得光盘盘符

通过GetDriveType函数可以获取驱动器（如：软驱、硬盘、光驱、网络映像驱动

器等）的信息，该函数声明为：

Function Unit GetDriveTypeA(String drive) Library “kernel32.dll”

参数为一个盘符（如“C:”），返回值：1表示未知，2表示软驱，3表示本地硬盘

，4表示网络驱动器，5表示光驱。因此如下代码可以获得光盘的盘符：

For I=Asc(‘D’) to Asc(‘Z’)

//列举所有可能的CDROM的驱动器

If GetDriveTypeA(Char(i)+”:”) = 5 Then

//若找到CDROM

Messagebox(“CDROM”,