Hola
El asunto con la fecha lo vi despues de postear.
Es muy sencillo, lo puse
asdate y es un
text el edit, asi que solo lo trasformas y listo:
Código Delphi
[-]
AdoQuery1.SQL.Text := 'Select codigo, fecha, itebis From itebis '+
' where codigo = '+Edit1.Text;
AdoQuery1.Active := True;
Edit2.text:= AdoQuery1.Fields[0].AsString;
Edit3.text:= DateToStr(AdoQuery1.Fields[1].AsDateTime);
Edit4.Text:= AdoQuery1.Fields[2].AsString;
Saludos