А зачем такие сложности?
Не проще ли:
ADOQuery1.SQL.ADD(''insert into table_a (id,Name) values (:Aid,:AName)');

ADOQuery1.Parameters[0].Value:=StrID;
ADOQuery1.Parameters[ 1].Value:=StrName;
ADOQuery1.ExecQuery;

А по поводу явного указания текста - должно работать. (Я испольовал и такую конструкцию как у тебя). Ты скажи, какую ошибку выдает? А то "не прокатывает" - не прокатывать может по разному . Может, и не в АДО дело.