全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1007
推到 Plurk!
推到 Facebook!

要如何達到DbGrid某筆不能修改 但是其他筆可以修改的判斷

答題得分者是:hagar
pristen
一般會員


發表:15
回覆:10
積分:5
註冊:2002-05-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-06-09 09:15:08 IP:203.149.xxx.xxx 未訂閱
if not (DataPhase = dpBrowse) AND (TDmPurmi09(DM).cdsBody1.RecordCount > 0) then begin if CdsBody1TH203.asstring <> '' then begin Brain.DsMessage('E', '000032', ['此筆資料已有進檢單號,不能修改這一筆喔!']); exit; end; end; end; 這是我原本寫法寫在dbgrid.keypress 但是這樣寫是錯的 因為會造成其他筆 也不能修改 要怎麼做判斷 ?
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-06-09 09:20:45 IP:210.61.xxx.xxx 未訂閱
加上RecNo判斷
pristen
一般會員


發表:15
回覆:10
積分:5
註冊:2002-05-27

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-06-09 09:29:48 IP:203.149.xxx.xxx 未訂閱
有辦法 讓某筆資料 固定住 不讓他修改的屬性嗎
T.J.B
版主


發表:29
回覆:532
積分:497
註冊:2002-08-14

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-06-09 09:36:25 IP:61.220.xxx.xxx 未訂閱
那要看你要讓某一筆不能修改的依據是什麼 天行健 君子當自強不息~~@.@
------
天行健
君子當自強不息~~@.@
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-06-09 09:39:34 IP:218.16.xxx.xxx 未訂閱
CdsBody1TH203 的 DataSources 的 onStateChange 事件 : procedure TForm1.DataSource1StateChange(Sender: TObject); begin if CdsBody1TH203.asstring <> '' and (Table1.State in [dsEdit,dsInsert]) then Table1.Cancel; end;
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-06-09 09:46:31 IP:202.39.xxx.xxx 未訂閱
也可在 DataSet 的 BeforeEdit 事件中判斷 不行修改則 Abort;    --- 每個人都是一本書
系統時間:2024-06-27 0:40:26
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!