Controlar edición de DBEdit

[ecfisa]

Hola de nuevo.

Y en tu código podes usar el parámetro Text directamente:

Código PHP:

void __fastcall Tdmquerys::qdetdetallespreciov_prodSetText(TField *Sender, 
  const UnicodeString Text)
{
  Extended e;
  if ( !( TryStrToFloat( Text, e ) ) )
  ... 


Saludos

[isracdc]

Empezado por ecfisa

Hola de nuevo.

Y en tu código podes usar el parámetro Text directamente:

Código PHP:

void __fastcall Tdmquerys::qdetdetallespreciov_prodSetText(TField *Sender, 
  const UnicodeString Text)
{
  Extended e;
  if ( !( TryStrToFloat( Text, e ) ) )
  ... 


Saludos

Una duda más, que pasaría en el else? O cúal sería la sentencia que controla lo que pasa si es q la condición if ( !( TryStrToFloat( Text, e ) ) ) de resultado Falso? Es decir, cuál sería el código q indique que....."El dbeedit se llena normalmente"?

[ecfisa]

Hola.

Si TryStrToFloat devuelve verdadero ( el numero es correcto ) continúa con el flujo del programa, en caso contrario lanza la excepción.

Saludos

[isracdc]

Eso creí, pero, mi pregunta iba porque lanza la excepción correctamente, pero ahora, al colocar un valor correcto, el DBEdit vuelve al valor que tenía de inicio, es como si se refrescara y no queda el valor q edité (ReadOnly está en False, por si acaso )

[ecfisa]

Hola.

Ahora te entiendo, no tengo como probarlo pero creo que sería:

Código PHP:

...
  if ( !( TryStrToFloat( Text, e ) ) )
    throw Exception( "No es un número decimal válido" );
  else
     Sender->AsString = Text; 


Saludos

[isracdc]

Empezado por ecfisa

Hola.

Ahora te entiendo, no tengo como probarlo pero creo que sería:

Código PHP:

...
  if ( !( TryStrToFloat( Text, e ) ) )
    throw Exception( "No es un número decimal válido" );
  else
     Sender->AsString = Text; 


Saludos

Exacto! Eso era lo q faltaba, ahora si funciona todo correctamente, mil gracias!