The following code returns a compiler error.
procedure TLibData.BookTableBeforeDelete(DataSet: TDataSet);
var DoDelete : Word;
begin
MessageBeep(MB_ICONQUESTION);
DoDelete := MessageDlg('Are you sure you want to delete this
book?',mtConfirmation,
[mbYes,mbNo],0);
if (DoDelete = mrNo) then Abort;
end;
The message is on the line containing the Abort procedure call and reads
Statement expected, but expression of type 'Integer' found
The compiler was expecting to find a statement, but instead it found an
expression of the specified type.
remove "Abort" and the message disappears.
The Abort procedure is properly linked in from SysUtils, I can see no reason
why it would be taken to be an expression of type Integer. There are no
redeclarations of Abort anywhere in the application. Using D3.02
============================================
Patrick Dunford, Christchurch, NZ
EnzedRailWeb Sites
http://patrick.dunford.com/enzedrailweb/
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
