天啊，两天没睡觉了，程序到底错在哪呀？

Question

string类型的长度只有255，
定义strsql:WideString;

Answer 1

这样给sql加语句不好。
比如：
strsql:='select * from pasword where name='''+Trim(Flatedit11.text)+''' '+' and pasword='''+Trim(Flatedit12.text)+'''';可以下面语句代替：Query6.SQL.Add('select * from yd pasword where name=:Para1 and pasword=:Para2');
Query6.ParamByName('Para1').AsString:=Trim(Flatedit11.text)；
Query6.ParamByName('Para2').AsString:=Trim(Flatedit12.text)；这样直观，不容易出错。

Answer 2

...........................
                    if  Query6.Active then
                        Query6.Active:=false;
                        Query6.sql.clear;
                        Query6.sql.add(strsql);
                        ShowMessage(Query6.SQL.Text)
                       // 看看具体的SQL语句
                       query6.active:=true;
..............................

Answer 3

strsql:='select * from pasword where name='''+Trim(Flatedit11.text)+''' '+' and pasword='''+Trim(Flatedit12.text)+''''; 
 ShowMessage(strsql);
//用ShowMessage(strsql)把你的SQL语句show出来看看有没有问题再去查询分析器运行一下看看有没有问题

Answer 4

strsql:='update zujdj set Fmoney=(StrToInt(Trim('''+Flatedit7.text+'''))+StrToInt('''+Trim(Flatedit9.text)+''')),Smoney=StrToInt('''+Trim(Flatedit9.text)+'''),yu=StrToInt('''+Trim(Flatedit10.text)+'''),manager='''+Trim(Flatedit11.text)+''',LastTime=StrTodate('''+Trim(Stime)+''') where htnumber='''+trim(Flatedit1.text)+'''';什么数据库有 strToInt()函数？应该写成：
strsql:='update zujdj set Fmoney='+IntToStr(StrToInt(Flatedit7.text)+StrToInt(Flatedit9.text))+',Smoney='
+Flatedit9.text+',yu='+Flatedit10.text+',manager='''+Flatedit11.text+''',LastTime='''+Trim(Stime)+''' where htnumber='''+trim(Flatedit1.text)+'''';

Answer 5

同意slzm(深情小猪)的想法，用参数，否则容易出错

Answer 6

最讨厌将四五个引号写在一起，自已都看得眼花，用Format。
strsql:='select * from pasword where name='''+Trim(Flatedit11.text)+''' '+' and pasword='''+Trim(Flatedit12.text)+'''';
改为：
strsql:=Format(select * from pasword where name=''%s'' and pasword=''%s'',[Flatedit11.text,Flatedit12.text] );
其它的一样
另外 showmessage(strsql),看生成的strsql能否在查询分析器中执行。

Answer 7

StrToInt等Delphi函数必须放在Sql.text外执行