使用DBGridEH或DBGrid组件列向下填充功能的实现 |
答題得分者是:cancer
|
lzkevin
一般會員 發表:13 回覆:14 積分:5 註冊:2008-07-28 發送簡訊給我 |
|
cancer
高階會員 發表:58 回覆:319 積分:190 註冊:2004-07-31 發送簡訊給我 |
一般而言,在 DBGrid 輸入時,不應該跳到另一筆資料,不過要硬來的話,只好在離開欄位時來處理
...oncolexit.... var k : integer; txt : string; if (ds.RecNo <> -1) and (ds.RecNo < ds.RecordCount) then // 最後一列不用處理 begin // 新增資料時,不要用 ds.Add,用 ds.Append 加到最後,才能判斷 ds.RecNo <> -1 k := ds.RecNo; txt := ds.FieldByName('StaffName').AsString; ds.DisableControls; // 封鎖介面 while not ds.EOF do begin ds.Edit; ds.FieldByName(''StaffName'').AsString := txt; // 更改以下每一筆相同欄位 ds.Post; ds.Next; end; ds.RecNo := k; // 指回這一列 ds.EnableControls; // 恢復介面讓使用者繼續打字 ds.Edit; // 記得設回編輯模式 end; ===================引 用 lzkevin 文 章=================== 在DELPHI中使用DBGridEH或DBGrid组件,在某列修改时以下列的相关内容也跟着修改!请问要怎么实现!(不知道有没有表述清楚,谢谢!)
編輯記錄
cancer 重新編輯於 2011-04-11 20:43:58, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |