Cómo convertir un número binario al tipo Real

[kbaby]

Me he atrancado aquí:

const
Cadena = 'ABCDEF';
var
TercerCaracter: Char;
begin
TercerCaracter:=Cadena[3];
//TercerCaracter ahora debe valer "C"
end;


ABCDEF ... supongo que ese código ira en un button... pero como voy a poner en ese button ABCDEF xD

PD: Soy... principiante (mas por debajo)

PD2: He leído el código completo y e ido transladando todo a lo que yo sé y me atranqué en:
If Edit1.Text[n]='1' then //Si el número es un uno
Inc(Numero, Power(2, Length(Edit1.Text)-n));

Edit1.Text[n] -> No lo he visto nunca después de text añadir [n] ... T_T