diff options
Diffstat (limited to 'packages/winceunits/src/shellapi.pp')
| -rw-r--r-- | packages/winceunits/src/shellapi.pp | 236 |
1 files changed, 236 insertions, 0 deletions
diff --git a/packages/winceunits/src/shellapi.pp b/packages/winceunits/src/shellapi.pp new file mode 100644 index 0000000000..404e49936a --- /dev/null +++ b/packages/winceunits/src/shellapi.pp @@ -0,0 +1,236 @@ +{ + This file is part of the Free Pascal run time library. + Copyright (c) 2006 Free Pascal development team. + + See the file COPYING.FPC, included in this distribution, + for details about the copyright. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. + + **********************************************************************} + +{ Declarations for ceshell WinCE API + +} + +{exported functions list = to do, + * please remove functions done * + + Exports + + ordinal name + + 49 ?DLL_SHGetSpecialFolderPath@@YAHPAUHWND__@@PAGHH@Z + 4E ?PathIsRestrictedEx@@YAHPBGH@Z + 16 ?SHRemoveFontResource@@YAHPAG@Z + 17 ?_SHRemoveFontResource@@YAHPAG@Z + C DLL_SHGetFileInfo + 5 DoDragDrop + 38 Host_CheckStack + 3A Host_Exec + 35 Host_FindBigDaddy + 36 Host_MaxWindow + 39 Host_MessageBox + 37 Host_OpenPositionDB + 3B Host_ShortcutGetArgs + 3C Host_ShortcutRemoveArgs + 34 Host_ShowFileError + 42 ILConcatenate + 43 ILCopy + 41 ILFree + 46 ILGetFileSystemPidlData + 3D ILIsFileSystemPidl + 3F ILIsGUIDPidl + 3E ILIsNameSpacePidl + 40 ILIsPidl + 44 ILIsRemovableDevice + 45 ILRealPathFromPidl + 21 PathCompactPath + 20 PathCompactSlashes + 28 PathFileExists + 1D PathFindExtension + 1E PathFindFileName + 2C PathGetArgs + 23 PathGetAssociation + 22 PathIsDirectory + 24 PathIsExe + 26 PathIsExtension + 31 PathIsGUID + 25 PathIsLink + 32 PathIsRemovableDevice + 33 PathIsRestricted + 19 PathIsValidFileName + 1A PathIsValidPath + 27 PathMakePretty + 30 PathMakeUniqueName + 2F PathMatchSpec + 2B PathRemoveArgs + 1B PathRemoveBlanks + 29 PathRemoveExtension + 2A PathRemoveFileSpec + 2E PathRemoveQuotes + 2D PathRemoveQuotesAndArgs + 1C PathRemoveTrailingSlashes + 1F PathStripPath + 6 RegisterDragDrop + 7 RevokeDragDrop + 12 SHAddToRecentDocs + 4D SHCanonicalizePath + 10 SHCreateShortcut + 15 SHFlushCache + 4A SHGetCEString + 8 SHGetDesktopFolder + 48 SHGetDocumentsFolder + B SHGetMalloc + 11 SHGetShortcutTarget + 18 SHIsFileOperationRestricted + 4C SHIsFileOperationRestrictedEx + 47 SHIsRestrictedProcess + F SHLoadDIBitmap + E SHLoadDIBitmapBrush + 13 SHRegQuerySZ + 14 SHRegQuerySZEx + 4 SHSetSystemEUDCFont + 4B SHUnpackDirID + 1 __IMPORT_DESCRIPTOR_CEShell + 2 __NULL_IMPORT_DESCRIPTOR + 49 __imp_?DLL_SHGetSpecialFolderPath@@YAHPAUHWND__@@PAGHH@Z + 4E __imp_?PathIsRestrictedEx@@YAHPBGH@Z + 16 __imp_?SHRemoveFontResource@@YAHPAG@Z + 17 __imp_?_SHRemoveFontResource@@YAHPAG@Z + C __imp_DLL_SHGetFileInfo + 5 __imp_DoDragDrop + 38 __imp_Host_CheckStack + 3A __imp_Host_Exec + 35 __imp_Host_FindBigDaddy + 36 __imp_Host_MaxWindow + 39 __imp_Host_MessageBox + 37 __imp_Host_OpenPositionDB + 3B __imp_Host_ShortcutGetArgs + 3C __imp_Host_ShortcutRemoveArgs + 34 __imp_Host_ShowFileError + 42 __imp_ILConcatenate + 43 __imp_ILCopy + 41 __imp_ILFree + 46 __imp_ILGetFileSystemPidlData + 3D __imp_ILIsFileSystemPidl + 3F __imp_ILIsGUIDPidl + 3E __imp_ILIsNameSpacePidl + 40 __imp_ILIsPidl + 44 __imp_ILIsRemovableDevice + 45 __imp_ILRealPathFromPidl + 21 __imp_PathCompactPath + 20 __imp_PathCompactSlashes + 28 __imp_PathFileExists + 1D __imp_PathFindExtension + 1E __imp_PathFindFileName + 2C __imp_PathGetArgs + 23 __imp_PathGetAssociation + 22 __imp_PathIsDirectory + 24 __imp_PathIsExe + 26 __imp_PathIsExtension + 31 __imp_PathIsGUID + 25 __imp_PathIsLink + 32 __imp_PathIsRemovableDevice + 33 __imp_PathIsRestricted + 19 __imp_PathIsValidFileName + 1A __imp_PathIsValidPath + 27 __imp_PathMakePretty + 30 __imp_PathMakeUniqueName + 2F __imp_PathMatchSpec + 2B __imp_PathRemoveArgs + 1B __imp_PathRemoveBlanks + 29 __imp_PathRemoveExtension + 2A __imp_PathRemoveFileSpec + 2E __imp_PathRemoveQuotes + 2D __imp_PathRemoveQuotesAndArgs + 1C __imp_PathRemoveTrailingSlashes + 1F __imp_PathStripPath + 6 __imp_RegisterDragDrop + 7 __imp_RevokeDragDrop + 12 __imp_SHAddToRecentDocs + 4D __imp_SHCanonicalizePath + 10 __imp_SHCreateShortcut + 15 __imp_SHFlushCache + 4A __imp_SHGetCEString + 8 __imp_SHGetDesktopFolder + 48 __imp_SHGetDocumentsFolder + B __imp_SHGetMalloc + 11 __imp_SHGetShortcutTarget + 18 __imp_SHIsFileOperationRestricted + 4C __imp_SHIsFileOperationRestrictedEx + 47 __imp_SHIsRestrictedProcess + F __imp_SHLoadDIBitmap + E __imp_SHLoadDIBitmapBrush + 13 __imp_SHRegQuerySZ + 14 __imp_SHRegQuerySZEx + 4 __imp_SHSetSystemEUDCFont + 4B __imp_SHUnpackDirID + 3 CEShell_NULL_THUNK_DATA + +} + +{$ifdef read_interface} + +//***************************************************************************** +// consts +//***************************************************************************** +const + ShellDLL = 'CEShell'; + + FO_MOVE = $0001; + FO_COPY = $0002; + FO_DELETE = $0003; + FO_RENAME = $0004; + + FOF_MULTIDESTFILES = $0001; + FOF_CONFIRMMOUSE = $0002; + FOF_SILENT = $0004; // don't create progress/report + FOF_RENAMEONCOLLISION = $0008; + FOF_NOCONFIRMATION = $0010; // Don't prompt the user. + FOF_WANTMAPPINGHANDLE = $0020; // Fill in SHFILEOPSTRUCT.hNameMappings + // Must be freed using SHFreeNameMappings + FOF_ALLOWUNDO = $0040; + FOF_FILESONLY = $0080; // on *.*, do only files + FOF_SIMPLEPROGRESS = $0100; // means don't show names of files + FOF_NOCONFIRMMKDIR = $0200; // don't confirm making any needed dirs + +//***************************************************************************** +// types +//***************************************************************************** + +type +{ IMalloc interface } + + IMalloc = interface(IUnknown) + ['{00000002-0000-0000-C000-000000000046}'] + function Alloc(cb: Longint): Pointer; + function Realloc(pv: Pointer; cb: Longint): Pointer; + procedure Free(pv: Pointer); + function GetSize(pv: Pointer): Longint; + function DidAlloc(pv: Pointer): Integer; + procedure HeapMinimize; + end; + LPMALLOC = ^IMalloc; + PMALLOC = ^IMalloc; + +//***************************************************************************** +// functions +//***************************************************************************** +function SHFileOperation(lpFileOp:LPSHFILEOPSTRUCTW): longint; external ShellDLL name 'SHFileOperationW'; +function SHFileOperation(const lpFileOp:SHFILEOPSTRUCTW): longint; external ShellDLL name 'SHFileOperationW'; +function SHFileOperationW(lpFileOp:LPSHFILEOPSTRUCTW): longint; external ShellDLL name 'SHFileOperationW'; +function SHFileOperationW(const lpFileOp:SHFILEOPSTRUCTW): longint; external ShellDLL name 'SHFileOperationW'; +function SHGetPathFromIDList(_para1:LPCITEMIDLIST; _para2:LPTSTR):WINBOOL; external ShellDLL name 'SHGetPathFromIDList'; +function SHGetPathFromIDListW(_para1:LPCITEMIDLIST; _para2:LPTSTR):WINBOOL; external ShellDLL name 'SHGetPathFromIDList'; +function SHGetMalloc(var ppMalloc: LPMALLOC): HRESULT; external ShellDLL name 'SHGetMalloc'; +function SHGetSpecialFolderLocation(_para1:HWND; _para2:longint; var _para3:LPITEMIDLIST):HRESULT; external ShellDLL name 'SHGetSpecialFolderLocation'; + +{$endif read_interface} + +{$ifdef read_implementation} + + +{$endif read_implementation} |