Como asignar variant a un Tedit ¿? ayuda pofavó

[Slaughter]

Hola de nuevo,

Estuve probando lo que me dijiste sobre el double y me ha ido de coj..., pero no me deja compilar la aplicación.
Cuando le doy a F9 para compilar me marca la linea de codigo siguiente:
end.

Que puede ser ?
Junto lo que me dijiste le seguí poniendo el case combobox of y el calculo lo puse de la manera que me dijiste pero no acabo de solucionar el problema, a ver si con esto ya sabes por donde voy y lo quiero conseguir.

Asias