線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1026
推到 Plurk!
推到 Facebook!

在DBGRID中該如何限制輸入值的範圍?

尚未結案
Acser
一般會員


發表:3
回覆:5
積分:1
註冊:2003-07-02

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-04-06 14:27:33 IP:139.223.xxx.xxx 未訂閱
各位先進大家好,有一問題想請教: 在DBGRID中有A,B兩個COLUMN,假設在A欄位中輸入的值是1,則在相同列中的 B欄位的值就不能為空白且值須>=0.275,若A欄位輸入的值是2,則B欄位的值 就不能為空白且值須>=0.2且<=0.25,若A欄位輸入的值是3,則B欄位的值就不 能為空白且值須>=0.1且<=0.15,若A欄位輸入的值是4,則B欄位的值就不能為 空白且值必須為0,請問以上的問題該如何做才好,試了很久都無法很順利,可 否有程式範例說明呢?謝謝~
yachanga
資深會員


發表:24
回覆:335
積分:296
註冊:2003-09-27

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-04-06 15:13:33 IP:210.243.xxx.xxx 未訂閱
根據您的需求, 用DATASET BeforePost 是可行方案之一.. 以下為範例, 請參考:    procedure TForm1.QUERY1BeforePost(DataSet: TDataSet); begin  if DATASET.FieldByName('A').AsString='1' then   begin    if not (DATASET.FieldByName('B').AsFloat>=0.275) then      begin       showmessage('B should > 0.275');       abort;      end;   end  else if DATASET.FieldByName('A').AsString='2' then   begin    if not ((DATASET.FieldByName('B').AsFloat>=0.2) and        (DATASET.FieldByName('B').AsFloat<=0.25)) then      begin       showmessage('B should >= 0.2 and <=0.25');       abort;      end;   end  else if DATASET.FieldByName('A').AsString='3' then   begin    if not ((DATASET.FieldByName('B').AsFloat>=0.1) and        (DATASET.FieldByName('B').AsFloat<=0.15)) then      begin       showmessage('B should >= 0.1 and <=0.15');       abort;      end;   end  else if DATASET.FieldByName('A').AsString='4' then   begin    if (DATASET.FieldByName('B').AsFloat<>0) or (DATASET.FieldByName('B').AsString='') then      begin       showmessage('B should be 0');       abort;      end;   end    end;    ~悠遊法國號~
Acser
一般會員


發表:3
回覆:5
積分:1
註冊:2003-07-02

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-04-08 15:04:39 IP:139.223.xxx.xxx 未訂閱
yachanga大大,非常感謝您!您的範例對我很有幫助,謝謝~
系統時間:2024-05-17 13:30:23
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!