procedure TForm1.Button1Click(Sender: TObject); var bb:string; begin bb:='cc'; AdoQuery1.SQL.Add('select * from aa where sno='''+bb+''''); showmessage(AdoQuery1.sql.gettext); end;
在delphi中'作为转意字符出现,同时也是字符串的表示符号。要分清对应。 AdoQuery1.SQL.Add('select * from aa where sno='''+bb+''''); | ||| |||| 1 231 1231 1.字符串的标志 2.转意字符 3.真正的'
edit.Text:= '''(是英文)'
edit.text:='like'+'''+'~~~~~~~';好象不行!
var bb:string;
begin
bb:='cc';
AdoQuery1.SQL.Add('select * from aa where sno='''+bb+'''');
showmessage(AdoQuery1.sql.gettext);
end;
AdoQuery1.SQL.Add('select * from aa where sno='''+bb+'''');
| ||| ||||
1 231 1231
1.字符串的标志
2.转意字符
3.真正的'