FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Pasar Datos de un query a un listbox
Hola Buenas Noches. Estoy trabajando con un formulario de alta de empleados los cuales algunos tienen muchos puestos de trabajos.Para esto uso una tabla intermedia denominada Asignado que contiene las clave primaria de ambas tablas (puesto,empleados). Tengo un formulario de alta de empleados los cuales estoy cargando los datos de los mismo como dni,apellido,dirección,etc y luego tengo un boton que lo llamo "agregar" me abre otro listado llamado "Listado de puestos laborales" el cual tiene los puestos (id,descripción) en lo cual atravez de un boton llamado "seleccionar" quiero llevarme por así decirlo la "descripción" y se guarde en el ListBox del formulario empleados.
Bien aqui dejo el codigo que estube trabajando lo cual me tira error del boton agregar que llama al formulario "listado de puestos laborales"
y del boton seleccionar que se encuentra en el formulario listado Es hasta donde llegue pero no me carga nada en el listbox y tampoco las clave se cargan en la tabla "Asignado" espero que puedan guiarme en el tema Estoy trabajando con delphi 2010,Componentes zeos y mysql-5.Dejo de paso las tablas sql por si no quedo claro la relacion
desde ya muchas gracias |
#2
|
||||
|
||||
Es que no me queda del todo claro. Si te queres llevar la descripcion, porque estas dando de alta un nuevo registro?
Ademas no es sano que los form se entre conozcan entre si. Es mucho mejor hacer algo como esto: Agrega esta propiedad en tu TfListadoPuestos:
Y luego podes invocar a este form asi:
-- Esto es ya mas consejo: Por que accedes a los valores de los campos como Variants? TDataSet tiene una propiedad indizada y por defecto que devuelve el Variant del campo que pasas por indice. Pero he tenido malas experiencias con esta propiedad. Te aconsejo usar DataSet.FieldByName('Campo').AsString/AsInteger, etc A mi tambien me parece espantosamente larga la sintaxis, pero ya que llevas Delphi 2010, lo podes solucionar con una clase de extension:
Y ahora podrias escribir:
|
#3
|
||||
|
||||
Hola Belen12.
A mi tampoco me queda clara la forma en que deseas implementar la solución. Entiendo que tenes tres tablas, Código:
Empleados --------- ID ... Puestos ------- ID ... Asignado -------- Empleados_ID, Puestos_ID Pero, ¿ Por que hacer la elección del puesto desde otro formulario ? Podrías hacerlo todo desde el formulario de ingreso de empleado, una imágen de ejemplo a lo que me refiero: Si no entendí mal tu planteo, podría resultarte una opción mas sencilla de mantener y el código tampoco es muy complejo:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#4
|
|||
|
|||
muchas gracias por responder es muy bueno el codigo funciona sin prolema. Si basicamente queria haceder a otro formulario y traerme la descripsion de los puestos a un listbox
Última edición por Casimiro Notevi fecha: 22-06-2016 a las 20:13:51. |
#5
|
|||
|
|||
Gracias Por responder
Muchas gracias funciona perfecto el codigo y tienes razon es mas tedioso ir de un formulario a otro no lo habia pensado con un checklistbox me fue de mucha ayuda
Última edición por Casimiro Notevi fecha: 22-06-2016 a las 20:14:11. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Cargar un ListBox con datos de un Query | Liz Leon | Varios | 1 | 25-02-2015 19:56:20 |
Pasar datos de varios listbox a una tabla | Pedron | Varios | 5 | 08-05-2014 10:09:34 |
Como pasar los datos de un query a un ClientDataSet | oscarac | OOP | 1 | 08-07-2011 19:52:24 |
Pasar datos de una Query a una tabla | Vanis | SQL | 3 | 09-01-2007 02:29:41 |
pasar de un dbgrid a un listbox | Goyo | OOP | 13 | 14-12-2006 20:38:47 |
|