Delphi程序如何比较输入字符串与数据库中的字符串相等

xiaoliang1201 2013-04-22 02:55:06
Delphi程序如何比较输入字符串与数据库中的字符串相等??在线等?
...全文
313 19 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
19 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 18 楼 abclm 的回复:
引用 17 楼 xiaoliang1201 的回复:引用 16 楼 abclm 的回复:补充,把你修改的update语句写到 ShowMessage位置! 嗯!谢谢!我已经改好了。嘿嘿! 还有一种方法直接update tb1 set 数据库字段= case when 娄据库值=edit.text then 修改什么 else 娄据库值 end where 条件..……
这种方法能不能说详细点,我没看怎么懂??
  • 打赏
  • 举报
回复
引用 17 楼 xiaoliang1201 的回复:
引用 16 楼 abclm 的回复:补充,把你修改的update语句写到 ShowMessage位置! 嗯!谢谢!我已经改好了。嘿嘿!
还有一种方法直接update tb1 set 数据库字段= case when 娄据库值=edit.text then 修改什么 else 娄据库值 end where 条件.... 如果问题已经解决请结贴!
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 16 楼 abclm 的回复:
补充,把你修改的update语句写到 ShowMessage位置!
嗯!谢谢!我已经改好了。嘿嘿!
  • 打赏
  • 举报
回复
补充,把你修改的update语句写到 ShowMessage位置!
  • 打赏
  • 举报
回复
引用 14 楼 xiaoliang1201 的回复:
引用 1 楼 sololie 的回复:直接=比较 if (MyBCDField.AsString = 'aaa') then ... 谢谢!貌似跟我的想法还有一定的差距,这样说吧,我要根据一个edit文本框里输入的字符串和数据库中表的某项比较,相等时怎修改该表的该项信息。怎么实现呢??
 with ADOQuery1 do
  begin
    Close;
    SQL.Clear;
    sql.Add('select 值  from tb1');  //例如你数据库的值
    open;
     if (FieldByName('值').AsString=edit1.Text) then
      begin
        ShowMessage('值相同');
      end
      else
      begin
        ShowMessage('不同');
      end;
  end;
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 1 楼 sololie 的回复:
直接=比较 if (MyBCDField.AsString = 'aaa') then ...
谢谢!貌似跟我的想法还有一定的差距,这样说吧,我要根据一个edit文本框里输入的字符串和数据库中表的某项比较,相等时怎修改该表的该项信息。怎么实现呢??
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 12 楼 yjianxi 的回复:
那不应该啊,看不出来了,你只能等高人了
嘿嘿!不过还是谢谢你啦
Bolo_Yang 2013-04-22
  • 打赏
  • 举报
回复
那不应该啊,看不出来了,你只能等高人了
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 9 楼 yjianxi 的回复:
引用 7 楼 xiaoliang1201 的回复:引用 6 楼 xiaoliang1201 的回复:引用'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式不……
额.....gip是一个字符串。像gip = “192.168.3.1”这样的字符串
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 8 楼 yjianxi 的回复:
引用 7 楼 xiaoliang1201 的回复:引用 6 楼 xiaoliang1201 的回复:引用'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式不……
这不等于没说嘛??
Bolo_Yang 2013-04-22
  • 打赏
  • 举报
回复
引用 7 楼 xiaoliang1201 的回复:
引用 6 楼 xiaoliang1201 的回复:引用'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式不好意思,写快了,'update resourcel……
不清楚你的gip是怎么得到的.
Bolo_Yang 2013-04-22
  • 打赏
  • 举报
回复
引用 7 楼 xiaoliang1201 的回复:
引用 6 楼 xiaoliang1201 的回复:引用'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式不好意思,写快了,'update resourcel……
如果你的gip = 0x01020304 你的ip地址就是1.2.3.4
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 6 楼 xiaoliang1201 的回复:
引用'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式不好意思,写快了,'update resourcelist set res_friendlyname=……
不好意思,写快了,'update resourcelist set res_friendlyname="%s" where res_ip="%s"',[gname,gip] ip要转换成"X.X.X.X"是吧,怎么转换成"X.X.X.X"格式呢?
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用
'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式
不好意思,写快了,'update resourcelist set res_friendlyname="%s" where res_ip="%s"',[gname,gip]的,
引用
你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式
ip要转换成"X.X.X.X"是吧,怎么转换成"X.X.X.X"格式呢??
Bolo_Yang 2013-04-22
  • 打赏
  • 举报
回复
引用 4 楼 xiaoliang1201 的回复:
引用 3 楼 yjianxi 的回复:使用Update应该很容易实现SQL code?1'update resourcelist set res_friendlyname="%s" where res_ip="192.168.3.225"',[gname]这样可以得到正确答案,但是SQL code?1'update resourcelist set res_friendl……
'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip] 你确定是"%d"? d可是数值型啊,你的gip是什么型?如果是数据值型的话,要转化成"X.X.X.X"格式
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用 3 楼 yjianxi 的回复:
使用Update应该很容易实现
'update resourcelist set res_friendlyname="%s" where res_ip="192.168.3.225"',[gname]
这样可以得到正确答案,但是
'update resourcelist set res_friendlyname="%s" where res_ip="%d"',[gname,gip]
就不能得到正确的答案
Bolo_Yang 2013-04-22
  • 打赏
  • 举报
回复
使用Update应该很容易实现
xiaoliang1201 2013-04-22
  • 打赏
  • 举报
回复
引用
if (MyBCDField.AsString = 'aaa') then ...
谢谢!貌似跟我的想法还有一定的差距,这样说吧,我要根据一个edit文本框里输入的字符串和数据库中表的某项比较,相等时怎修改该表的该项信息。怎么实现呢??
sololie 2013-04-22
  • 打赏
  • 举报
回复
直接=比较 if (MyBCDField.AsString = 'aaa') then ...

2,507

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧