Переписать функцию с помощью рекурсии

String DecToX (UINT num, BYTE p)
{
  String res0 = "", res = IntToStr(num) + " (10)   =   ";
  if (p>1 && p<10)
  {
    do
    {
      res0 = IntToStr(num%p) + res0;
      num/=p;
    }
    while (num>0);
    res += res0 + " (" + IntToStr(p) + ")";
  }
  else
    if (p==1)
    {
      for (UINT i = 0; i < num; i++)
        res0 += "0";
      res += res0 + " (1)";
    }
  else
    res = "Основание системы счисления p должно быть больше 0 и меньше 10.";
  return res;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ShowMessage(DecToX(973, 5));
}

unsigned __int64 DecToX(unsigned __int64 num, BYTE p)
{
  if (num / p > 0)
    return num % p + 10 * DecToX(num / p, p);
  else
    return num % p;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ShowMessage(DecToX(973, 5));
}

switch(Index)
   {
     case 0 :
     //первый пример
      break;
     case 1 :
     // второй пример с рекурсией
      break;