delphi 如何去数据库中的值,和combobox中的值进行判断

2025-05-12 18:40:55
推荐回答(2个)
回答1:

如果是输入,你为什么要用combobox?何不用EDIT?

你是想要上面这5个字段全进行判断还是只有一个?

可以这样:

如利用单证员判断:假定你用的是sql 数据库,adoquery 

把以下程序写入combobox1的onexit事件里


with adoquery do
begin
if active then close;
sql:='select * from db ';
prepare;
open;
end;
filtered:=false;
filter:='单证员='+queredstr(trim(combobox1.text));
filtered:=true;
if   adoquery.reordcount>0 then 
begin
    showmessage('已存在!')
    exit;
end;

以上只是以单证员为例简单定了下,字段名什么只是参考。你自己改下吧。。

但其实不建议你这样做,因为combobox控件的最大作用是选择,而不是用来输入

再有就是输入时没办法判断内容的合理性。。

回答2:

点击保存时先做一个数据查询,有该数值则提醒,没有即保存成功,不知道是不是这个意思