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.
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


0