IsFullScreen(), IsWorkstationLocked(), IsScreenSaverRunning() moved to the core

git-svn-id: http://svn.miranda-ng.org/main/trunk@6226 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 12 insertions, 3 deletions

diff --git a/include/delphi/m_core.inc b/include/delphi/m_core.inc
index abc3713971..40298ee87b 100644
--- a/include/delphi/m_core.inc
+++ b/include/delphi/m_core.inc
@@ -742,8 +742,17 @@ procedure mir_unsubclassWindow(Wnd:HWND; WndProc:TWNDPROC); stdcall;
                  external CoreDLL name 'mir_unsubclassWindow';

 

 ///////////////////////////////////////////////////////////////////////////////

-

-procedure UnloadCoreModule(); stdcall;

-                 external CoreDLL name 'UnloadCoreModule';

+// Windows utilities

+

+function IsWinVerVistaPlus():int; stdcall;

+                 external CoreDLL name 'IsWinVerVistaPlus';

+function IsWinVer7Plus():int; stdcall;

+                 external CoreDLL name 'IsWinVer7Plus';

+function IsFullScreen():int; stdcall;

+                 external CoreDLL name 'IsFullScreen';

+function IsWorkstationLocked():int; stdcall;

+                 external CoreDLL name 'IsWorkstationLocked';

+function IsScreenSaverRunning():int; stdcall;

+                 external CoreDLL name 'IsScreenSaverRunning';

 

 {$ENDIF}