diff --git a/components/rx/trunk/docs/rxapputils.xml b/components/rx/trunk/docs/rxapputils.xml
index dfe3b7259..164fbe8fa 100644
--- a/components/rx/trunk/docs/rxapputils.xml
+++ b/components/rx/trunk/docs/rxapputils.xml
@@ -12,6 +12,11 @@
       </element><element name="WarningBox.S"><short>Текст предупрежедения</short>
       </element><element name="ErrorBox.S"><short>Текст сообщения об ошибке</short>
       </element>
+    <element name="rxValueInteger"><short>Check value is integer</short>
+      </element><element name="RxGetKeyboardLayoutName"><short>function return current keyboard layout name</short>
+      </element><element name="InitRxLogs"><short>init handlers for rx loging functions</short>
+      </element><element name="RxDefaultLogFileName"><short>return default logfile name</short>
+      </element>
     </module>
   </package>
 </fpdoc-descriptions>
diff --git a/components/rx/trunk/rxcontrols/rxapputils.pas b/components/rx/trunk/rxcontrols/rxapputils.pas
index 9aba89578..060843968 100644
--- a/components/rx/trunk/rxcontrols/rxapputils.pas
+++ b/components/rx/trunk/rxcontrols/rxapputils.pas
@@ -100,6 +100,7 @@ procedure InitRxLogs;
 function RxGetKeyboardLayoutName:string;
 
 function RxMessageBeep(AStyle:TRxMsgBeepStyle):boolean;
+function rxIsValueInteger(AValue:string):boolean;
 
 implementation
 uses
@@ -318,6 +319,15 @@ begin
   {$ENDIF}
 end;
 
+function rxIsValueInteger(AValue: string): boolean;
+var
+  V:Int64;
+  C:integer;
+begin
+  Val(AValue, V, C);
+  Result:=C = 0;
+end;
+
 
 function GetDefaultSection(Component: TComponent): string;
 var