Delphi - Cambiar el valor en IBQuery

 
Vista:

Cambiar el valor en IBQuery

Publicado por Oscar (42 intervenciones) el 08/06/2006 17:37:16
Saludos.

Mi problema es el siguiente :

Quiero mostrar los datos en un grid, pero para aquellos que su campo "Fecha_Entrega" sea cero (es decir que no este indicada o su valor en la BD sea nulo) en lugar de aparecer en blanco aparezca el texto. "No indicado".

Alguien sabe como ?

Gracias de antemano....

Ya lo intentente con el metodo OnGetText pero al recuperar el valor me dice que 0.0 no es valor TimeStamp correcto....

procedure Tfrm.CampoFecha_GetText(Sender: TField;
var Text: String; DisplayText: Boolean);
begin
if((Sender.IsNull) or (Sender.AsDateTime=0)) then
Text := 'No indicado'
else
Text := FormatDateTime('dd-MMM-yyyy', Sender.AsDateTime);
end;

donde CampoFECHA es de Tipo TDateTimeField.

gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cambiar el valor en IBQuery

Publicado por Edgar Rodriguez (172 intervenciones) el 10/06/2006 00:52:41
Mejor hazlo dentro del evento OnCalcFields, define un campo calculado y dentro del evento pones el código, así es mejor...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar