Consulta en Ficheros DBF

[pallyJD]

Hola Foro:
Tengo una duda acerca de como resolver este problemita.

A una tabla .DBF le realizo una consulta de la siguiente forma:

SELECT SUM(I) FROM "tabla.DBF" tabla WHERE num='' 1''');

Hasta aqui todo OK

La cuestión es: ¿Cómo llevo ese resultado obtenido hacia un LABEL ó si me aconsejan algún otro modo de salida?

El resultado obtenido es de tipo REAL.

Saludos

[marcoszorrilla]

Código Delphi [-]
MiLabel.Caption:= Query1.Fields[0].AsString;

Un Saludo.

[marcoszorrilla]

Con formato:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Caption:=FormatFloat(',0.00',Query1.Fields[0].AsFloat);
end;

Un Saludo.

[pallyJD]

Empezado por marcoszorrilla

Código Delphi [-]MiLabel.Caption:= Query1.Fields[0].AsString;

Un Saludo.

Un millón de Gracias marcoszorrilla, funciona a la perfeción, el probelam recidia en que no lo estaba sacando como asString, de ahy se derivaba todo.

Otra pequeña petición.....

El valor obtenido no me muestra los decimales cuando es 00, ¿Solución?

De antremano gracias

Millón de gracias más. Todo OK....

Excelente Foro

[nemesio]

Puedes probar lo siguiente: en el componente de consulta que tienes (TQuery o el que uses) da doble clic encima, te va a aparecer la ventana con los campos de la consulta. Escoge el campo numerico de que hablas y ubicate en el Inspector de Objetos, busca la propiedad DisplayFormat, escribe ahi ###,###,##0.00 es la máscara que te va a permitir que muestre 0.00 cuando no haya valor.

Suerte

[marcoszorrilla]

Utiliza el segundo ejemplo que puse.

Un Saludo.

[pallyJD]

Hola:

A los 2 que me dieron sus respuestas muchas gracias, ambas formas lo utilizo en el proyecto, lo que en diferetes ventanas.

Saludos.