paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-12 11:09:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add getshellwindow, by 440bx mantis 035548

Browse Source 
git-svn-id: trunk@42027 -
This commit is contained in:
marco 2019-05-10 14:56:09 +00:00
parent 5a5b47fa24
commit d942509db4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/win/wininc/func.inc
View File

@ -1327,6 +1327,7 @@ function CONSOLE_REAL_OUTPUT_HANDLE : HANDLE;
function IsWow64Process(hProcess:THandle; Wow64Process:PBOOL):BOOL;stdcall; external 'kernel32.dll' name 'IsWow64Process';
function GetPhysicallyInstalledSystemMemory(TotalMemoryInKilobytes: PULONGLONG ):BOOL; stdcall; external 'kernel32.dll' name 'GetPhysicallyInstalledSystemMemory';
function OpenThread(DesiredAccess : DWORD; InheritHandle : BOOL; ThreadId : DWORD) : THANDLE; stdcall; external 'kernel32.dll' name 'OpenThread';
function GetShellWindow:HWND; stdcall; external 'user32.dll' name 'GetShellWindow';
{$endif read_interface}