導航:首頁 > 凈水問答 > delphi模糊過濾

delphi模糊過濾

發布時間:2022-08-01 17:18:17

㈠ delphi 模糊查找

delphi里應該用:if Pos(xm,dbmemo1.text)>0 then showmessage('found');

㈡ 在delphi中如何實現過濾欄位

aa

㈢ delphi中的查詢按鈕怎麼轉換為模糊查詢

不用filter,直接使用完整的SQL的select命令。

㈣ 如何在delphi中實現比較精確的模糊查詢

用這種方法在伺服器的SQL
SERVER
中可以很方便,但如何在DELPHI中用此種方法實現動態模糊查詢?

㈤ delphi 的 dataset 用filter 過濾時 漢字如何完成 模糊查詢啊

想實現模糊查詢,甚至於更為復雜的查詢,改用Query吧

㈥ delphi cxgrid控制項中自定義篩選,用like時,要加% %才能實現模糊查詢,如何不要輸入% %就能實現。

這個如果不輸入%%,需要自己去改代碼

㈦ delphi如何用locate實現模糊查詢(滿意加分)

以前我也碰過這個問題,但使用Locate沒有找到答案

後來找了一個變通的方法,稍微麻煩一些,但也能達到要求

先認識一下TDataset的RecNo屬性
DataSet.RecNo
RecNO其實就是行號,標識了某一行數據,如DataSet.RecNo := 1
這個操作可以使指針指向第一行,所以:如果你能將符合你要求的數據行號保存下來,意味著你能做到如你所想的一個個查詢。

你所需要做的:
1.定義一個行號列表
RecNoList: TStringList;

2.對DataSet進行循環得到標識列表
RecNoList.Clear;
DataSet.First;
DataSet.DisableControls; //加這個語句可以明顯提高循環效率,原因請自己查
While Not DataSet.Eof do
begin
if DataSet.FieldByName('tName').AsString = EdtName.Text then
//我這里查的是同名的人,你可以根據自己的要求修改這里實現你需要的模糊查詢
begin
RecNoList.Add(IntToStr(DataSet.RecNo));
end;
DataSet.Next;
end;
DataSet.EnableControls;

3.有了列表,就可以方便的指向你的查詢結果。這裡面的控制你就自己考慮下吧(需要一個標簽保存你當前所指向的RecNoList.Index,以便再次點擊按鈕可以指向下一個)。

4.如果你有Locate的解決方法,請帖出來。

㈧ delphi怎麼模糊查詢

如果查資料庫可以像2樓所述的那樣查詢

稍微改一下
query.add('select * form table1 where filed1 like '+『%』+combox1.text+'%');

㈨ DELPHI控制項檢索條件如何達到模糊檢索

對於BDE數據集,用下面的常式可實現模糊查詢。共可輸入5個變數(s1,s2,s3,s4,s5),其中s4,s5為日期型變數,需要用cast函數轉換。希望對你有用!!!

procere TForm1.Button1Click(Sender: TObject);
var
s,s1,s2,s3,s4,s5:string;
begin
s1:='%'+trim(edit1.Text)+'%';
s2:='%'+trim(edit2.text)+'%';
s3:='%'+trim(edit3.text)+'%';
s4:=edit4.text;
s5:=edit5.text;
s:='';
if trim(edit2.text)<>'' then
if length(s)=0 then s:=s+'(知識主題 like '+''''+s2+''''+')'
else s:=s+'and(知識主題 like '+''''+s2+''''+')';
if trim(edit1.text)<>'' then
if length(s)=0 then s:=s+'(分類 like '+''''+s1+''''+')'
else s:=s+'and(分類 like '+''''+s1+''''+')';
if trim(edit3.text)<>'' then
if length(s)=0 then s:=s+'(索引關鍵字 like '+''''+s3+''''+')'
else s:=s+'and(索引關鍵字 like '+''''+s3+''''+')';
if s4<>'' then
if length(s)=0 then s:=s+'(日期>=cast('+''''+s4+''''+'as date))'
else s:=s+'and(日期>=cast('+''''+s4+''''+'as date))';
if s5<>'' then
if length(s)=0 then s:=s+'(日期<=cast('+''''+s5+''''+'as date))'
else s:=s+'and(日期<=cast('+''''+s5+''''+'as date))';

if s<>'' then s:='select * from '+'"'+queryx+'"'+' where '+s
else s:='select * from '+'"'+queryx+'"';
memo1.lines.clear;
memo1.lines.add(s);
query1.sql.Clear;
query1.SQL.add(s);
query1.open;
form1.activecontrol:=dbgrid2;
end;

㈩ 如何在DELPHI中實現欄位模糊查詢

Delphi作為一個強大的資料庫應用開發工具的一個重要標志,就是支持SQL編程。在實際的過程中,經常需要對某些欄位進行模糊查詢。如對「姓名」欄位進行查詢,當輸入「王」時,能自動地將王姓的所有記錄列出來。其實,通過結合SQL和Delphi的特點,就能很容易地完成這個功能。其基本原理是:查詢時,將查詢的范圍控制在姓名大於『查詢字元串+chr(0)』與小於『查詢字元串+chr($ff)』之間,就能將滿足條件的所有記錄查詢出來了。下面是具體的例子:
Var
NameStr:String;‖設置字元串中間變數
Begin
NameStr:=′王′;
Query1??SQL??Clear{清除SQL屬性中的SQL命令語句}
Query1??SQL??Add(′Select*FromCustom??dbwhere(Name1>=N1)and(Name2<=N2)′);‖SQL命令語句
Query1??params[0]??AsString:=NameStr+chr(0);‖控制參數在NameStr+Chr(0)
Query1??params[1]??AsString:=NameStr+chr($ff);‖和NameStr+Chr($ff)之間
Query1??Open;‖打開資料庫,執行SQL查詢
End;

閱讀全文

與delphi模糊過濾相關的資料

熱點內容
樹脂桶結構圖 瀏覽:589
喜牌飲水機多少價格 瀏覽:77
凈水機廢水管口能抬高多少 瀏覽:729
用於廢水分離工藝的主要包括用於過濾 瀏覽:818
小巨人空氣凈化器效果怎麼樣 瀏覽:459
安全除垢劑 瀏覽:11
養水草用什麼純水機 瀏覽:678
洛恩斯凈水器濾芯怎麼換 瀏覽:677
污水處理優秀員工事跡材料 瀏覽:293
飲水機活性炭怎麼樣 瀏覽:619
屠宰廢水污泥含量是多少 瀏覽:682
健康天使空氣凈化器怎麼樣 瀏覽:927
景區污水處理後怎麼辦 瀏覽:198
清洗反滲透膜方案 瀏覽:860
潔星力除垢劑主要成分 瀏覽:721
高壓鍋燒水水垢 瀏覽:329
小紅門污水處理廠人員 瀏覽:331
密封式污水提升泵 瀏覽:251
凈水機什麼牌的比較好 瀏覽:303
大孔陽離子樹脂吸附原理 瀏覽:11