ADOQuery 查詢 刪除 修改 插入

2022-08-02 21:12:11 字數 3086 閱讀 3625

//利用combobox元件查詢資料庫表

procedure tform1.button1click(sender: tobject);

begin

adoquery1.close;

adoquery1.sql.clear;

adoquery1.sql.add('select * from '+trim(combobox2.text));

adoquery1.active:=true;

end;

//查詢記錄

procedure tform1.button1click(sender: tobject);

begin

adoquery.close;

adoquery.sql.clear;

adoquery.sql.add('select * from yourtable where 查詢條件');

adoquery.open;

//日期查詢

adoquery1.close;

adoquery1.sql.clear;

adoquery1.sql.add('select * from 全院收入表 where ks_name=:a and 費用類別=:b and 費用日期》=:d and 費用日期<=:e');

adoquery1.parameters.parambyname('a').value:=trim(combobox1.text);

adoquery1.parameters.parambyname('b').value:=trim(combobox2.text);

'c').value:=trim(combobox3.text);

adoquery1.parameters.parambyname('d').value:=datetostr(datetimepicker1.date);

adoquery1.parameters.parambyname('e').value:=datetostr(datetimepicker2.date);

adoquery1.active:=true;

//插入記錄

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等。

單鏈表初始化,頭插,尾插,查詢,刪除

include using namespace std include 單鏈表的儲存結構 typedef struct node node,linklist 初始化單鏈表 void initlist l next null 建立空的單鏈表 l是帶頭結點的空煉表頭指標,通過鍵盤輸入表中元素值,利用頭插...

DataTable查詢 修改 刪除

我們在使用datatable的時候,如何在記憶體上對其進行增刪改呢?1 先例項化乙個datatable datatable dt new datatable 2 為其增加列 dt.columns.add id dt.columns.add name 3 查詢資料 通過唯一標識找到對應行 dataro...

查詢 插值查詢

插值查詢 插值查詢法的演算法思想 插值查詢法其實就是折半查詢法的加強優化版,它對mid的演算法進行了重新的規定,使此查詢法的效率更高。mid low high low key a low a high a low 插值查詢法的演算法可描述如下 int search keytype key,int n...