Fórum problema com aplicação em delphi #481682

Bom tenho um programa de cadastro de veiculos e usuario para controlar os veiculos de um empresa e seus respectivos usuario.
estou usando o delphi xe5, aplicação client/servidor com o banco de dados interbase. tenho um chave primeira na saida dele tenho esse teste:
procedure TfrmMov.enCGV_PK_COD_MOVExit(Sender: TObject);
begin
if not(btnCancelar.Focused or btnSair.Focused or btnDeletar.Focused) then
begin
if enCGV_PK_COD_MOV.Value < 0 then
begin
ShowMessage('CODIGO DO VEÍCULO, NÃO FOI PREENCHIDO');
enCGV_PK_COD_MOV.SetFocus;
EXIT
end;

cds_Padrao.CLOSE;
cds_Padrao.CommandText := '';
cds_Padrao.CommandText := 'SELECT * FROM CGVTBMOV WHERE GCV_PK_COD_MOV = ' + enCGV_PK_COD_MOV.text;
cds_Padrao.Open;

if cds_Padrao.IsEmpty then
begin
cds_Padrao.Insert;
btnIcluir.Enabled := true
end
else
begin
cds_Padrao.Edit;
btnIcluir.Enabled := false;
btnAlterar.Enabled := true;
btnDeletar.Enabled := true;
end;
end;
end;

Testei o comando que está no commandtext do ClienteDataSet padrão e executa no banco.