FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
AYUDA con los Variants!!
Hola, a ver si me podeis ayudar con un fallo muy raro:
Utilizo la siguiente sentencia: Val := aPrecios[dsPiezas.RecNo]; Val es de tipo Variant, y aPrecios es una matriz de reales. El tema está en que si el valor real en cuestión es 30, mete un valor cercano a 0 (3 x 10^-318 o por ahí). He probado a poner la matriz de tipo Currency, y pasa al revés: valores muy altos. No entiendo que pasa :? con la conversión... Gracias y un saludo! |
#2
|
||||
|
||||
string handling routines
procedure Val(S; var V; var Code: Integer); Description Val converts the string value S to its numeric representation, as if it were read from a text file with Read. Como verás no puedes utilizar Val como una variable, puesto que es una función, por lo tanto forma parte de las palabras reservadas del lenguaje, cabia el nombre por otro y te funcionará. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
||||
|
||||
Lo cierto es que acabo de hacer la siguiente prueba y me devuelve el valor correcto:
Código:
procedure TForm1.Button1Click(Sender: TObject); var TMatrix : array[1..10] of Real; Val:Variant; begin TMatrix[1]:=40.3343444; Val:=TMatrix[1]; Edit1.Text:=FormatFloat(',0.0000',Val); end; Un saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#4
|
|||
|
|||
Hola, el problema no está en el Val supongo, porque estoy utilizando FastReport y uno de los eventos pasa ese parametro por referencia, para cambiarlo, y etc.
Es muy curioso, porque hago un paro en esa linea y pongo el cursor en la matriz (que por cierto es dinamica, pero supongo que ahí no está el fallo), y me dice los valores (que en el caso que lo probé era "(30)"). Voy a probar a poner un valor constante o yo que se . Gracias por responder |
#5
|
|||
|
|||
Solucionado , el problema está en que RecNo empieza en el 1 :P, y claro me salia de los valores de la matriz... es extraño q no lanzase una excepcion...
|
#6
|
||||
|
||||
Hay una directiva del compilador que controla el comportamiento. Ahora no recuerdo cual es... pero si buscas en la ayuda por "Range check" seguro la encontras...
De hecho, creo que es {$R+} y {$R-}. Con el chequeo activado, elevará una excepción cada vez que trates de acceder a un elemento inexistente de una matriz o un string. Hasta luego.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|