Здравствуйте!
Вопрос таков есть база *.GDB две таблицы ID_NUM integer primary key, пытаюсь ввести номер ругается на
IBSQL1.ParamByName('ID_NUM').AsInteger:= cxRichEdit1.text;
не знаю как указать cxRichEdit1.text <-вот в этом месте


[DCC Error] TdxRibbonForm.pas(157): E2010 Incompatible types: 'Integer' and 'TCaption'
[DCC Error] TdxRibbonForm.pas(139): E2065 Unsatisfied forward or external declaration: 'TForm1.cxRichEdit1PropertiesChange'
[DCC Fatal Error] Project1.dpr(6): F2063 Could not compile used unit 'TdxRibbonForm.pas'

Приложение:
procedure TForm1.cxButton1Click(Sender: TObject);
begin
Try
// Заполнение параметров запроса
IBSQL1.ParamByName('ID_NUM').AsInteger:= cxRichEdit1.text;
IBSQL1.ParamByName('REGISTERNUMBER').AsString:= cxRichEdit2.Text;
IBSQL1.ParamByName('INBOXDATE').AsDate:= cxDateEdit1.Date;
IBSQL1.ParamByName('OTINBOX').AsString:= cxRichEdit5.Text;
IBSQL1.ParamByName('FORMAINBOX').AsString:= cxRichEdit3.Text;
IBSQL1.ParamByName('NUMBERINBOXOUTBOX').AsString:= cxRichEdit4.Text;
IBSQL1.ParamByName('DATEINBOXOUTBOX').AsDate:= cxDateEdit2.Date;
IBSQL1.ParamByName('OTPRAVITEL').AsString:= cxRichEdit6.Text;
// Выполнение запроса
IBSQL1.ExecQuery;
IBTransaction1.Commit;
cxRichEdit1.text:='';
cxRichEdit2.Text:='';
cxRichEdit5.Text:='';
cxRichEdit3.Text:='';
cxRichEdit4.Text:='';
cxRichEdit6.Text:='';
Except
IBTransaction1.Rollback;
End;
IBTransaction1.StartTransaction;
// Обновление данных на форме
IBTable1.Close;
IBTable1.Open;


end;