關於delphi中，ado的幾個簡單應用？ delphi / windows sdk/api
第一：仔細看一下程式
if() then
begin
else
end;
語法有問題，應該是
if () then
begin
end
else
begin
end;
第二：
sql裡面 = 是精確匹配 like 是模糊匹配
第三：可以加個判斷
if edit1.text = '' then
adoquery1.sql.text:='select * from 業務資料庫
else
adoquery1.sql.text:='select * from 業務資料庫 where '
+'資料id'+' = '+''''+'%'+edit1.text+'%'+'''';
第四：用while遍歷整個記錄集
第五：visible屬性可以控制是否顯示
第六：autosize是用在介面大小發生變化時，是否自動變化的
第七：在edit的onkeypress事件中加限制
第八：用messagebox
if messagebox(0,'你真的要退出嗎？','警告',mb_okcancel+mb_iconwarning)=idok then
begin
close;
end;
第九：這個沒辦法
第十：在核取方塊的onclick事件中做處理
回答有點簡單，不過還是多謝你了，有沒有人能給個例子什麼的，第四個還不明白怎麼用？謝謝
哇,你的問題不少啊,都是基礎問題.最後多看看書....
這個得給個完整的小程式你,你就明白了.
基礎書多看下
procedure tform1.edit1keypress(sender: tobject; var key: char);
begin
if key in['0','1','2','3','4','5','6','7','8','9'] then
edit1.text:=edit1.text+key
else
exit;
end;
procedure tform1.edit2keypress(sender: tobject; var key: char);
begin
if (not (key in ['0'..'9'])) and (not(key in['.']))and (key<>#8) then
key :=#0;
end;
這樣比較好.
關於ado中的movefirst
一直以來,以為movefirst是將資料庫游標移到記錄最前,movelast是移到最後,今天才發現原來跟movenext一樣,也需要判斷游標的位置,若recordset bof為true時,movefirst,jet引擎會丟擲 com error.顯然movefirst是移到最前面嘛,jet為何不自...
Delphi中ADO處理資料的幾種方式的速度比較
ado dataprovide clientdataset 插入1000行資料需要2.078秒 ado直接sql命令 3.400秒 ado的批量方式 啟動事務 1.328秒 不使用事務1.553秒 adoquery的locktype屬性為ltbatchoptimistic cursortype為st...
DELPHI中DBCHART開發中的幾個小問題
1，在delphi的實際開發中，我們都需要在程式中繫結資料來源，以便更好的適應實際的開發需求，這裡只是簡單的做個介紹 我用的是fastline，裡面需要動態的繫結x，y軸，在dbchart中可以直接設定，那麼在程式中如何設定呢？ssql select scan start time,sum trim...