VFP 愛用者社區

garfield · 發表於: 星期五四月 20, 2018 11:37 am 文章主題:

方法有很多種, 答案不嫌多,
當然希望能有其它方式來參考.

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 17 樓

有辦法當然有辦法，
只是庸人自擾罷了

就是兩個欄位！

最簡單的方法才是最好的方法。

syntech · 發表於: 星期五四月 20, 2018 3:24 pm 文章主題:

在grid上浮貼一個textbox,用來輸入客戶代號.
grid中當然就專職顯示名稱.

----
我好像記錯什麼...... Embarassed

這個是不是跟上面說的一樣,浮貼一個textbox

http://vfp.sunyear.com.tw/viewtopic.php?p=29127#29127

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 19 樓

DennisTsai · 註冊時間: 2005-07-26 文章: 178 第 20 樓

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 21 樓

DennisTsai · 註冊時間: 2005-07-26 文章: 178 第 22 樓

syntech · 發表於: 星期一四月 23, 2018 9:32 am 文章主題:

你們要討論是 UI 的簡單,還是設計開發的簡單.

UI 看起來簡單,背後可能花在設計開發的成本就很高.
這個例子就是這樣.
沒有一種方式比設計兩個欄位的開發成本還低.

如果把UI弄簡單可以讓薪水高一點,成交金額高一點,
應該大家都沒話講.
但是通常是業務端帶回來一些聽起來很簡單作起來搞死人的東西. XD

----
以我來說,
只會提醒業務端這東西做起來難度有多高,時間可能花多少,技術方面是否成熟,
其他問題是決策者該考慮的,

DennisTsai · 註冊時間: 2005-07-26 文章: 178 第 24 樓

CPS0204 · 註冊時間: 2014-08-24 文章: 475 第 25 樓

例:此欄名稱為 cust_no_name pict x(20) ,客戶基本檔=CUSTOMER1, 有INDEX TAG 依CUST_NO
***********************
GETFOCUS 中需設定
IF !SEEK(ALLTRIM(THIS.VALUE),'CUSTOMER1')
SELE CUSTOMER1
LOCATE FOR ALLTRIM(THIS.VALUE)=ALLTRIM(CUSTOMER1.CUST_NAME)
IF !FOUND()
THIS.VALUE=SPACE(20)
ENDIF
ENDIF
********
LOSTFOCUS 中設定
IF !EMPTY(THIS.VALUE)
IF SEEK(ALLTRIM(THIS.VALUE),'CUSTOMER1')
THIS.VALUE=CUSTOMER1.CUST_NAME
ELSE
SELE CUSTOMER1
LOCATE FOR ALLTRIM(THIS.VALUE)=ALLTRIM(CUSTOMER1.CUST_NAME)
IF !FOUND()
=MESSAGEBOX('無此客戶碼='+THIS.VALUE,16,'FOXPRO')
THIS.VALUE=''
ENDIF

ENDIF
ENDIF

liangszpt · 發表於: 星期三五月 09, 2018 11:26 pm 文章主題:

可能楼主在等你的答案，等了十年

ezpos · 註冊時間: 2011-04-20 文章: 323 第 27 樓

將客戶代碼及名稱合併,也就是輸入資料時是輸入代碼,顯示時是名稱
--->這個是沒問題的...裡面轉個彎就可以了...

goodnight · 發表於: 星期四七月 19, 2018 10:10 am 文章主題:

可能當時的螢幕不夠寬, 不像現在16:9的24吋螢幕, 就不用擔心這個問題了