[waly2k1]

Y por qué no lo ejecutas directamente ???
Algo así...
Query1.Sql.clear;
Query1.Sql.Text := 'insert into mitabla (campo1, campo2, campo3) values( ' + edit1.text + ', ' + edit2.text + ', ' + edit3.text + ' )';
Query1.ExecSQL;
Fijate los apóstrofes por los tipos de campos, pero en un insert creo no jode,
además así tenés la consulta real.
Espero te sirva, sino no dudes en dudar!!!. Saludos