Convert HexToInt

Function HexToInt ( Const Value : String ) : Integer ;

Begin

   Result := StrToInt ( '$' + Value ) ;

End ;

            Example :

                Caption := IntToStr ( HexToInt ( 'FF' ) ) ;