關於我的刪除功能 |
答題得分者是:cashxin2002
|
tea15
初階會員 發表:64 回覆:72 積分:27 註冊:2005-06-15 發送簡訊給我 |
procedure TForm1.BitBtn3Click(Sender: TObject);
begin
query1.SQL.Clear;
query1.SQL.Add('delete from PDLB');
query1.SQL.Add('where LBPDID ='''+query1.fieldbyname('LBPDID').AsString+''' ');
query1.ExecSQL;
query1.Close;
query1.Open;
query1.ApplyUpdates;
query1.CommitUpdates;
end;
你們好,以上是我寫的刪除功能…
我想要指標在哪一筆資料而做刪除動作…但還是會出錯,這是為什麼呢?
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
您好﹗ 很明顯的錯誤﹐因為您在下ExecSQL方法執行Delete語句后﹐Query1的SQL屬性值依然是之前設定的'Delete From PDLB Where....'﹐Delete語法是屬于無回傳值的SQL語法﹐當您再用Open方法來開啟時﹐自然就會出錯﹒ 您是有使用CachedUpdates的功能嗎﹖不然不要使用ApplyUpdates和CommitUpdates方法﹐另外﹐如果單單是為了刪除當前筆的資料﹐可以直接使用資料集元件的Delete方法﹐更為方便及有效率﹐如下﹕
begin Query1.Delete; end;================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================ 發表人 - cashxin2002 於 2005/06/27 10:49:44
------
忻晟 |
tea15
初階會員 發表:64 回覆:72 積分:27 註冊:2005-06-15 發送簡訊給我 |
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
|
tea15
初階會員 發表:64 回覆:72 積分:27 註冊:2005-06-15 發送簡訊給我 |
|
tea15
初階會員 發表:64 回覆:72 積分:27 註冊:2005-06-15 發送簡訊給我 |
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
|
tea15
初階會員 發表:64 回覆:72 積分:27 註冊:2005-06-15 發送簡訊給我 |
你好,我試出來了~
謝謝您!
只是mtConfirmation是什麼意思呢?
是一個任意可變的數嗎?
那…0又代表什麼呢?
引言: 您好﹗ 參考如下﹕ 在Query1元件的BeforeDelete事件中﹕begin if MessageDlg('您确定要刪除嗎﹖', mtConfirmation, [mbYes, mbNo], 0) = mrNo then Abort; end;================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================ |
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
您好﹗ MessageDlg對話框常用于詢問使用者意見的訊息提示﹒
語法﹕if MessageDialog (字串參數, 圖示參數, [按鈕組合參數], 線上輔助說明參數) = 回傳值參數 說明﹕
字串參數﹕對話框中顯示的文字內容 圖示參數﹕對話框形態﹐有分為以下五種(mtWarning警告訊息﹔mtError錯誤訊息﹔mtInformation顯示訊息﹔ctConfirmation确認信息﹔mtCustom自定形態) 按鈕組合參數及對應的回傳值參數﹕有以下九組以供選擇
按鈕組合參數 <=> 回傳值參數
mbYes <=========> mrYes
mbNo <==========> mrNo
mbOK <==========> mrOK
mbCancel <======> mrCancel
mbAbort <=======> mrAbort
mbRetry <=======> mrRetry
mbIgnore <======> mrIgnore
mbAll <=========> mrAll
mbHelp <========> mrHelp 線上輔助參數﹕長整數(LongInt)形態﹐通常為0﹒ 範例﹕
begin if MessageDlg('您确定要刪除嗎﹖', mtConfirmation, [mbYes, mbNo], 0) = mrNo then Abort; end;對照以上的說明﹐一個個將參數說明代入﹐您就會了解的﹒ ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================
------
忻晟 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |