Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-07-2003
emil emil is offline
Registrado
 
Registrado: jul 2003
Ubicación: santo domingo Republica dominicana
Posts: 1
Poder: 0
emil Va por buen camino
Angry problema al insertar dato tipo date a un stringGrid

estoy trabajando con access y tengo un campo tipo datetime

y cuando intento insertarlo me da error
ejemplo
stringGrid1.cells[2,I]:=DateToStr(fdm1.Qhabitacion.fieldbyname('fentreservacion').value);
Responder Con Cita
  #2  
Antiguo 11-07-2003
charly charly is offline
Miembro
 
Registrado: may 2003
Posts: 36
Poder: 0
charly Va por buen camino
Hola,
Yo uso una funcion (nada optimizada) para hacer consultas a Firebird y como este usa las fechas en formato texto te la copio por si te puede servir.

function DtoSFB(dFecha:TDate;cSeparador:string;lHoraInicial,lHoraFinal:boolean):string;
var nDia,nMes,nAnyo:word;
cDia,cMes,cAnyo:string;
begin

if cSeparador = '' then cSeparador := '.';

DecodeDate(dFecha,nAnyo,nMes,nDia);
if length(IntToStr(nDia)) = 1 then
cDia := '0'+IntToStr(nDia)
else
cDia := IntToStr(nDia);

if length(IntToStr(nMes)) = 1 then
cMes := '0'+IntToStr(nMes)
else
cMes := IntToStr(nMes);

cAnyo := IntToStr(nAnyo);

if cAnyo = '' then
Result := ''
else
if lHoraInicial then
Result := cMes+cSeparador+cDia+cSeparador+cAnyo+' 00:00:00'
else
if lHoraFinal then
Result := cMes+cSeparador+cDia+cSeparador+cAnyo+' 23:59:59'
else
Result := cMes+cSeparador+cDia+cSeparador+cAnyo;

end;

Como detalle tiene que se puede poner el separador de fecha y que te incluya la primera hora o ultima del día, ya que cuardo la fecha como timestamp y para sacar los datos de un día necesito tener en cuenta la hora.
Tal vez si no te sirve directamente, la puedes modificar y para los que usen Interbase/Firebird le puede ser util.
Un saludo
Responder Con Cita
  #3  
Antiguo 11-07-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 26
delphi.com.ar Va por buen camino
Hola Emil, sería bueno que nos comentes que error te da, así podemos llegar a saber cual es el problema, aunque me supongo que tu problema es con los tipos Variant cuando sea Value = Null.
Prueba esto:
Código:
ngGrid1.cells[2,I]:=fdm1.Qhabitacion.fieldbyname('fentreservacion').AsString;
Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 14:18:02.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi