bde paradox delete record
Bom Dia. Estou com o seguinte problema:
eu estou usando o DBnavigator em uma aplicação com Paradox.
Eu alterei o delete record para false, e inseri :
begin
if MessageDlg(´Eliminar o Registro ?´,mtConfirmation,[mbYes,mbNo],0)<>mrYes then
Abort;
end;
Funciona bem. Ai eu alterei os eventos beforePost e Beforedelete para gravação no Hd, e inseri DbiSaveChanges(tabela.Handle), nesses eventos colocando na clausula uses: BDE.
Agora quando vou compilar o programa aparece a seguinte mensagem sobre o item abort: [Error] DataModulo.pas(708): Statement expected, but expression of type ´Integer´ found.
Se retiro o BDE da clausula uses volta a funcionar.
Alguem poderia me ajudar
eu estou usando o DBnavigator em uma aplicação com Paradox.
Eu alterei o delete record para false, e inseri :
begin
if MessageDlg(´Eliminar o Registro ?´,mtConfirmation,[mbYes,mbNo],0)<>mrYes then
Abort;
end;
Funciona bem. Ai eu alterei os eventos beforePost e Beforedelete para gravação no Hd, e inseri DbiSaveChanges(tabela.Handle), nesses eventos colocando na clausula uses: BDE.
Agora quando vou compilar o programa aparece a seguinte mensagem sobre o item abort: [Error] DataModulo.pas(708): Statement expected, but expression of type ´Integer´ found.
Se retiro o BDE da clausula uses volta a funcionar.
Alguem poderia me ajudar
Jogelu
Curtidas 0