必要欄位檢查,如何在按下「取消」,即可取消? |
答題得分者是:tick228
|
chris681016
中階會員 發表:69 回覆:122 積分:98 註冊:2006-10-12 發送簡訊給我 |
如下
假如我現在按下「新增」記錄,此時焦點會在sDBEdit1,如果我要馬上「取消」新增記錄,此時會先觸發「sDBEdit1Exit」的事件導無法取消新增。 必要欄位 procedure TfProd_edit.sDBEdit1Exit(Sender: TObject); begin if DIFF=0 then EXIT; if TRIM(sDBEdit1.Text)='' then begin MSG_RTN(['編號不可空白!!'],['&O瞭解']); sDBEdit1.SetFocus; end; end;
// 「取消」按鍵 procedure TfProd_edit.sBitBtn11Click(Sender: TObject); begin fdm.Prod_cds.Cancel; DBGrid1.SetFocus; end; |
tick228
高階會員 發表:1 回覆:47 積分:104 註冊:2003-11-03 發送簡訊給我 |
|
sryang
尊榮會員 發表:39 回覆:762 積分:920 註冊:2002-06-27 發送簡訊給我 |
|
chris681016
中階會員 發表:69 回覆:122 積分:98 註冊:2006-10-12 發送簡訊給我 |
|
tick228
高階會員 發表:1 回覆:47 積分:104 註冊:2003-11-03 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |