diff options
author | Alexey Kulakov <panda75@bk.ru> | 2014-03-08 13:29:52 +0000 |
---|---|---|
committer | Alexey Kulakov <panda75@bk.ru> | 2014-03-08 13:29:52 +0000 |
commit | bf11eec32ee09a804a00f997d8a484de497186ce (patch) | |
tree | 46512bacc09f09f10e39a6923f169ebcb78206dd /plugins/Libs/KOL_unicode.inc | |
parent | e0734e8e62dab60e70b8bbc69da909eecd3af9b5 (diff) |
3rd side library updates
git-svn-id: http://svn.miranda-ng.org/main/trunk@8476 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Libs/KOL_unicode.inc')
-rw-r--r-- | plugins/Libs/KOL_unicode.inc | 58 |
1 files changed, 56 insertions, 2 deletions
diff --git a/plugins/Libs/KOL_unicode.inc b/plugins/Libs/KOL_unicode.inc index 30ab926812..754878cb38 100644 --- a/plugins/Libs/KOL_unicode.inc +++ b/plugins/Libs/KOL_unicode.inc @@ -623,6 +623,7 @@ function wglUseFontOutlines(p1: HDC; p2, p3, p4: DWORD; p5, p6: Single; p7: Integer; p8: PGlyphMetricsFloat): BOOL; stdcall;
function AnsiToOem(const lpszSrc: LPCSTR; lpszDst: LPSTR): BOOL; stdcall;
function AnsiToOemBuff(lpszSrc: LPCSTR; lpszDst: LPSTR; cchDstLength: DWORD): BOOL; stdcall;
+function AnsiToOemBuffA(lpszSrc: LPCSTR; lpszDst: LPSTR; cchDstLength: DWORD): BOOL; stdcall;
function AnsiUpper(lpsz: LPSTR): LPSTR; stdcall;
function AnsiUpperBuff(lpsz: LPSTR; cchLength: DWORD): DWORD; stdcall;
function AnsiLower(lpsz: LPSTR): LPSTR; stdcall;
@@ -677,7 +678,7 @@ function DialogBoxIndirectParam(hInstance: HINST; const lpDialogTemplate: TDlgTe hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): Integer; stdcall;
function DialogBoxParam(hInstance: HINST; lpTemplateName: PKOLChar;
hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): Integer; stdcall;
-function DispatchMessage(const lpMsg: TMsg): Longint; stdcall;
+function DispatchMessage(const lpMsg: TMsg): LRESULT; stdcall;
function DlgDirList(hDlg: HWND; lpPathSpec: PKOLChar;
nIDListBox, nIDStaticPath: Integer; uFileType: UINT): Integer; stdcall;
function DlgDirListComboBox(hDlg: HWND; lpPathSpec: PKOLChar;
@@ -848,6 +849,31 @@ const RT_ANICURSOR = PKOLChar(21);
RT_ANIICON = PKOLChar(22);
+{$EXTERNALSYM GetWindowLongPtr}
+function GetWindowLongPtr(hWnd: HWND; nIndex: Integer): LONG_PTR; stdcall;
+{$EXTERNALSYM SetWindowLongPtr}
+function SetWindowLongPtr(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): LONG_PTR; stdcall;
+{$EXTERNALSYM GetWindowLongPtrA}
+function GetWindowLongPtrA(hWnd: HWND; nIndex: Integer): LONG_PTR; stdcall;
+{$EXTERNALSYM SetWindowLongPtrA}
+function SetWindowLongPtrA(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): LONG_PTR; stdcall;
+{$EXTERNALSYM GetWindowLongPtrW}
+function GetWindowLongPtrW(hWnd: HWND; nIndex: Integer): LONG_PTR; stdcall;
+{$EXTERNALSYM SetWindowLongPtrW}
+function SetWindowLongPtrW(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): LONG_PTR; stdcall;
+{$EXTERNALSYM GetClassLongPtr}
+function GetClassLongPtr(hWnd: HWND; nIndex: Integer): ULONG_PTR; stdcall;
+{$EXTERNALSYM SetClassLongPtr}
+function SetClassLongPtr(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): ULONG_PTR; stdcall;
+{$EXTERNALSYM GetClassLongPtrA}
+function GetClassLongPtrA(hWnd: HWND; nIndex: Integer): ULONG_PTR; stdcall;
+{$EXTERNALSYM SetClassLongPtrA}
+function SetClassLongPtrA(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): ULONG_PTR; stdcall;
+{$EXTERNALSYM GetClassLongPtrW}
+function GetClassLongPtrW(hWnd: HWND; nIndex: Integer): ULONG_PTR; stdcall;
+{$EXTERNALSYM SetClassLongPtrW}
+function SetClassLongPtrW(hWnd: HWND; nIndex: Integer; dwNewLong: LONG_PTR): ULONG_PTR; stdcall;
+
{$ENDIF interface_part} ////////////////////////////////////////////////////////
{$IFDEF implementation_part} ///////////////////////////////////////////////////
@@ -1124,6 +1150,7 @@ function wglUseFontBitmaps; external opengl32 name 'wglUseFontBitmapsW'; function wglUseFontOutlines; external opengl32 name 'wglUseFontOutlinesW';
function AnsiToOem; external user32 name 'CharToOemW';
function AnsiToOemBuff; external user32 name 'CharToOemBuffW';
+function AnsiToOemBuffA; external user32 name 'CharToOemBuffA';
function AnsiUpper; external user32 name 'CharUpperW';
function AnsiUpperBuff; external user32 name 'CharUpperBuffW';
function AnsiLower; external user32 name 'CharLowerW';
@@ -1274,4 +1301,31 @@ function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL begin
Result := _CreateMutex(lpMutexAttributes, Integer(Boolean(bInitialOwner)), lpName);
end;
-{$ENDIF implementation_part} ///////////////////////////////////////////////////
+{$IFDEF WIN64}
+function GetWindowLongPtr; external user32 name 'GetWindowLongPtrW';
+function SetWindowLongPtr; external user32 name 'SetWindowLongPtrW';
+function GetClassLongPtr; external user32 name 'GetClassLongPtrW';
+function SetClassLongPtr; external user32 name 'SetClassLongPtrW';
+function GetWindowLongPtrA; external user32 name 'GetWindowLongPtrA';
+function SetWindowLongPtrA; external user32 name 'SetWindowLongPtrA';
+function GetClassLongPtrA; external user32 name 'GetClassLongPtrA';
+function SetClassLongPtrA; external user32 name 'SetClassLongPtrA';
+function GetWindowLongPtrW; external user32 name 'GetWindowLongPtrW';
+function SetWindowLongPtrW; external user32 name 'SetWindowLongPtrW';
+function GetClassLongPtrW; external user32 name 'GetClassLongPtrW';
+function SetClassLongPtrW; external user32 name 'SetClassLongPtrW';
+{$ELSE}
+function GetWindowLongPtr; external user32 name 'GetWindowLongW';
+function SetWindowLongPtr; external user32 name 'SetWindowLongW';
+function GetClassLongPtr; external user32 name 'GetClassLongW';
+function SetClassLongPtr; external user32 name 'SetClassLongW';
+function GetWindowLongPtrA; external user32 name 'GetWindowLongA';
+function SetWindowLongPtrA; external user32 name 'SetWindowLongA';
+function GetClassLongPtrA; external user32 name 'GetClassLongA';
+function SetClassLongPtrA; external user32 name 'SetClassLongA';
+function GetWindowLongPtrW; external user32 name 'GetWindowLongW';
+function SetWindowLongPtrW; external user32 name 'SetWindowLongW';
+function GetClassLongPtrW; external user32 name 'GetClassLongW';
+function SetClassLongPtrW; external user32 name 'SetClassLongW';
+{$ENDIF}
+{$ENDIF implementation_part} ///////////////////////////////////////////////////
\ No newline at end of file |