2017-02-21 60 views
0

我有一個隨機循環的問題,我可以使用gettext從PCOMM(IBM Personal Communicator)屏幕上的頁面提取信息,然後當我進入下一個屏幕時儘管出現了視覺上的空白,但仍然會提取相同的信息。PCOMM gettext拉動不可見信息

我不能粘貼的資訊安全原因截圖......但這裏的要點是:

Dim ps As New AutPS 
Dim oia As New AutOIA 

第1頁:ps.GetText(15,31,7)= 1800.00(我可以看到這個值屏幕)

進入下一個頁面,等待oia.InputInhibited = 0和ps.Ready

第2頁:ps.GetText(15,31,7)= 1800.00(屏幕在這個位置顯示爲空白)

此問題不是孤立的,並且可以用一個特定的帳號重複。

回答

0

找到解決方案!

關鍵在於使用ps.autECLFieldList。此對象可以檢測給定字段(使用FindFieldByRowCol定位)是否顯示,因此當與我們的getText一起使用時,我們可以確保我們只從可見字段檢索信息。

Dim fl As Object = ps.autECLFieldList 

fl.refresh() 'Good practice to make sure the Field List is up to date 

If fl.FindFieldByRowCol(15, 31).display Then 
    Amount = ps.GetText(15, 31, 7) 
End If