Asignacion en variable double perdida

[elcopa]

Antes de leer tu respuesta trate de inicializar la variable y el compilador no me marcaba la linea como compilada... entonces hice un procedimiento en otra unidad enviando como parametro tipo var la variable para inicializarla y ahi si se compilaba..... y funcionó...
He comentado esa inicializacion para probar tu consejo y ahora antes de mostrar la variable en el mensaje esta tiene el valor que debe, y en el mensaje se muestra correctamente. Esto me parece sospechoso, como que funciona a veces, cual si el compilador no trabajase correctamente.

Gracias por la ayuda!