من این کد رو برای اینسرت کردن نوشتم :
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