Delphi参数化SQL的小问题

      今天用参数化SQL时运行死活过不去,报告异常说edatabaseerror parameter 'table' not found,就是说参数table在SQL中找不到了.但死活查代码都看不出任何问题.
   历一小时,最后才查出原因,动态加入tadoquery.sql的参数化SQL语句在调用参数前先解析下SQL,如下:

1.   Parameters.ParseSQL(SQL.Text, True);

再执行就OK!代码例下:

1. with self.qryMain do begin
2.     try
3.       SQL.Clear();
4.       Parameters.Clear();
5.       Close();
6.       Prepared := False;
7.       SQL.Text := 'SELECT [CurrentNO], [Mask], [CurrentDate] FROM [CurrentID]' +
8.         ' WHERE [TabName]= :TabName AND [KeyField]=:KeyField;';
10.       Parameters.ParseSQL(SQL.Text, True); //一定要加
11.       Parameters.ParamByName('TabName').Value := Table;
12.       Parameters.ParamByName('KeyField').Value := KeyField;
14.       Prepared := True;
15.       Open();

参考网址:
http://www.delphi32.com/info_facts/faq/faq_932.asp
http://delphi.ktop.com.tw/board.php?fid=66&tid=27744

希望和我出同样错误的同道能看到本文!一小时的代价啊.....