Consulta con Adoquery

[[Caral]]

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