Pequeñas correcciones en
Código Delphi
[-]
procedure TFXPAF.DBNCodigoClienteExit(Sender: TObject);
ShowMessage('Este campo no puede quedar vacio, por favor rellene l campo [Código de cliente]');
ShowMessage('Este campo no puede quedar vacio, por favor rellene el campo [Código de cliente]');
y en
Código Delphi
[-]procedure TFXPAF.DBNNumeroDocumentoExit(Sender: TObject);
ActQuery(IBQBuscarNumeroDocumento,'Select * From DOCUMENTOS where WHERE (DOCUMENTOS.TIPODOCUMENTO = '+QuotedStr(VarSTipoDocumento)+
') AND (DOCUMENTOS.NUMERODOCUMENTO = '+QuotedStr(DBNNumeroDocumento.Text) +
') AND (DOCUMENTOS.SERIE = '+QuotedStr(DBNSerie.Text)+')');
ActQuery(IBQBuscarNumeroDocumento,'Select * From DOCUMENTOS WHERE (DOCUMENTOS.TIPODOCUMENTO = '+QuotedStr(VarSTipoDocumento)+
') AND (DOCUMENTOS.NUMERODOCUMENTO = '+QuotedStr(DBNNumeroDocumento.Text) +
') AND (DOCUMENTOS.SERIE = '+QuotedStr(DBNSerie.Text)+')');
Os pido disculpas pues he visto varias faltas de ortografía, pero es el corrector de texto, que no se que problema tiene pero ha incluido varias palabras en el diccionario y me las cambia automáticamente, ya por defecto escribo y suele comerme o poner alguna letra demás y se que cometo varias faltas ortográficas.