level 6
AdoQuery1.Close;
AdoQuery1.SQL.Clear;
SqlCmd:= 'INSERT INTO WorkerList ( WorkerID, WorkerSex ) '+
'VALUES (''' + GetID + ''', ' + IntToStr(Sex) + ' )';
AdoQuery1.SQL.Add(SqlCmd);
AdoQuery1.ExecSQL;
AdoQuery1.Close;
2015年02月11日 09点02分
2
level 10
一堆 引号，太乱。
QuotedStr 表示，你真笨。
2015年02月11日 09点02分
3
谢谢提醒，QuotedStr蛮好用
2015年02月11日 12点02分
level 9
操作没有大问题，只是看起来有点乱，我都是用堆积木的方式来做这种程序
2015年05月16日 01点05分
6
level 9
比如改写成：
function ADO_ExecSQL(ADOQuery:TADOQuery;Value:String);
begin
AdoQuery.Close;
AdoQuery.SQL.Clear;
AdoQuery.SQL.Add(Value);
AdoQuery.ExecSQL;
AdoQuery.Close;
end;
需要用到的时候就是：
s:='......'; //这里写上添加，修改或删除SQL语句
ADO_ExecSQL(ADOQuery1,S)； //总共就两行代码
2015年05月16日 01点05分
7
一直是用这种方式，自己写一个dll，写不同程序的时候方便调用
2015年05月16日 15点05分
level 1
直接拼接字符串就行了，quotedstr(参数是字符串)
2015年05月20日 04点05分
8
level 3
你这样写很好用啊，再改进就是做成云中龙那样的函数，也不错
2015年05月31日 15点05分
9
