1樓:匿名使用者
改成下面這樣:
varmz:string;
bm:string;
begin
mz:=edit2.text;
bm:=edit4.text;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('update t_person set name='''+mz+''''+'where person_bm='''+bm+'''');
adoquery1.sql.excesqladoquery1.open;
end;
注意連線好adoquery1就可以了
2樓:匿名使用者
這個掃描槍其實就是一個自動鍵盤一樣,delphi不用任何程式設計的,只需設 edit為焦點(使用者手動或者程式自動設為焦點都可以),就行了。
可以接受掃描槍的輸入並自動按回車
3樓:匿名使用者
varmz:string;
bm:string;
begin
mz:=edit2.text;
bm:=edit4.text;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('update t_person');
adoquery1.sql.add('set name=:mz');
adoquery1.sql.add('where person_bm=bm');
adoquery1.parameters.parambyname('mz').value:=name;//把這兒的name改為mz
adoquery1.parameters.parambyname('bm').value:=bm;
adoquery1.open;
end;
在delphi中的edit中寫入資料,儲存到資料庫中,怎麼寫程式?
4樓:匿名使用者
首先,你要新增 資料集空件,如:adoquery1 然後 設定adoquery1的連線到sql資料庫.當然了你必須要建立了資料庫以及表.
然後,新添一個按紐->在其按紐的單擊事件裡寫上:
adoquery1.close;
adoquery1.sql.text:='insert into 表名 set (欄位名) values ('+edit.text+')';
adoquery1.execsql;
5樓:匿名使用者
adoquery1.close;
adoquery1.sql.text:='select 欄位名 from 表名 where 欄位名='''+trim(edt1.text)+'''';
adoquery1.open;
if adoquery1.recordcount >0 thenbegin
showmessage('您輸入的值有重複,請重新輸入!');
exit;
endelse
begin
adoquery1['欄位名']:=trim(edit1.text);
end;
---------------------------------------
根據欄位名的屬性對edit1.text進行數值轉換就可以了~!
6樓:匿名使用者
用感知db控制元件會輕鬆好多
7樓:匿名使用者
你用的是什麼資料庫?
delphi中點選button要將dbedit中的新紀錄寫入資料庫**是什麼
8樓:
uses中加入db;
if (dbedit1.datasource.dataset.
state = dsinsert) or (dbedit1.datasource.dataset.
state = dsedit) then
dbedit1.datasource.dataset.post ;
dbedit1.datasource.dataset可以換成dbedit1所關聯的adoquery或者adotable
如:if (adoquery1.state = dsinsert) or (adoquery1.state = dsedit) then
adoquery1.post ;
state = dsinsert說明資料集為插入新資料待儲存狀態state = dsedit說明資料集為編輯資料待儲存狀態post函式為向資料庫提交修改或者新增加的資料。
關於delphi7中dbgrid的問題
1.拖一個panel控制元件,設定align屬性為alclient,然後把dbgrid1放置在panel1上面,先隨便拖出一個你想要的大小,然後連線好你 需要顯示的資料。2.在程式的 implementation部分定義一個stringlist,用來存放變化前的dbgrid1的寬,高,上邊距,左邊距...
delphi5中把edit1中的數字個位加十位的和在於edit2中個位加十位的和相加然後給edit
var s,ss string begin s edit1.text ss edit2.text edit3.text inttostr strtoint copy s,length s 1 strtoint copy s,length s 1,1 strtoint copy s,length ss...
高手幫忙!在delphi中如何禁止edit在中輸入東西
方法一 判斷是否觸發change事件,如果有內容更改,讓其執行為空操作方法二 判斷是否在上面keydown事件,如果有按鍵,讓其執行其他操作方法三 用訊息傳遞,達到和enabled相同效果!有一個辦法,就是把當前的內容先儲存起來,然後只要有人改變,就還原,要三部曲 一,先定義 全域性變數 vars ...