Changeset 35 for Include/api_system.sbp


Ignore:
Timestamp:
Dec 24, 2006, 12:31:40 AM (17 years ago)
Author:
イグトランス (egtra)
Message:

OLE Automation関数などの追加
KERNEL関数などの追加

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Include/api_system.sbp

    r1 r35  
    251251#endif
    252252
    253 ' Overlapped I/O operation is in progress.
    254 Const ERROR_IO_PENDING = 997
    255 
    256253' Global Memory Flags
    257254Const GMEM_FIXED =          &H0000
     
    306303
    307304'Event
    308 Const EVENT_MODIFY_STATE = &H0002 
    309 Const EVENT_ALL_ACCESS = (STANDARD_RIGHTS_REQUIRED Or SYNCHRONIZE Or &H3) 
     305Const EVENT_MODIFY_STATE = &H0002
     306Const EVENT_ALL_ACCESS = (STANDARD_RIGHTS_REQUIRED Or SYNCHRONIZE Or &H3)
    310307
    311308'Mutex
     
    314311
    315312'Semaphore
    316 Const SEMAPHORE_MODIFY_STATE = &H0002 
    317 Const SEMAPHORE_ALL_ACCESS = (STANDARD_RIGHTS_REQUIRED Or SYNCHRONIZE Or &H3) 
     313Const SEMAPHORE_MODIFY_STATE = &H0002
     314Const SEMAPHORE_ALL_ACCESS = (STANDARD_RIGHTS_REQUIRED Or SYNCHRONIZE Or &H3)
    318315
    319316'Timer
     
    348345Const CSTR_EQUAL =        2
    349346Const CSTR_GREATER_THAN = 3
    350 Declare Function CompareString Lib "kernel32" Alias "CompareStringA" (Locale As LCID, dwCmpFlags As DWord, lpString1 As PSTR, cchCount1 As Long, lpString2 As PSTR, cchCount2 As Long) As Long
     347Declare Function CompareString Lib "kernel32" Alias "CompareStringA" (Locale As LCID, dwCmpFlags As DWord, pString1 As PCSTR, cchCount1 As Long, pString2 As PCSTR, cchCount2 As Long) As Long
    351348
    352349Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (lpExistingFileName As LPCSTR, lpNewFileName As LPCSTR, bFailIfExists As BOOL) As BOOL
     
    531528Declare Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (hFindFile As HANDLE, ByRef lpFindFildData As WIN32_FIND_DATA) As BOOL
    532529Declare Function FlushFileBuffers Lib "kernel32" (hFile As HANDLE) As BOOL
     530Declare Function FlushInstructionCache Lib "kernel32"(hProcess As HANDLE, pBaseAddress As VoidPtr, Size As SIZE_T) As BOOL
    533531
    534532Const FORMAT_MESSAGE_ALLOCATE_BUFFER = &H00000100
     
    619617Declare Function GetPriorityClass Lib "kernel32" (hProcess As HANDLE) As DWord
    620618Declare Function GetProcAddress Lib "kernel32" (hModule As HINSTANCE, lpProcName As BytePtr) As DWord
     619Declare Function GetProcessAffinityMask Lib "kernel32" (
     620    hProcess As HANDLE,
     621    ByRef ProcessAffinityMask As ULONG_PTR,
     622    ByRef SystemAffinityMask As ULONG_PTR
     623) As BOOL
    621624Declare Function GetProcessHeap Lib "kernel32" () As HANDLE
    622625Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (
    623   pszLongPath As PCSTR,
    624   lpszShortPath As PSTR,
    625   cchBuffer As DWord
     626    pszLongPath As PCSTR,
     627    pszShortPath As PSTR,
     628    cchBuffer As DWord
    626629) As DWord
    627630
     
    633636Declare Function GetStdHandle Lib "kernel32" (nStdHandle As DWord) As HANDLE
    634637
    635 Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (lpBuffer As BytePtr, uSize As DWord) As DWord
     638Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (pBuffer As PSTR, uSize As DWord) As DWord
    636639
    637640Type SYSTEM_INFO
     
    686689
    687690Declare Function GetUserDefaultLCID Lib "kernel32" () As LCID
    688 Declare Function GetUserName Lib "advapi32" Alias "GetUserNameA" (lpBuffer As BytePtr, ByRef nSize As DWord) As BOOL
     691Declare Function GetUserName Lib "advapi32" Alias "GetUserNameA" (pBuffer As PSTR, ByRef nSize As DWord) As BOOL
    689692
    690693Const VER_PLATFORM_WIN32s        = 0
     
    701704Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (ByRef lpVersionInformation As OSVERSIONINFO) As BOOL
    702705
    703 Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (lpBuffer As BytePtr, uSize As DWord) As DWord
     706Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (pBuffer As PSTR, uSize As DWord) As DWord
    704707Declare Function GlobalAlloc Lib "kernel32" (uFlags As DWord, dwBytes As SIZE_T) As HGLOBAL
     708Declare Function GlobalFrags Lib "kernel32" (hMem As HGLOBAL) As DWord
    705709Declare Function GlobalFree Lib "kernel32" (hMem As HGLOBAL) As HGLOBAL
     710Declare Function GlobalHandle Lib "kernel32" (pMem As VoidPtr) As HGLOBAL
    706711Declare Function GlobalLock Lib "kernel32" (hMem As HGLOBAL) As VoidPtr
    707712
     
    753758Declare Function LocalFileTimeToFileTime Lib "kernel32" (ByRef lpLocalFileTime As FILETIME, ByRef lpFileTime As FILETIME) As BOOL
    754759Declare Function LocalFree Lib "kernel32" (hMem As HLOCAL) As HLOCAL
     760Declare Function LocalHandle Lib "kernel32" (pMem As VoidPtr) As HLOCAL
     761Declare Function LocalLock Lib "kernel32" (hMem As HLOCAL) As VoidPtr
     762Declare Function LocalReAlloc Lib "kernel32" (hMem As HLOCAL, dwBytes As SIZE_T, uFlags As DWord) As HLOCAL
     763Declare Function LocalSize Lib "kernel32" (hMem As HLOCAL) As SIZE_T
     764Declare Function LocalUnlock Lib "kernel32" (hMem As HLOCAL) As BOOL
    755765Declare Function LockFile Lib "kernel32" (hFile As DWord, dwFileOffsetLow As DWord, dwFileOffsetHigh As DWord, nNumberOfBytesToLockLow As DWord, nNumberOfBytesToLockHigh As DWord) As BOOL
    756 Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (lpLibFileName As BytePtr) As HINSTANCE
     766Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (pLibFileName As PCSTR) As HINSTANCE
    757767
    758768Const DONT_RESOLVE_DLL_REFERENCES   = &h00000001
     
    876886Declare Function TerminateProcess Lib "kernel32" (hProcess As HANDLE, dwExitCode As DWord) As BOOL
    877887Declare Function TerminateThread Lib "kernel32" (hThread As HANDLE, dwExitCode As DWord) As BOOL
    878 Declare Sub TlsAlloc Lib "kernel32" ()
     888Declare Function TlsAlloc Lib "kernel32" () As DWord
    879889Declare Function TlsFree Lib "kernel32" (dwTlsIndex As DWord) As BOOL
    880890Declare Function TlsGetValue Lib "kernel32" (dwTlsIndex As DWord) As VoidPtr
     
    907917Declare Function VirtualFree Lib "kernel32" (lpAddress As VoidPtr, dwSize As SIZE_T, dwFreeType As DWord) As BOOL
    908918Declare Function VirtualLock Lib "kernel32" (lpAddress As VoidPtr, dwSize As SIZE_T) As BOOL
     919Declare Function VirtualProtect Lib "kernel32" (
     920    pAddress As VoidPtr,
     921    Size As SIZE_T,
     922    flNewProtect As DWord,
     923    ByRef flOldProtect As DWord
     924) As BOOL
     925Declare Function VirtualProtectEx Lib "kernel32" (
     926    hProcess As HANDLE,
     927    pAddress As VoidPtr,
     928    Size As SIZE_T,
     929    flNewProtect As DWord,
     930    ByRef flOldProtect As DWord
     931) As BOOL
     932Type MEMORY_BASIC_INFORMATION
     933    BaseAddress As VoidPtr
     934    AllocationBase As VoidPtr
     935    AllocationProtect As DWord
     936    RegionSize As SIZE_T
     937    State As DWord
     938    Protect As DWord
     939    MBIType As DWord
     940End Type
     941Declare Function VirtualQuery Lib "kernel32" (
     942    pAddress As VoidPtr,
     943    ByRef mbi As MEMORY_BASIC_INFORMATION,
     944    Length As SIZE_T
     945) As SIZE_T
     946Declare Function VirtualQueryEx Lib "kernel32" (
     947    hProcess As HANDLE,
     948    pAddress As VoidPtr,
     949    ByRef mbi As MEMORY_BASIC_INFORMATION,
     950    Length As SIZE_T
     951) As SIZE_T
    909952Declare Function VirtualUnlock Lib "kernel32" (lpAddress As VoidPtr, dwSize As SIZE_T) As BOOL
    910953Declare Function WaitForMultipleObjects Lib "kernel32" (nCount As DWord, pHandles As *HANDLE, fWaitAll As BOOL, dwMilliseconds As DWord) As DWord
     
    931974Declare Function WriteFile Lib "kernel32" (hFile As HANDLE, lpBuffer As VoidPtr, nNumberOfBytesToWrite As DWord, lpNumberOfBytesWritten As DWordPtr, ByRef lpOverlapped As OVERLAPPED) As BOOL
    932975Declare Sub ZeroMemory Lib "kernel32" Alias "RtlZeroMemory" (Destination As VoidPtr, dwLength As DWord)
    933 
    934 
    935976
    936977Const MAKELCID(lgid, srtid) = ((((srtid As Word) As DWord)<<16) or ((lgid As Word) As DWord))
     
    11261167
    11271168
    1128 Const LANG_SYSTEM_DEFAULT =  (MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT))
    1129 Const LANG_USER_DEFAULT   =  (MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT))
     1169Const LANG_SYSTEM_DEFAULT = (MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT))
     1170Const LANG_USER_DEFAULT   = (MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT))
    11301171
    11311172
     
    11661207
    11671208Const WAIT_IO_COMPLETION = &h000000C0 'STATUS_USER_APC
    1168 Const WAIT_TIMEOUT = &h000000C0
    1169 
    11701209
    11711210#endif '_INC_SYSTEM
Note: See TracChangeset for help on using the changeset viewer.