|
@@ -214,7 +214,7 @@ const
|
|
|
|
|
|
|
|
|
|
{===Helper routines==================================================}
|
|
{===Helper routines==================================================}
|
|
-function SystemUpcase(aCh : AnsiChar) : AnsiChar; far;
|
|
|
|
|
|
+function SystemUpcase(aCh : AnsiChar) : AnsiChar;
|
|
begin
|
|
begin
|
|
Result := System.Upcase(aCh);
|
|
Result := System.Upcase(aCh);
|
|
end;
|
|
end;
|