1樓:匿名使用者
如果只有一條的話
if adoquery1.recordcount >0 then//沒有這如果語句,當沒有記錄時,再按按鈕就會出錯
adoquery1.delete;//刪除它如果多條
adoquery1.sql.clear;//清除adoquery1中原有的sql語句
adoquery1.sql.add('select * from表名 where 學號 =....
adoquery1.open;
while not adoquery1.eof dobegin
adoquery1..delect;
end;
2樓:匿名使用者
adoquery1.connection := adoconnection1;
adoquery1.sql.clear;
adoquery1.sql.text := 'select * from 表 where id= ''指定學號'' ';
adoquery1.open;
adoquery2.connection := adoconnection2
adoquery1.sql.clear;
adoquery1.sql.text := delete from 表 where id= ''指定學號'' ';
adoquery1.execsql;'
在delphi和資料庫的連線中,如何把查詢到的資料顯示在指定的edit1.text上?
3樓:匿名使用者
edit 控制元件不帶資料感知,建議可以直接使用 dbedit 控制元件,設定好其資料連線屬性(datasource、datafield),即可在查詢到資料時,即時顯示資料。
如果使用 edit 控制元件,那麼需要自己編寫**,先查詢,再將查詢到的記錄值賦值給 edit.text。
4樓:不得已而騷之
也可以使用資料關聯控制元件dbedit,關聯了資料來源與欄位後,資料庫表一旦open,資料自己就顯示出來了
5樓:哀醬
................
adoquery1.sql.add('查詢語句');
adoquery1.open;
edit1.text :=adoquery1.fieldbyname('你查的關鍵字').asstring;
delphi adoquery1查詢資料庫結果怎麼顯示?
6樓:匿名使用者
最少三個控制元件:
1.dbgrid 。
2.datasource 在data access裡面3.adoquery。
設定 adoquery的connection。可以寫語句也可以放置 adoconnection。。。在ado裡面設定adoconnection的connectstring設定 datasource的dataset為adoquery1設定 dbgrid的datasource為datasource1這個就是sql的啊。
暈。。不要看見access就說是access的啊。這個就是sql的。
一般來說按鈕事件
begin
with adoquery1 do
begin
close;
sql.clear;
sql.add('select * from table');
open;
end;
end;
這些都是典型的。。。。暈。
7樓:匿名使用者
adoquery1.post;
delphi中adoquery怎麼取得查詢結果中第一條的欄位值?
8樓:匿名使用者
qry1.first;//取第一條資料
edit.text := qry1.fieldbyname(欄位名).asstring;
這樣就可以啦!
想獲取什麼值都可以用query.fieldbyname(欄位名).asstring獲得字串或者query.
fieldbyname(欄位名).asinteger獲得整數值!
9樓:下揚州啊
應該是引用錯誤
把**貼上來
delphi中用adoquery進行查詢,詳細進來看
10樓:
adoquery.close;
adoquery.sql.clear;
adoquery.sql.add('select * from table where 欄位1='+''''+edit1.text+'''');
adoquery.open;
if adoqueryt.recordcount<=0 thenlabel1.caption:=adoquery.fieldbyname('欄位2').asstring
else
label1.caption:='';
11樓:洋洋
begin
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='select 欄位2 from onetable where 欄位一 like %'+edit1.text+'%';
adoquery1.open;
if adoqueryt.recordcount<=0 thenbegin
label1.caption:=adoquery.fieldbyname('欄位2').asstring;
endelse
begin
label1.caption:='';
end;
end;
請問在Delphi中如何將extended型強制轉換為i
如 不做舍入,用trunc procedure tform1.button1click sender tobject var a extended b integer begin a strtofloat edit1.text end b trunc a edit2.text inttostr b ...
在句子中用詞語怎麼寫啊,在句子中用四字詞語怎麼寫啊
自言自語 心驚膽戰 波濤起伏 咎由自取或自作自受 傷心欲絕 身無分文 留戀忘返 欲罷不能或欣喜若狂 激動不已 激動不安 迫不及待 如飢似渴 戰戰兢兢 二 在句中填上恰當的四字詞語。參 1 老 bai師們du為了寫教案 改作 zhi業,常常 廢寢忘dao食 地工作,真是太辛版苦了。2 你沒權把地址寫清...
怎麼在DELPHI程式裡使用帶引數的儲存過程
2 用一個tquery控制元件query1連到膳綾擎的tdatabase控制元件。幹嘛必定要用storedproc元件?用query元件就挺好 1 用一個tdatabase控制元件連到資料庫。3 query1.close query1.sql.clear query1.sql.add exec te...