Programación General > Delphi

 Consulta En Un Dbgrid

(1/2) > >>

VeRaCrUzAnItO-10-:
hola,aqui molestando de nuevo, quiero hacer una consulta y esta pasarla a un dbgrid pero no se como , lo que hago es que pregunto si mi "rfc" esta en la base y si es asi que lo muestre en un dbgrid, pero como? ;) , como lo configuro o como le paso los datos de la seleccion.

Ahi les pongo el codigo de lo que segun yo hago, pero obviamente por la forma que asigno al dbgrid marca error.


--- Código: Text ---if (suimaskedit2.text='')or (suiedit31.Text='') then      begin          showmessage('No se admiten campos vacios');          exit;      end      else          datamodule1.Qempresas.SQL.Text:='select * from empresa where rfc ='+chr(39)+ suiMaskEdit2.Text+chr(39)+'and clave='+chr(39)+suiedit31.Text+chr(39);          datamodule1.Qempresas.Open;          if datamodule1.Qempresas.Eof=true then              begin                showmessage('El rfc o contraseña es incorrecto');                datamodule1.Qempresas.close;                suiMaskEdit2.Clear;                suiedit31.Clear;                exit;              end;           dbgrid5:='select * from agr_emplos where rfc='+chr(39)+suiMaskEdit2.text+chr(39); 
Saludos.

bartolomeo:
tu haces una consulta como:


--- Código: Text ---select * from table 
y deseas mostrarla en un dbgrid ???  :blink:

VeRaCrUzAnItO-10-:
Mmmm algo asi, lo que quiero es cuando pida el rfc se me devuelvan los campos de ese  en un dbgrid, me explico?

bartolomeo:
Hola, pues no se muy bien que estas haciendo, la verdad por simple ignorancia, no se que es un RFC  :unsure: , (jejeje que brutico soy)

pero ya probaste conectando el dbgrid a este query ???


--- Código: Text ---datamodule1.Qempresas.SQL.Text:='select * from empresa where rfc ='+chr(39)+ suiMaskEdit2.Text+chr(39)+'and clave='+chr(39)+suiedit31.Text+chr(39); 
estoy casi convencido  <_<  que el dbgrid te muestra los resultados de esta sentencia.

si aun no sabes como conectar un dbgrid, hechales un vistaso a esta pagina  :smartass: :


http://www.firebird.com.mx/modules/section...a4c66d25fea4f7d

VeRaCrUzAnItO-10-:
si, si entiendo eso, pero como le hago para asignarle esa consulta al dbgrid lo pongo asi  
--- Código: Text ---dbgrid5:='select * from agr_emplos where rfc ='+chr(39)+ suiMaskEdit2.Text+chr(39); 
o como jeje? pues si lo pongo asi me marca error, quiero saber como le asigno esa sentencia al dbgrid pues no he encontrado como.

también lo he intentado asi:

--- Código: Text ---dbgrid5.DataSource:=DataModule1.DAgreEmpleo;      datamodule1.QAgreEmpleo.SQL.Text:='select * from agr_emplos where rfc ='+chr(39)+ suiMaskEdit2.Text+chr(39);      //dbgrid5:=datamodule1.QAgreEmpleo; 
solo me muestra toda la tabla de "agre_empleos" y no filtra lo que yo quiero, que son iguales al rfc (rfc es una clave compuesta por tu nombre, fecha de nacimiento para identidicación de personas y empresas :D )

No se si me explique.

Saludos

Navegación

[0] Índice de Mensajes

[#] Página Siguiente