請問一下下列程式有什麼問題.她好像不會刪除我打的東西!如果修改到可以刪除資料 可以套用在更新資料麻
我要的目的是設定EDIT然後將我連結的資料庫中想刪除的一筆資料輸入在EDIT上然後按下BUTTON後就完成..
procedure TForm1.Button5Click(Sender: TObject);
begin
Table1.Databasename:='Dog99';
Table1.tablename:='dog1';
Table1.Active:=true;
Table1.Delete;
Table1['NAME']:=edit1.text;
Table1['PRICE']:= edit2.text;
Table1['QUANTITY']:=edit3.Text;
Table1.post
end;

1.連結資料庫
Table1.Databasename:='Dog99';
Table1.tablename:='dog1';
Table1.Active:=true;

2.依照你EDIT內容去只到那一筆
Table1.Locate('NAME;PRICE;QUQUANTITY',VarArrayOf([Edit1.text,Edit2.text,Edit3.text],[]);

3.刪除
Table1.Delete ;

4.更新
Table1.Edit ;
{指定欄位值}
Table1.Post;
===================引 用 music1124 文 章===================
請問一下下列程式有什麼問題.她好像不會刪除我打的東西!如果修改到可以刪除資料 可以套用在更新資料麻
我要的目的是設定EDIT然後將我連結的資料庫中想刪除的一筆資料輸入在EDIT上然後按下BUTTON後就完成..
procedure TForm1.Button5Click(Sender: TObject);
begin
Table1.Databasename:='Dog99';
Table1.tablename:='dog1';
Table1.Active:=true;
Table1.Delete;
Table1['NAME']:=edit1.text;
Table1['PRICE']:= edit2.text;
Table1['QUANTITY']:=edit3.Text;
Table1.post
end;

這個步驟好像錯了,我也不曉得錯在哪@@
還有一個問題@@一開始打錯了不是更新是修改 SORRY
===================引 用 foxelf 文 章===================

2.依照你EDIT內容去只到那一筆
Table1.Locate('NAME;PRICE;QUQUANTITY',VarArrayOf([Edit1.text,Edit2.text,Edit3.text],[]);

編輯記錄

1.你先輸入TEdit內容再去按下Button，這樣你才可以指到你要修改的那筆資料
2.更新的步驟只是把步驟3換成步驟4

===================引 用 music1124 文 章===================
這個步驟好像錯了,我也不曉得錯在哪@@
還有一個問題@@一開始打錯了不是更新是修改 SORRY
===================引 用 foxelf 文 章===================

2.依照你EDIT內容去只到那一筆
Table1.Locate('NAME;PRICE;QUQUANTITY',VarArrayOf([Edit1.text,Edit2.text,Edit3.text],[]);

小弟想的的是像這樣,可以說的不好..輸入指令查詢到表格後用滑鼠點選想修改的資料然後在EDIT內輸入新資料按下刪除鈕後完成!
真是不好意思說的不夠清楚!

你的流程我不太懂，感覺像修改又像刪除，既然你是修改怎麼會按下刪除的按鈕呢
那筆資料你修改後就是新的資料了不需要刪除


===================引 用 music1124 文 章===================

小弟想的的是像這樣,可以說的不好..輸入指令查詢到表格後用滑鼠點選想修改的資料然後在EDIT內輸入新資料按下刪除鈕後完成!
真是不好意思說的不夠清楚!

不好意思箭頭畫錯..是按下修改按鈕!!SORRY...

既然你已經選到了你要修改的那一筆你只要更新鈕下更新的語法就可以了

Table1.Edit ;
{
這裡給新的值
}
Tqble1.Post;

==================引 用 music1124 文 章===================
小弟想的的是像這樣,可以說的不好..輸入指令查詢到表格後用滑鼠點選想修改的資料然後在EDIT內輸入新資料按下刪除鈕後完成!
真是不好意思說的不夠清楚!