Colocar campo hora em arquivo DBedit

[Said_ahmad 0]

CARO COLEGAS COMO FAÇO PARA COLOCAR UM CAMPO DBEDIT AUTOMATICO COM HORA NO DELPHI 5

PARA DATA EU COLOCO TIPO

 

DATA.Field.AsDateTime := DATE;

e no campo hora como faria

 

alguem pode me ajudar

[shini 318]

campo.value:=TimeToStr(Time);

[Said_ahmad 0]

campo.value:=TimeToStr(Time);

AMIGO CONTINUA COM ERRO EDOSHORA_REC.value:=TimeToStr(Time);

 

EU ESTOU USANDO UM CAMPO CARACTER COM 5 CARACTER EM DBF

 

procedure TCadastro87.FormShow(Sender: TObject);

begin

if TipoDaAcao <> Editar then AbreArquivos;

if TipoDaAcao = Inserir then

begin

OS.Insert;

EDOSDATA.SetFocus;

EDOSDATA.Field.AsDateTime := DATE;

EDOSHORA_REC.value:=TimeToStr(Time); ((((((( ta dando erro aqui )))))))))

end;

end;

 

procedure TCadastro87.FormClose(Sender: TObject; var Action: TCloseAction);

begin

if OS.State in [dsEdit, dsInsert] then

begin

if Pergunta( 'Janela em modo de edição. Confirma finalização ?' ) = 'S' then

OS.Cancel

else

begin

Action := caNone;

Exit;

end;

end;

[shini 318]

se o seu campo, é do time/timestamp, você tem q tira o timetostr, pq ele ta convertendo a hora pra string