Consulta con Adoquery

[[Caral]]

Hola

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:= AdoQuery1.Fields[1].AsDate;
 Edit4.Text:= AdoQuery1.Fields[2].AsString;

Saludos

[agustin173]

Hermano Caral muchas gracias por tu ayuda me silvio de mucho,

no esta totalmente funcionando con la fecha pero tratare de buscar la forma de ponerlo a funcionar, pero ya esta trayendo la informacion a los edit que eso era lo que necesitaba.

muchas gracias a ti y a todos lo que me ayudaron.

[[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

[agustin173]

Ahora si hermano me funciono 100%.

te lo agradesco mucho espero dentro de poco estar ayudando a otros como tu.

porque eso hace crecer a uno y ayudar a los demas es una grata satisfaccion

muchas gracias.