diff --git a/components/rx/trunk/rxapputils.pas b/components/rx/trunk/rxapputils.pas
index 60e6b0bee..2f84e5b2f 100644
--- a/components/rx/trunk/rxapputils.pas
+++ b/components/rx/trunk/rxapputils.pas
@@ -113,8 +113,8 @@ begin
   else
   begin
     Result := ExtractFileName(ChangeFileExt(Application.ExeName, '.ini'));
-    S:=UTF8ToSys(GetAppConfigDir(false));
-    ForceDirectoriesUTF8(S);
+    S:=GetAppConfigDir(false);
+    ForceDirectory(S);
     Result:=S+Result;
   end;
 end;