Hola de nuevo. Yo soy relativamente nuevo en las APIs de Delphi, por eso componentes del estilo de MaskEdit no suelo usarlos (sencillamente porque desconozco su existencia, o porque cuando se me plantea un problema no pienso en ellos y decido implementarlo yo digamos que "a pelo").
En este caso me parece bastante sencillo, por ejemplo, la solución que comentas tú, de mantener dos variables numéricas y mostrar dos cadenas diferentes de texto.
Para sumar, evidentemente sumas las variables numéricas pero muestras el texto que quieras, con el $,%, €, etc...
Si en algún momento deseases cosas más avanzadas, p. ej. al entrar en el TEdit quitar el texto sobrante para poder escribir sólo el número y al salir reescribirlo todo, te es bastante sencillo hacerlo con las 4 variables anteriores y los eventos que el componente te proporciona. Incluso podrías pensar en derivar del TEdit e implementar éstas en la nueva clase.
Cita:
Ahora bién este código, aparentemente sencillo usando un TEdit, se complicaría bastante con las comprobaciones adicionales
que impone el formato solicitado por Rofocale: '$' delante, signo (-), digitos(0..9), ',' como separador de miles, y '.' de decimales.
|
No entiendo qué quieres decir con esto... Tienes las variables separadas, puedes darle el formato que quieras:
showmessage('Mi variable que creo que es un dólar $'+inttostr(FVar1+FVar2)+' o podrían ser € no lo sé.....');
Un saludo,
LoPiTaL