error در وارد کردن اطلاعات به Access ، نمیدونم کجا رو باید تصحیح کنم

[opluse]

من این کد رو برای اینسرت کردن نوشتم :

try

DM.ADO1.Close;

DM.ADO1.SQL.Clear;

DM.ADO1.SQL.Add('insert into Doc ( Name , Category , Type , Person , Date ) values ( :Names , :Categorys , :Types , :Persons , :Dates )');

DM.ADO1.Parameters.ParamByName('Names').Value:= TName.Text;

DM.ADO1.Parameters.ParamByName('Categorys').Value:  = ComCat.Text;

DM.ADO1.Parameters.ParamByName('Types').Value:= ComType.Text;

DM.ADO1.Parameters.ParamByName('Persons').Value:= ComPerson.Text;

DM.ADO1.Parameters.ParamByName('Dates').Value:= TDate.Text;

DM.ADO1.ExecSQL;

showmessage('ثبت انجام شد .');

except

showmessage('شکست در ثبت اطلاعات');

و وقتی برنامه رو اجرا میکنم یه همچین خطایی میده :

error1.jpg

[AmirSky]

من یه اشکال دیدم که شاید از اون باشه:
DM.ADO1.Parameters.ParamByName('Names').Value:= TName.Text
رو به این تغییر بده
DM.ADO1.Parameters.ParamByName('Names').Value:= QuotedStr(TName.Text

[opluse]

ممنون امیر خان از راهنماییت ، انجام دادم ولی نشد ، اما اشکال رو پیدا کردم از توی دیتابیس بود .