我在程序中实现了过滤,查询等功能,但是delphi不区分大小写,想求高手指点指点迷津!!
以下是我的代码,成功运行之后,除了大小写没区分开,我想要的功能都成功了!!procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
with ADOQuery1 do
begin
Filtered:= False;
ADOQuery1.Filter:='CustName like %'+RzEdit1.Text+'%';
Filtered :=True;
end;
end;procedure TForm1.RzBitBtn2Click(Sender: TObject);
begin
with ADOQuery1 do
begin
ADOQuery1.Locate('CustName',RzEdit1.Text,[loPartialKey]);
end;end;
以下是我的代码,成功运行之后,除了大小写没区分开,我想要的功能都成功了!!procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
with ADOQuery1 do
begin
Filtered:= False;
ADOQuery1.Filter:='CustName like %'+RzEdit1.Text+'%';
Filtered :=True;
end;
end;procedure TForm1.RzBitBtn2Click(Sender: TObject);
begin
with ADOQuery1 do
begin
ADOQuery1.Locate('CustName',RzEdit1.Text,[loPartialKey]);
end;end;
你可能得再做一次判断了
还是没有看明白
delphi不分大小写是关键字,还有自己定义的变量名吧如果你这样
var
str1:stirng;
str2:string;
begin
str1:='abc';
str2:='ABC'; if str1=str2 then
showmessage('相同')
else
showmessage('不相同')
end;//这样运行的结果是 显示不相同的哦
如果我说错了请不要见怪
应该不是DELPHI的问题,而是数据库的问题。。比如SQL Server就是不区分大小写的。。
比如:select * from tbl1 where field1 like '%ABC%' 与
select * from tbl1 where field1 like '%abc%'
查询到的结果是一样的。。
ACCESS下通配符是:*, SQL Server 下是:%数据库如果不区分大小写,只能在程序里处理了,或者直接将所有编号转成大小。然后告诉用户,编号只能大写,并且不能重复