求delphi中引号、加号的用法！！！

Question

用delphi编程的时间经常会用到引号、加号等，但在什么时候用，
用几个（引号）却是很头疼的事情，有什么法则可以遵循或者哪里
有这方面比较全面的资料，请给予提示，多谢

Answer 1

一般在SQL语句里引号个数：前3后4

Answer 2

单独的 ''''  = ' + 一个引号
与SQL 相联的 ''' = ' + 一个引号
与SQL先后相联的'' = ' + 一个引号_____________________________________________________________________暮春三月,羊欢草长,天寒地冻,问谁饲狼?人心怜羊,狼心独怆,天心难测,世情如
霜……{言有尽而意无穷，余意尽在不言中……}

Answer 3

你可以用quotedstr()函数，它是单元SysUtils中的一个函数，其原型是:
function QuotedStr(const S: string): string;
var
  I: Integer;
begin
  Result := S;
  for I := Length(Result) downto 1 do
    if Result[I] = '''' then Insert('''', Result, I);
  Result := '''' + Result + '''';
end;我觉得很好用，我举几个例子:
var s:string ;
begin
  s:='00815' ;
  with adoquery1 do
  begin
    close ;
    sql.clear ;
    sql.add('select emp_name from person where emp_no='+quotedstr(s)) ;
    open ;
  end ;
end ;也可以这样，更清楚：
var s:string ;
begin
  s:='00815' ;
  with adoquery1 do
  begin
    close ;
    sql.clear ;
    sql.add('select emp_name from person where emp_no=:emp_no') ;
    parameters[0].value:=s ;
    prepared ;
    open ;
  end ;
end ;