Eu utilizo o driver ODBC com ADO... Outra coisa qual é o tipo definido no Posgres do campo "ddataembar"
Mais uma: Eu utilizaria (como faço nos meus sistemas) da seguinte forma: edit2.text := qry_embarque.FieldByName('ddataembar').AsString ou ainda edit2.text := FormatDateTime('dd/MM/yyyy',qry_embarque.FieldByName( ddataembar').Value); Obs.: Esta data que está retornando é o "marco zero". Isto significa que o valor passado está nulo. Sds, Celso do A. Vianna Martins Desenvolvimento de Sistemas ------------------------------------------------------- Archive ISP - Rio de Janeiro - RJ www.archive.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 202634027 "Tudo aquilo que algum idiota diz que é urgente, é algo que este imbecil não fez em tempo hábil e quer que você se foda para fazer em tempo recorde." -------Mensagem original------- De: [EMAIL PROTECTED] Data: 09/15/04 12:55:56 Para: [EMAIL PROTECTED] Assunto: RES: [delphi-br] DELPHI 6 com POSTGRES 7.4.1 Meu problema eh o seguinte Celso. Faço um select na query SELECT idembar, ddataembar, srasotrans, stifrembar, nvafrembar, sobs1embar, sobs2embar FROM "FATEMBAR", "FATTRANS" WHERE idembar = :Pembarque and idtrans = itranembar NO EVENTO ONCLICK EU COLOCO ESSE CÓDIGO. with qry_embarque do begin close; ParamByName('Pembarque').AsInteger := StrToInt(edt_embarque.text); ExecSQL; end; qry_embarque.Active := true; if not qry_embarque.IsEmpty then begin edit1.text := (qry_embarque.FieldValues['idembar']); edit2.text := (qry_embarque.FieldValues['ddataembar']); edit3.text := (qry_embarque.FieldValues['srasotrans']); edit4.text := (qry_embarque.FieldValues['stifrembar']); edit5.text := (qry_embarque.FieldValues['nvafrembar']); memo2.text := (qry_embarque.FieldValues['sobs1embar']); memo3.text := (qry_embarque.FieldValues['sobs2embar']); end; certo. No edit2.text := (qry_embarque.FieldValues['ddataembar']); SO QUE NO EDIT2 FICA 00:00:00 E se eu colocar edit2.text := DateToStr(qry_embarque.FieldValues['ddataembar']); FICA ASSIM 30/12/1899 E se eu der um select no banco direto a data eh retornada certa. Não sei onde esta o problema se eh na estrutura ou no drive ODBC no caso o componente ZEOS. O que vc usa para conectar??? -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html