Добавление записи в MySql

[Lokos]

Здравствуйте
пытаюсь делать так

sqlqry.Close;
   sqlqry.SQL.Text:=' INSERT INTO HOUSES ('+
   'id,'                   +//порядковый номер в бд
   'u_agentname,'          
   .....................
   's_status,'       +
   's_prepaydate,'   +
   'a_price,'        +
   'a_communal,'     +
   'a_from,'         +
   'a_to)'           +
   ' values '        +
   '(null,:u_agentname,..........,:Status,' +
   ':DataAvans,:CenaArendy,:KomunPlategy,:Skakogo,:Pokakoe)';
   sqlqry.ParamByName('u_agentname').asstring:=QuotedStr('василий');
   sqlqry.ParamByName('NambAg').AsInteger:=11;
   sqlqry.ParamByName('NambAgenstva').AsInteger:=3;
   sqlqry.ParamByName('NambDogovor').AsInteger:=2;
   sqlqry.ParamByName('Region').AsInteger:=1;
   sqlqry.ParamByName('Kray').AsInteger:=1;
   sqlqry.ParamByName('Cyti').asstring:=QuotedStr('махачкала');
   sqlqry.ParamByName('Rayon').asstring:=QuotedStr('чулимейский');
   sqlqry.ParamByName('Street').asstring:=QuotedStr('крыгина');
   sqlqry.ParamByName('house').asstring:=QuotedStr('222');
   sqlqry.ParamByName('Map').asstring:=QuotedStr('11111111');
   sqlqry.ParamByName('PervGilFond').asstring:=QuotedStr('сдан');
   sqlqry.ParamByName('VtorGilFond').asstring:=QuotedStr('квартира');
   sqlqry.ParamByName('ZemUch').asstring:=QuotedStr('нет');
   sqlqry.ParamByName('ProizvPom').asstring:=QuotedStr('нет');
   sqlqry.ParamByName('KolKom').AsInteger:=3;
   sqlqry.ParamByName('TypeHouse').asstring:=QuotedStr('mnl');
   sqlqry.ParamByName('SeriyaDoma').asstring:=QuotedStr('323');
   sqlqry.ParamByName('Plan').asstring:=QuotedStr('1+1+1');
   sqlqry.ParamByName('ObshPl').AsInteger:=3;
   sqlqry.ParamByName('GilPl').AsInteger:=3;
   sqlqry.ParamByName('KitchenPl').AsInteger:=3;
   sqlqry.ParamByName('ZemlPl').AsInteger:=3;
   sqlqry.ParamByName('YearPostr').AsDate:=StrToDate('02.02.2011');
   sqlqry.ParamByName('Etagnost').AsInteger:=12;
   sqlqry.ParamByName('Balkon').asstring:=QuotedStr('bln');
   sqlqry.ParamByName('Etag').AsInteger:=3;
   sqlqry.ParamByName('Avans').asstring:=QuotedStr('no');
   sqlqry.ParamByName('SanUz').asstring:=QuotedStr('no');
   sqlqry.ParamByName('Svaz').asstring:=QuotedStr('no');
   sqlqry.ParamByName('Cena').AsFloat:=30;
   sqlqry.ParamByName('TypeGil').asstring:=QuotedStr('kvartira');
   sqlqry.ParamByName('chcoldwater').asstring:=QuotedStr('no');
   sqlqry.ParamByName('chhotwater').asstring:=QuotedStr('no');
   sqlqry.ParamByName('Primech').asstring:=QuotedStr('aaaaaaaa');
   sqlqry.ParamByName('PhotoMini1').asstring:=QuotedStr('no');
   sqlqry.ParamByName('PhotoMini2').asstring:=QuotedStr('no');
   sqlqry.ParamByName('PhotoMini3').asstring:=QuotedStr('no');
   sqlqry.ParamByName('PhotoBig1').asstring:=QuotedStr('no');
   sqlqry.ParamByName('PhotoBig2').asstring:=QuotedStr('no');
   sqlqry.ParamByName('PhotoBig3').asstring:=QuotedStr('no');
   sqlqry.ParamByName('DateVistavl').AsDate:=StrToDate('02.02.2011');
   sqlqry.ParamByName('Bliznec').asstring:=QuotedStr('no');
   sqlqry.ParamByName('Status').asstring:=QuotedStr('na_prodag');
   sqlqry.ParamByName('DataAvans').AsDate:=StrToDate('02.02.2011');
   sqlqry.ParamByName('CenaArendy').AsFloat:=10;
   sqlqry.ParamByName('KomunPlategy').asstring:=QuotedStr('no');
   sqlqry.ParamByName('Skakogo').AsDate:=StrToDate('02.02.2011');
   sqlqry.ParamByName('pokakoe').AsDate:=StrToDate('02.02.2011');
   sqlqry.Active:=True;

выдается ошибка
dbExpress driver does not suport the TDBXTypes.UNKNOWN data type. Vendor error message
я так понимаю что не поддерживается не известный тип но у меня все типы указанны явням образом

[Lokos]

проблема решилась были лишние параметры