{ %target=win32 } uses windows; var x : DWORD; begin x:=CommDlgExtendedError; end.