[lazarus] Lazarus and Delphi: boolean expression expected, but got "untyped"

[Dave Coventry]

Hi,

I have a boolean called changed which I use to prevent the user from 
closing down if he hasn't saved his work.

var Changed : boolen;


 if Changed then
 begin
   if MessageDlg('Current Document not saved.  Continue?',
   mtConfirmation, [mbYes, mbNo], 0) <> mrYes then exit;
 end;

I get an error about error: boolean expression expected, but got "untyped"

Can anyone point me in the right direction? (Works in Delphi)

--
Dave Coventry
Tel:  +27(0)31 3092301
Fax:  +27(0)31 3092301
Cell: +27(0)82 3685983

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives