Convertir datos DBEdit tipo $ a numero

[destrukthor]

Hola Hola.
Mil disculpa por preguntar esto, pero no puedo cambiar los valor de un DBedit con formato $ 15.000,05, a numero real o entero para su suma o manipulacion.

desde ya muchas gracias.

[[Lepe]]

no uses el DBEdit, sino el campo asociado en la BBDD, puede ser una de las siguientes formas:

NombreTAblaNombreCAmpo.ASFloat
table1.Fieldbyname('total').AsCurrency
table1.Fields[3].AsCurrency
etc.

Saludos

[destrukthor]

Hola gracias pro responder, pero ocurre el siguiente problema cuando estas insertando un registro nuevo o este a su vez no le haz ingresado ningun valor y la funcion q hace los calculos analiza todos estos datos dice un error de datso Null, q debe corresponder a q no son ni cero y ningun numero es ahi mi problema tener q analizar cada campo del registro nuevo eso es largo si tengo 7 campos a calcular...
por eso lo de la conversion...

[luisgutierrezb]

te recomiendo que pongas un valor por default si no creas los campos de la tabla en el evento afterinsert de la tabla puedes poner:

dataset['Campo1'] := 0;
dataset['Campo2'] := 0;

etc, asi cuando hagas las operaciones, no abra nulos abra ceros... si por alguna causa necesitas los nulos entonces puedes comprobar

if tabla.fieldbyName('Campo1').IsNull then
..acciones si es nulo
else
..acciones si no es nulo

[[Lepe]]

Lo que si puedes hacer es la comprobación de valores nulos en la rutina que hace el cálculo.

Un Tfield, tiene el método IsNull, antes de hacer el cálculo, pregunta si alguno de los campos implicados es null, y en ese caso, no haces el cálculo.

Una posible idea es esta:

Código Delphi [-]
function HacerCalculos:Boolean;
var Nombres : Array [0..3] of string = ('precio', 'unidad', 'base','impuestos');
begin
  Result := false;
  for I:= low(Nombres) to High(nombres) do
  begin
    Result :=  tabla1.Fieldbyname(Nombres[i]).IsNull;
    If Result then Break;
  end;
end;

Si no te sirve, indica qué estas haciendo, que tablas, campos, Base de Datos, componentes de acceso, etc

Ayudar a ciegas es dificil

Saludos

[destrukthor]

Gracias nuevamente por su ayuda, ya encotre mi problema era el tipo de funcion q estaba usando para extraer los datos de la tabla, usaba...
Tabla1.FiendValues['campo1']
y esta no le dice q tipode dato es, asi q por obligacion ahi q usar una q le diga el tipode datos q tiene comop el FieldByName('campo1').AsFloat

[destrukthor]

Gracias por las soluciones, me han dado las respuestas q necesitaba.

Gracias por la pronta respuesta.