From 28d2110478bc7da2f2d99c66d36d2752c430fa4d Mon Sep 17 00:00:00 2001 From: florian Date: Sat, 3 Sep 2005 15:18:34 +0000 Subject: [PATCH] * Ansi* functions are now assigned to widestringmanager git-svn-id: trunk@1041 - --- rtl/win32/sysutils.pp | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/rtl/win32/sysutils.pp b/rtl/win32/sysutils.pp index 1744292bfb..e92c3dec3d 100644 --- a/rtl/win32/sysutils.pp +++ b/rtl/win32/sysutils.pp @@ -1137,10 +1137,19 @@ procedure InitWin32Widestrings; begin widestringmanager.CompareWideStringProc:=@Win32CompareWideString; widestringmanager.CompareTextWideStringProc:=@Win32CompareTextWideString; + widestringmanager.UpperAnsiStringProc:=@Win32AnsiUpperCase; + widestringmanager.LowerAnsiStringProc:=@Win32AnsiLowerCase; + widestringmanager.CompareStrAnsiStringProc:=@Win32AnsiCompareStr; + widestringmanager.CompareTextAnsiStringProc:=@Win32AnsiCompareText; + widestringmanager.StrCompAnsiStringProc:=@Win32AnsiStrComp; + widestringmanager.StrICompAnsiStringProc:=@Win32AnsiStrIComp; + widestringmanager.StrLCompAnsiStringProc:=@Win32AnsiStrLComp; + widestringmanager.StrLICompAnsiStringProc:=@Win32AnsiStrLIComp; + widestringmanager.StrLowerAnsiStringProc:=@Win32AnsiStrLower; + widestringmanager.StrUpperAnsiStringProc:=@Win32AnsiStrUpper; end; - Initialization InitWin32Widestrings; InitExceptions; { Initialize exceptions. OS independent }