[Raskolnikov]

Это умеет делать стандартная функция StrToInt, если к шестнадцатеричной строке прибавить спереди знак '$':

Код:

  //Два компонента TEdit: txtHex - шестнадцатеричное число
  //                      txtDec - десятичное
  txtDec.Text:= IntToStr(StrToInt('$'+txtHex.Text))