[NumLock]

может так выполнять запрос:

Код:

  with TADOQuery.Create(Self) do
  begin
    Connection:=ADOConnection1;
    SQL.Text:='insert into country (Name, Capital, Population) values (:Name, :Capital, :Population)';
//    Parameters.ParamByName('Name').DataType:=ftInteger;
    Parameters.ParamByName('Name').Value:=ComboBox1.Text;
    Parameters.ParamByName('Capital').Value:=ComboBox2.Text;
    Parameters.ParamByName('Population').Value:=ComboBox3.Text;
    ExecSQL;
    Free;
  end;

http://data.cod.ru/79862
а если раскомментарить, то вылезет такя же ошибка