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

		Foros Club Delphi > Principal > Varios
Cómo convertir un número binario al tipo Real

Herramientas

Buscar en Tema

Desplegado

#32

13-03-2008

[maeyanes] maeyanes is offline

Capo de los Capos

Registrado: may 2003

Ubicación: Campeche, México

Posts: 2.732

Poder: 26

Hola...

Aquí tu código corregido... checa el comentario...

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
var
  n, Cantidad, Numero: Integer;
begin
  Numero := 0;
  Cantidad := Length(Edit1.Text);
  for n := Cantidad downto 1 do
    If Edit1.Text[n] = '1' then
      Numero := Numero + Power(2, Cantidad - n);
  // En esta línea tenías el error, un operador + que faltaba
  ShowMessage('El binario ' + Edit1.Text + ' equivale al número entero ' + IntToStr(Numero))
end;

Saludos...

« Tema Anterior | Próximo Tema »

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Convertir un integer en Real osea IntToReal	Kmef	Varios	2	24-10-2007 19:40:34
Convertir a binario cadena de caracteres	wgfs	Varios	0	28-10-2006 00:58:28
Convertir una cifra de tipo real a su cantidad en letras	reina	Varios	7	11-08-2005 18:16:31
Como edito un variable de tipo real???	Rafe	Varios	2	07-07-2005 01:15:45
Convertir Archivos DFM de binario a Texto (Text DFM)	DiDi	Varios	4	21-04-2005 19:39:43

La franja horaria es GMT +2. Ahora son las 00:52:03.