VFP 愛用者社區

[koharu]

Grid 上有個 "數量"欄位 ,可讓使用者輸入物品數量
小弟想要做 當使用者輸入數量 超過 現有數量時 提醒使用者

目前想到的方式是
1.產生提示訊息"現有數量不足"
在 column.text1 的 interactivChange 內加入
if this.value > 現有數量
@X,Y SAY '現有數量不足'
endif
但是 X,Y 不曉得怎麼控制 在當前欄位 旁邊.

2.將輸入數量欄位值改變顏色
在 column.text1 的 interactivChange 內加入
this.Parent.DynamicForeColor = IIF(this.Value >現有數量 ,RGB(255,0,0),RGB(0,0,0))
但是後來發現 增加列數 當游標位置點選其它欄位 , 顏色也跟著不斷變動

麻煩給點 建議 或是 更好的想法 ~
thanks

[LiuRambo]

2.將輸入數量欄位值改變顏色
在 column.text1 的 interactivChange 內加入
this.Parent.DynamicForeColor = IIF(this.Value >現有數量 ,RGB(255,0,0),RGB(0,0,0))
但是後來發現 增加列數 當游標位置點選其它欄位 , 顏色也跟著不斷變動

^^^^^^^^^^^^^^^^^
EVEN放錯地方了
不應該放在interactivChange內
放init即可
試試看這樣thisform.grid.column1.DynamicForeColor = IIF(this.Value >現有數量 ,RGB(255,0,0),RGB(0,0,0))

[karl]

1.產生提示訊息"現有數量不足"
if this.value > 現有數量
messagebox('現有數量不足')
endif

[syntech]

1.@ X,Y SAY 應該只會出現在 "底"上頭,例如 _SCREEN,FORM 之類,不能出現在物件附近吧. (是嗎?)

正常會使用 MESSAGEBOX,或是利用 WIN32 的 MESSAGEBOX 來搞
我記得 CHRIS LEE 老師的書本中有示範這樣的作法.
(當然目前絕版中)

2. 驗證輸入是否正確,一般會使用 物件的VALID ,或是 @ X,Y GET ... VALID 你的檢查()

3. 如果想用變色,要考慮作用域的問題,例如用 RECNO() = 某個號碼 AND 某個條件,
但是控制很麻煩且容易出錯

[koharu]

感謝各位的建議

試過Liu大的方法 , 點選其它欄位 ,顏色還是跟著變動
不曉得是哪邊 沒有注意到
想確認是 form ,grid ,還是 coulumn.text1 的 init

syntech大 說的作用域 的確相當令人困擾
Grid 看起來相當好用 , 但是卻不容易控制
目前似乎 用 Messagebox 是最方便的作法

[DennisTsai]