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

[kbaby]

No se donde poner uses Math;

Lo siento... xD mi inexperiencia... es 100%

Gracias por la rapidez tio.

[[Delphius]]

kbaby,
una unidad viene así:

Código Delphi [-]
unit Unit1;

interface

uses
  // aqui viene la lista!

type

...

implementation

...

end;

Lee la ayuda kbaby... allí está todo... además si emplearas el buscador de los foros llegarías a hilos en donde se han expuesto estas preguntas.

Saludos,

[kbaby]

Lo intento... pero como en esas ayudas viene información demás.. pues me es imposible encontrar la explicación. Necesito un manual que empieze desde cero.

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, math;

Aquí puse lo de math, pero me sigue señalando la linea donde está power.... diciendome tipo incompatible integer y extended y mission operartor semiclon...


pd: lo siento...

[ixMike]

Missing operator or semicolon te sale seguramente porque te falta un puntocoma.

El otro error es porque has puesto un extended donde va un integer.

Desde luego necesitas un manual para empecar desde cero , en el FTP del club tenemos La cara oculta de Delphi 4, que va desde cero hasta experto


Salu2.

[kbaby]

Recomendadme un libro, que voy a salir a las 17.00 a comprarme un manual. Decidme titulos bueno porfavor. Quiero aprenderlo a fondo.

[kbaby]

Pero... como corrigo esos errores :S yo veo todo con ;

Es que damos muy pocas cosas en informática :S (a veces digo que porque no os venís de profesores... xD)

[[Delphius]]

Empezado por kbaby

Pero... como corrigo esos errores :S yo veo todo con ;

Es que damos muy pocas cosas en informática :S (a veces digo que porque no os venís de profesores... xD)

kbaby, recuerda que no estamos a tu lado no podemos ver lo que hiciste.
Si expusieras el código que tienes hecho, con tus correcciones, podríamos saber que haces (o no haces).

Si estás dispuesto a comprar libros, Busca "La Biblia de... " de Marcos Cantú.

Saludos,

[kbaby]

Aquí esta lo que tengo:

procedure TForm1.Button1Click(Sender: TObject);
var
n, Cantidad, Numero: Integer;
begin
Numero:=0;
Cantidad:=Length(Edit1.Text);
for n:=Cantidad downto 1 do
begin
If Edit1.Text[n]='1' then
Numero:=Numero + Power ( 2, Cantidad - n);
end;
ShowMessage('El binario '+Edit1.Text' equivale al número entero '+IntToStr(Numero));

end;

end.

Y sí, voy a comprar un libro, voy a ir viendo esos que me informáis.

[ixMike]

Empezado por kbaby

Pero... como corrigo esos errores :S yo veo todo con ;

Pues el sistema del foro es que nos pongas el código que tienes para ver cómo podemos ayudarte
Si no es cosa de ";" será algún operador (como algo:=otracosa