DELPHI语法

Question

VAR QW STRING;
BEGINadoquery1.Close;
Adoquery1.Sql.Clear;
Adoquery1.sql.add('Insert into MYTXL (XM ) Values (:QW)');
adoquery1.Parameters[0].Value:='陈明';
adoquery1.ExecSQL;
END;

Answer 1

VAR 
  QW: STRING;//这应该有个：
BEGINadoquery1.Close;
Adoquery1.Sql.Clear;
Adoquery1.sql.add('Insert into MYTXL (XM ) Values (:QW)');
adoquery1.Parameters.parambyname('QW').Value:='陈明';//这里这样写
adoquery1.ExecSQL;
END;

Answer 2

没什么问题。
就是VAR QW STRING;变成VAR QW: STRING;就行了。
至于 fengzhengren(风筝) 提出的第二个改进方法，其实
adoquery1.Parameters[0].Value:='陈明';与adoquery1.Parameters.parambyname('QW').Value:='陈明';是一样的，都行。

Answer 3

adoquery1.Close;
Adoquery1.Sql.Clear;
Adoquery1.sql.add('Insert into MYTXL (XM ) Values ('陈明')');
adoquery1.ExecSQL;