您的位置:首页 > 产品设计 > UI/UE

如何编写一个能读取Powerbuilder的数据窗口中数据的程序

2005-03-10 09:48 661 查看
这里当然指一个程序读取另一个程序中数据窗口的数据。设想的方法有多种,简单的方法是向数据窗口传递消息啦!先看看这个:

[align=center]How to manipulate Datawindow without using datawindow functions.[/align][align=left]// I test only on PowerBuilder 6.5 build 444

long ll_dw_handle
ll_dw_handle = handle(dw_1)
[/align]
[align=center]Function[/align][align=center]Power Script[/align]
RetrievePost(ll_dw_handle, 1306, 0, 0)
Post(ll_dw_handle, 1320, 0, 0)
ScrollNextPagePost(ll_dw_handle, 1318, 0, 0)
ScrollPriorPagePost(ll_dw_handle, 1319, 0, 0)
ScrollToFirstPagePost(ll_dw_handle, 1315, 0, 1) // 1 = first row?
ScrollToLastPagePost(ll_dw_handle, 1315, 0, 99999999) // 99999999 = last page ? pb6 programmer don't know how to get the last page :)
Sort DialogPost(ll_dw_handle, 1309, 0, 0)
Filter DialogPost(ll_dw_handle, 1311, 0, 0)
DeleteRowPost(ll_dw_handle, 1357, 0, 0)
Post(ll_dw_handle, 1307, 0, 0)
Append RowPost(ll_dw_handle, 1357, 0, 0)
Post(ll_dw_handle, 1312, 0, 0)
Post(ll_dw_handle, 1315, 0, dw_1.rowcount() + 1)
Post(ll_dw_handle, 1325, 0, 0)
InsertRowPost(ll_dw_handle, 1357, 0, 0)
Post(ll_dw_handle, 1313, 0, 0)
Post(ll_dw_handle, 1312, 0, dw_1.getrow())
Post(ll_dw_handle, 1315, 0, dw_1.getrow())
Post(ll_dw_handle, 1325, 0, 0)
UpdatePost(ll_dw_handle, 1357, 0, 0)
Post(ll_dw_handle, 1338, 0, 0)
Post(ll_dw_handle, 1304, 0, 0)
SaveAs Dialog Post(ll_dw_handle, 1338, 0, 0)
Post(ll_dw_handle, 1305, 0, 0)
PrintPost(ll_dw_handle, 1303, 0, 0)
Retrieve (yield)Post(ll_dw_handle, 1306, 1, 0)
Post(ll_dw_handle, 1320, 0, 0)
Cancel
Post(ll_dw_handle, 1320, 0, 0)
转载自:http://www.mycgiserver.com/~unoksoftgroup/undocumented/undocumented_powerbuilder.html
通过测试发现使用Post(ll_dw_handle, 1305, 0, 0) ,可以使数据窗口弹出saveas的对话框,经过进一步的试验,发现wparam和lparam参数的含义分别是 :saveas type和 savefilename字符串的地址,所以我们就可以使用发送消息的方式使数据窗口内容保存为文本文件,然后读取文件就可以获取数据了。
我在同一pb程序中的测试代码:
Function integer SndMsg(long hWnd, long uMsg, long wp, &
     ref string filename) library "user32.dll" Alias For "SendMessageA"

long ll_dw_handle
ll_dw_handle = handle(dw_1)
string s
s="c:/111.txt"
SndMsg(ll_dw_handle, 1305, 2, s)
以上程序只是在同一进程内测试通过,但是在Windows中,一个进程不能直接读取另一个进程的内存,所以如果将上述代码直接在两个程序间使用,会导致非法操作。因此要编写一个数据窗口外挂程序,还需要做更多的工作,这里建议使用DLL插入(利用setwindowlong或者hook)的方法,拦截dw的该消息,就可以为所欲为了。由于本人未作实际操作,就点到这里为止了。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
相关文章推荐