[ecfisa]

Hola.

Te pongo unos enlaces que te van a ayudar:

• enlace 1
• enlace 2

Y te agrego una función que te pasará un numero en cualquier base a decimal:

Código Delphi [-]
function BaseNToDec(Num : string; Base : byte): Integer;
const
  BHex = '0123456789ABCDEFGHIJKLM'; // creo que son suficientes...
var
  i : Byte;
begin
  Result:=0;
  for i:=1 to length(Num) do
    Result:= Result * Base + Pos(Upcase(Num[i]), BHex) - 1;
end;

Saludos.

Edito: Podés valerte de esta última función para convertir los números a decimal y realizar las operaciones en base 10.