Int64 e Integer

[[gluglu]]

Hola a todos !

En un módulo .PAS tengo una variable IntNo declarada como Int64 e intento pasarle un valor de un IBDataSet

Código Delphi [-]
var
  IntNo : Int64;
  ...
begin
  ...
  IntNo := IBDataSet1.FieldByName('VALOR').AsInteger;
  ...
end;

El valor de IntNo en caso de haber un Int64 en el IBDataSet es irreal y un valor negativo.

Si lo paso como Value, me dá error al compilar diciendo que incompatibilidad entre Variant e Integer.

Como le puedo pasar ese valor Int64 ?

Saludos

[Lucciano]

Pruebas con la propuiedad AsVariant, o Value no recuerdo bien cual es.
Saludos.

[[gluglu]]

Suelo utilizar ambas, tanto Value como AsVariant, pero en este caso concreto, al ser un módulo sólo de código dentro de un fichero .PAS, al parecer algo cambia y no me lo acepta.

[[gluglu]]

Lo he acabado solucionando de esta manera :

He cogido todo el código que tenía en mi .PAS y lo he metido en un nuevo Form que no contiene nada, mas que el propio form vacio. Al estar el código asociado a un form ya me permite todas las operaciones y lo hace de forma correcta, como siempre estaba acostumbrado.

... cosas del Delphi

[roman]

Perdón pero no son cosas de Delphi, son cosas tuyas. Delphi no funciona por capricho. Seguramente hay alguna unidad (Variants, podría ser) que no tenías incluida en el otro archivo.

// Saludos

[[gluglu]]

Señor Román,

De nuevo me descubro ante Vd. y me quito el sombrero !

Efectivamente he vuelto a probar y lo que me faltaba era incluir la unidad 'Variants' en el uses. Al incluirlo el código en un Form, esta unidad se incluye directamente en el 'uses', hecho del que no me había percatado hasta ahora.

Una vez más, gracias.