![]() |
Buen Día, como capturar datos
Hola!!!!!!!!!
Tengo una pantalla de busqueda con un TDBRadioGruop y tres opciones quiero hacer una busqueda por diferentes opciones, ya que tengo el siguiente codigo y me funciona para todos. // Qry_BusquedaRegistro.Close; Qry_BusquedaRegistro.Prepared; Qry_BusquedaRegistro.Parameters.ParamByName('Numero_Documento').Value := DBEdit1.Text; Qry_BusquedaRegistro.Open; if Qry_BusquedaRegistro.IsEmpty then ShowMessage('El Numero de Registro No Existe'); Me explico, el form de busqueda tiene un DBGrid, un edit, un TDBradioGruop, con 3 opciones y dos botones. Lo que quiero es que cuando le de un click a la opcion uno y en el edit digite el numero correspondiente y preciones el boton de buscar me presente los campos en el DBGrid y cuando preciones el boton de aceptar me traiga los campos al Form principal. espero que me entienda, mucha graciasssssss |
Para lo del RadioGroup puedes utilizar su propiedad ItemIndex para saber que opción está seleccionada
Código:
case RadioGroup1.ItemIndex of |
Gracia por la Ayuda...........
Tengo un Form principal donde digitos una serie de documentos segun el TDBRadioGroup con la siguiente opciones: 1- giros 2- transferencias 3- Otros. si es 1 digitos los campos que corresponden a la opcion 1, si es 2 por igual, etc. Lo que quiereo es hacer una busqueda por tipo de documento que en el form de busqueda cuando seleciones la opcion 1 y en un edit digite el numero a buscar me los muestre en un DBGrid y cuando me posiciones en sima del registro y preciones un boton de aceptar, me traiga los campos al Form Princial. con el siguiente codigo me hace la consulta o la busqueda de todas las opciones y no |
bueno, esto es algo complicadillo de explicar (es queno me explico muy bien yo :p), pero veamos si logro explicarlo
Tenemos 3 Edits y un RadioGroup. Según la selección del RG debemos seleccionar uno u otro Edit para sacar la consulta SQL. Bien, como te comentaba en el mensaje anterior, puedes hacerlo mediante la propiedad ItemIndex de éste Código:
Qry_BusquedaRegistro.Close; Dependiendo de lo que quieras hacer, puedes crear un TStringList y rellenarlo con todos los campos que quieras devolver (una linea por cada uno de ellos para facilitar su recuperación después) o bien tener una variable de tipo Variant a la que le asignas la columna que quieras devolver. Tanto un método como el otro, las variables han de ser públicas de la pantalla de búsquedas para luego, desde el form llamador, acceder a ellas una vez cerrada la pantalla y antes de liberarla de memoria (con Free o como lo hagas). Si quieres un ejemplo de todo este rollo, en mi web tienes el componente TDbSearchDialog que precisamente hace eso (montar unas querys, búsquedas según valores, ordenaciones y la posibilidad de devolver tantas columnas como se quieran). Por supuesto con código fuente para que lo puedas ojear (o cambiar si fuera el caso) Pues nada, espero que esto te ayude |
Disculpa por todas las molestias causadas, pero tengo sed de aprender a programar en Delphi...
Espero tener la oportunidad de ayudarte, mil Graciasssss:o :p otra cosa si tiene alguna direccion de internet donde pueda consequeir un manual de SQL, y si es en español mucho merjo te lo agradesco, porque la programacion Delphi es mas SQL.. Graciasssssssss y mucha suerte |
Cita:
Referente a los cursos, en la web del programador puedes encontrar alguno http://www.lawebdelprogramador.com/c...d=89&texto=SQL |
La franja horaria es GMT +2. Ahora son las 06:53:02. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi