¿Cómo convertir de word a integer?
 

Hola a todos, este es mi primer mensaje y espero que no sea el último, algo ando desesperado buscando una manera de convertir word en integer en Pascal, si alguien fuera tan amable de ayudarme, le estaría muy agradecido :)

No entiendo tu problema. Un Word es un entero sin signo de 16 bits con rango de 0 a 65535, mientras que un Integer es un entero con signo de 32 bits con rango de -2147483648 a 2147483647, así que no hay ningún problema en asignar el Word al Integer.

// Saludos

Simplemente asigna el valor en variable integer

Código Delphi [-]
Var
  Lword    :Word;
  LInteger :Integer;
begin
  LWord    :=561;
  LInteger :=LWord;

Y bienvenido a Club ;)

Hola,

En principio el tipo word es un subconjunto del tipo integer, es decir, puedes asignar el valor de una variable del tipo word a otra del tipo integer:

Código Delphi [-]
var
  d: word;
  i: integer;
begin
  d := 5;
  i := d;
  {...}
end;

Algo como lo anterior es posible, como digo. También podrías "hacer un cast" de la variable de tipo word para asignar su valor a otra de tipo integer:

Código Delphi [-]
var
  d: word;
  i: integer;
begin
  d := 5;
  i := integer(d);
  {...}
end;

Si esto no te soluciona "el problema" acaso tengas que dar más información; si obtienes un error del compilador o cualquier otro tipo de error refiere aquí el mensaje de error en cuestión.

Hola,

Bueno. A ver si nos ponemos de acuerdo. Cuando yo esté contestando que no conteste nadie más, ¿vale? :D :D :D

No sé los demás, pero cuando tú estabas contestando, yo no lo estaba haciendo, yo ya lo había hecho. :D :D

// Saludos

Grrrrrrrr...

:eek: :cool: :rolleyes: ;) :p :) :D

Yo levante mi cabeza por encima de mi PC y no vi nadie respondiendo.
:p

Sois unos AGONIOSOS :p

Muchas gracias a todos por vuestras respuestas, estoy un poco lelo, me debería haber dado cuenta de un detalle así... :P

Eso nos pasa a muchos, a mi me ha pasado cuando recien me enganchaba con el lenguaje. Y no tienes que sentirte lelo... a más de uno nos debe haber pasado y por ello no podemos decirnos que somos unos lerdos, o tontos.
Ante una duda como esa, yo le mando el F1 y me fijo:

Saludos,

y para DWord pasarlo a integer

¿como se hace?

JXJ, acabo de hacer una prueba, pues nunca hice este paso. Y en lo posible lo evito:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const ALGO: dword = $0010;
var un_algo: integer;
begin
  //un_algo := Integer(ALGO);
  ShowMessage(IntToStr(ALGO));
end;

El resultado es 16.

Y también probé con esta variante:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const ALGO: dword = $0010;
var un_algo: integer;
begin
  un_algo := Integer(ALGO);
  ShowMessage(IntToStr(un_algo));
end;

El resultado es el mismo.
¿Tal parece que el Cast o no usarlo es lo mismo?:confused:

Si respondo a tu pregunta.... avisame. La verdad es que evito en lo posible realizar Cast.

Saludos,

Hola

Delphius

gracias por responder.

Estoy tratando de portar un juego, de delphi 3 a Delphi win32 2006
mas o menos ahi va.

pero usa directx y para el video, tiene un archivo pas, para directx 7
y no compila, da errores,
en la parte del audio, tambien archivo pas para directx 7
usa DWORD, como variable para ajustar el audio, si más o menos audio

encontre una copia mas reciente para directx 9. de esos archivos pas
de los paquetes dspack
y en la funcion me pide un numero integer para cambiar el volumen
del audio, y ahi, el codigo, hace un llamado a una variable DWORD.

ya desesperado, por que no compilaba, solo cambie la llamada
de la funcion que pedia un dato integer, por uno dword,
y ya compilo, pero no he logrado hacer que funcione.

voy a probar, que tal anda, con tu codigo Delphius ...

Solo un apunte, el equivalente a DWORD en delphi es Cardinal.

tambien da problemas, por que me dice, el error

incompatible tipes cardinal and integer

lo revisare denuevo con calma.

gracias.