Programación General > Delphi
Consultas A Un Bd En Delphi+acces
(1/1)
VeRaCrUzAnItO-10-:
Hola,
Alguien sabe como acer una consulta en delphi+access? :huh:
He intentado de tres formas:
*suiedit11.text:= DataModule1.Empresas['rfc'];
* suiedit12.Text:=datamodule1.Qempresas.Fields[1].AsString;
*suiedit12.Text:=datamodule1.Qempresas;
Les agradeceria su ayuda o alguna referencia!!, gracias.
Ayla:
Hola.
Mira a ver si tienes todos los componentes enlazados correctamente.
Comprueba si tienes activada o abierta la tabla,query y demás.
Y por ejemplo, con esto:
--- Código: Text ---suiedit11.text:= DataModule1.Empresas.FieldByName('rfc').AsString;
Te debe funcionar.
Espero que te sirva. Un saludo.
VeRaCrUzAnItO-10-:
Muchas, muchas gracias!.
Oye otra pregunta, quiero mostrar en un memoel resultado de 5 busquedas ,pero una borra a la otra y solo aparece la ultima de las 5, como le hago para que el memo ponga las 5 consultas y no se borra la una a la otra, mi codigo es este:
--- Código: Text ---datamodule1.QAgreEmpleo.SQL.Text:='select * from agr_empleos'; datamodule1.QAgreEmpleo.Open; suimemo3.Text:=datamodule1.QAgreEmpleo['descripcion']; suimemo3.Text:=datamodule1.QAgreEmpleo['localidad']; {richedit1.Text:=datamodule1.QAgreEmpleo['especifique']; richedit1.Text:=datamodule1.QAgreEmpleo['giro']; richedit1.Text:=datamodule1.QAgreEmpleo['modalidad']; richedit1.Text:=datamodule1.QAgreEmpleo['salario']; richedit1.Text:=dataModule1.QAgreEmpleo['inicio']; } datamodule1.QAgreEmpleo.Close;
Saludos
Ayla:
Hola.
Asi creo que te funcionaria:
--- Código: Text ---richedit1.Text:=datamodule1.QAgreEmpleo['especifique'] + ' ' + datamodule1.QAgreEmpleo['giro'] + ' ' + datamodule1.QAgreEmpleo['modalidad'] + ' ' + datamodule1.QAgreEmpleo['salario'] + ' ' + dataModule1.QAgreEmpleo['inicio'];
Espero que te sirva.
Saludos.
Navegación
Ir a la versión completa