//查詢記錄
procedure tform1.button1click(sender: tobject);
begin
adoquery.close;
adoquery.sql.clear;
adoquery.sql.add('select * from yourtable where 查詢條件');
adoquery.open;
//插入記錄
procedure tform1.button2click(sender: tobject);
begin
adoquery.close;
adoquery.sql.clear;
adoquery.sql.text:='insert into yourtable(欄位1,欄位2) values(:欄位1,:欄位2)';
// adoquery.sql.add('insert into yourtable values(:欄位1)');
adoquery.parameters.parambyname('欄位1').value:=trim(edit1.text);
adoquery.parameters.parambyname('欄位2').value:=trim(edit2.text);
adoquery.execsql;
end;
//刪除記錄
procedure tform1.button3click(sender: tobject);
begin
adoquery.close;
adoquery.sql.clear;
adoquery.sql.text:='delete from yourtable where 欄位3=:欄位3';
//這裡沒有新增where的條件判斷,實際使用時,注意新增判斷
// adoquery.sql.add('delete from new_table where 欄位3=:欄位3');
adoquery.parameters.parambyname('欄位3').value:=trim(edit3.text);
adoquery.execsql;
//刪除記錄也可用deleterecords()函式
procedure deleterecords(affectrecords: taffectrecords = arall);
這個函式有乙個引數:affectrecords可以取如下的值:
1、arcurrent :刪除當前記錄
2、arfiltered :刪除符合filter過濾後的所有記錄(如果你使用filter過濾的話)
3、arall :刪除所有記錄
4、arallchapters :delete affects all chapters(ado chapters)
//修改記錄
procedure tform1.button4click(sender: tobject);
begin
adoquery.close;
adoquery.sql.clear;
adoquery.sql.text:='update yourtable set 欄位4=:欄位4';
//這裡沒有新增where的條件判斷,實際使用時,注意新增判斷
// adoquery.sql.add('update yourtable set 欄位4=:欄位4');
adoquery.parameters.parambyname('欄位4').value:=trim(edit4.text);
adoquery.execsql;
//即時更新插入、刪除、修改後的記錄
在上面插入、刪除、修改的語句後新增如下**即可:
adoquery.close;
adoquery.sql.add('select * from yourtable where 查詢條件');
adoquery.open;
//使用adoquery時注意:1、如果你需要更改資料,query.requestlive必須為true
2、如果有輸入引數的時候,容易出錯,通常的錯法是這樣:
比如:「where abc = : abc」
改正如下:「where abc=:abc」就是說=:前後都不能留空格。
3、adoquery.open與adoquery.execsql 有不同之處。
adoquery.open一般用在查詢,select時候;而adoquery.execsql用在insert,delete,update等
VMware Server使用經驗記錄
從最初的vmware gsx server 1.0,到現在的vmware server 2.0beta,我使用vmware server產品有幾年時間了,我自己的兩台伺服器 dell 2600 3g記憶體,4塊硬碟做raid5 有一些產品現在跑在vmware server的虛擬機器中。在此我們使用中...
VMware Server使用經驗記錄
從最初的vmware gsx server 1.0,到現在的vmware server 2.0beta,我使用vmware server產品有幾年時間了,我自己的兩台伺服器 dell 2600 3g記憶體,4塊硬碟做raid5 有一些產品現在跑在vmware server的虛擬機器中。在此我們使用中...
vlookup經驗記錄
語法 vlookup lookup value,table array,col index num,range lookup lookup value 為需要在 陣列 第一列中查詢的數值。lookup value 可以為數值或引用。若 lookup value 小於 table array 第一列中...