From b73bb7080b12266fba7ebfaf4282ca12b9c89577 Mon Sep 17 00:00:00 2001 From: tobigun Date: Thu, 23 Jul 2009 19:21:06 +0000 Subject: further string -> UTF8String or IPath conversions git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1887 b956fd51-792f-4845-bead-9b4dfca2ff2c --- unicode/src/base/ULanguage.pas | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'unicode/src/base/ULanguage.pas') diff --git a/unicode/src/base/ULanguage.pas b/unicode/src/base/ULanguage.pas index 88b6647f..3dd5a9e0 100644 --- a/unicode/src/base/ULanguage.pas +++ b/unicode/src/base/ULanguage.pas @@ -33,6 +33,9 @@ interface {$I switches.inc} +uses + UUnicodeUtils; + type TLanguageEntry = record ID: AnsiString; //**< identifier (ASCII) @@ -60,7 +63,7 @@ type public constructor Create; - function Translate(const Text: UTF8String): UTF8String; + function Translate(const Text: RawByteString): UTF8String; procedure ChangeLanguage(const Language: AnsiString); procedure AddConst(const ID: AnsiString; const Text: UTF8String); procedure ChangeConst(const ID: AnsiString; const Text: UTF8String); @@ -208,7 +211,7 @@ end; * setting. If Text is not a known ID, it will be returned as is. * @param Text either an ID or an UTF-8 encoded string *} -function TLanguage.Translate(const Text: UTF8String): UTF8String; +function TLanguage.Translate(const Text: RawByteString): UTF8String; var E: integer; // entry ID: AnsiString; -- cgit v1.2.3