VFP 愛用者社區

[Austin]

這是我未曾遇過的現象, 請教諸位大大釋疑與指導！

於VFP8.0中, 使用 ComboBox+TextBox 作為清單資料篩選的功能,
( RowSourceType= 3 - SQL statement )
於是在 ComboBox 的 DropDown 事件程序中進行選項清單的更新作業,
當TextBox 內輸入篩選的字串時, 均能如常地運作;
問題出在當TextBox 內清空時, 擬無篩選條件地全部列為清單,
第一次點擊DropDown, 清單只出現一空白橫列內為三角型方向符號,
再次點擊DropDown, 就能如預期地出現全部清單, Why ?

當下拉式清單出現一空白橫列內只有向上或向下三角型方向符號,
( 點擊此空白橫列內三角型方向符號時, 會向上與向下切換)
請問是何種狀況會這樣？又應如何避免？

Austin

[Austin]

近似上面第一個問題的問題？但發生在有輸入過濾用文字時,

( 上面第一個問題是發生於未輸入過濾用文字時---空白 )

當下拉式清單內容筆數超過這表單高度時, 畫面最下一筆呈現有向下三角形符號的空白列,
看似有道理的符號(表示還有資料, 未出現 ScrollBar), 但是此三角形符號並無操作上的功能,
怪的是, 遇此狀況時, 只要再次點擊Combo右方的下拉按鈕, 一切就如正常狀態,
會正常地出現 ScrollBar 可供選取操作.

但是, 嘗試單獨做一個 Cobom, 以完全相同條件置於 From 的 Init 內,
一切就如正常狀態, 也正常地出現 ScrollBar 可供選取操作.

問題是否應出在 DropDown 的事件裡？

在Combo 的 DropDown 的事件內我寫入：

this.ZOrder(0)
This.Parent.yCboReQry()
DODEFAULT()


在上層的自訂方法 yCboReQry 內我寫入：

LOCAL lcWordFind,lcCboQryL
lcWordFind=ALLTRIM(this.Txt1.Value)
lcCboQryL=""
this.Cbo1.RowSource=lcCboQryL
this.Cbo1.RowSourceType= 0
this.Cbo1.Clear
lcCboQryL='SELECT aFld,bFld,cFld,dFld FROM wMyDbf'+ ;
' WHERE lcWordFind = aFld INTO CURSOR yTmpQry2'+;
' ORDER BY cFld,bFld,aFld'
WITH this.Cbo1
.ColumnWidths=STR(.width- SYSMETRIC(5))+",50,50,0"
.ColumnCount=4
.RowSourceType= 3 && SQL statement
.RowSource=lcCboQryL
ENDWITH

做過許多測試, 實在找不出 Why ?
請教諸先進！

[Austin]

或許是所提的問題太笨拙, 或許是沒人有相同的問題, 未獲協助.

於未盡了解其『所以然』下, 我嘗試抑制上述『異常』現象,
將原來在Combo 的 DropDown 的事件中進行選項清單的更新作業的呼叫,
改寫到TextBox 的 LostFocus 內, 原有的問題就完全解決了.

若遇類似狀況而尚未找出更佳方法的朋友可以參考.

Austin 95.6.6