怎样用PB代码实现在MDI窗口里的 Ctrl + Tab 的功能 ?

rongrong 2002-03-22 11:26:59

我现是这样写的但没成功，他只是在两张 SHEET 里切换！

window lw_sheet
lw_sheet = w_main.GetFirstSheet ()

if IsValid (lw_sheet) then
lw_sheet = w_main.GetNextSheet (lw_sheet)
end if

if IsValid (lw_sheet) then
lw_sheet.BringToTop = TRUE
end if

...全文

74 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

rongrong 2002-03-22

打赏
举报

回复

TO: LIULEE 我就是这样做的呀！

liulee 2002-03-22

打赏
举报

回复

ctrl+tab默认就有的吧？我没试过，总觉得可行的。

你要对所有sheet循环的....GetNext...没有了就往回走。
就想一个堆栈操作一样。

rabbitsfoot 2002-03-22

打赏
举报

回复

第二行写成：lw_sheet = w_main.GetActiveSheet ()，如果返回空值再取FirstSheet。

sorrow_arrow 2002-03-22

打赏
举报

回复

sorry!我错了，不好意思

sorrow_arrow 2002-03-22

打赏
举报

回复

默认的是shift + tab
用默认的不行吗？不用写代码了

pb笔记（三）//常用API函数例解1．如何使PB窗口总在最上层(Always On Top) 通过SetWindowPos函数把窗口的显示层次修改为HWND—TOPMOST，就可使指定窗口永远不会被其它窗口覆盖，该函数声明为： Function Long SetWindowPos(Long hwnd,Long ord,Long x,Long y,Long dx,Lo

1. 如何使PB窗口总在最上层　　通过SetWindowPos函数吧窗口的显示层次修改为HWND_TOPMOST，就可以使指定窗口永远不会被其他窗口覆盖，该函数声明为：　　Function Long SetWindowPos(Long hwnd, Long ord, Long x, Long y, Long dx, Long dy, Long uflag) Library “u

PowerBuilder的创始人米歇尔克茨曼。 PowerBuilder奠基人大卫李特瓦克。 1991年6月。Powersoft公司发布了其旗标式客户/服务器硬功开发工具。 1995年PowerBuilder1.0 1996年PowerBuilder5.0 2003年PowerBuilder9.0 PowerBuilder特点：面向对象的编程和时间去懂的应用开发程序开发工具，...

/常用API函数例解 1．如何使PB窗口总在最上层(Always On Top) 通过SetWindowPos函数把窗口的显示层次修改为HWND—TOPMOST，就可使指定窗口永远不会被其它窗口覆盖，该函数声明为： Function Long SetWindowPos(Long hwnd,Long ord,Long x,Long y,Long dx,Long dy,Long uflag) Library ″user32″ 参数1为要顶层显示的窗口句柄，参数2指定显示的层次

1、利用Api函数计算Windows从启动后所运行的总时间
Function long GetTickCount() Library "kernel32.dll" //获取windows从启动开始的总微秒数
窗口w_example的open事件：
timer(0.05)//触发timer事件
窗口的timer事件：
long hour , minute ,second
hour = GetTickCount() / 1000

1,079

社区成员

66,439

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章