[halcon_rojo]

hola a todos, tengo el siguiente problema, en mi data module tengo el sigte pedazo de codigo:

Código Delphi [-]
procedure Tdatos.comprasBeforePost(DataSet: TDataSet);
begin
    if comprasNFACTURA.AsString='' then
    begin
        ShowMessage('No ingresó el número de factura!');
        Abort; // Esta es la linea en cuestion, donde sale el error
        MainForm.txtNro.SetFocus;
        exit;
    end;
    // aqui hay mas codigo
end;

que antes me funcionaba perfectamente, pero luego de adicionar una funcion para compactar tablas que me pidio incluir la unit BDE el compilador me da error en el ABORT del codigo, el error es: 'Statement espected, but expresion of type integer found' . como puedo pasar este error? si quito la unit mencionada el error desaparece pero la funcion deja de funcionar. have a nice day.