Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-01-2007
Avatar de Goyo
Goyo Goyo is offline
Miembro
 
Registrado: feb 2006
Posts: 89
Poder: 19
Goyo Va por buen camino
Unhappy como pasar los datos de un combobox a una tabla

hola, amigos foristas tengo un problemilla, miren les explico: tengo 3 tablas:
uso tablas de paradox
Documentacion: tabla principal
Campo,Tipo
id_oficio, A (Key)
No_Folio,I
fecha_Oficio,D
Asunto,M
...
id_dependencia,I
id_personas,I
id_documento,+ (autonumerico)

Personas: catalogo de personas
Campo,Tipo
id_personas, + autonumerico (Key)
Titular,A
Cargo,A

AsignacionAdicional: catalogo de asignaciones extra del documento
Campo,Tipo
id_asignacion_Adicional, + autonumerico (Key)
id_Documento,I
id_Personas,I
Seguimiento,M

En la tabla documentacion es donde almaceno los datos del documento, pero como hay ocasiones que un mismo documento le turnan copia a otras personas (directores de una misma oficina), para le den contestacion por separado o solo para que se enteren del documento, entonces cargo los datos de personas en un DBGrid (dentro del formulario principal de captura) y si el documento va ser asignado a dos personas, entonces los agrego en un combobox1: en el combobox solo muestro el nombre(titular) de la persona..

Código Delphi [-]
procedure TFormCaptura.BtnAgregarClick(Sender: TObject);
begin AQTemp.SQL.Text := 'Select Titular From Personas Where id_personas = '+DBEdit6.Text;
AQTemp.Open;
ComboBox1.Items.Add (AQTemp.Fields[0].AsString);
end;

tambien los puedo quitar del Combo:
Código Delphi [-]
procedure TFormCaptura.BtnQuitarClick(Sender: TObject);
var i: integer;
begin 
i:=Combobox1.ItemIndex;
ComboBox1.Items.Delete(i);
end;
entonces mi duda es... como hacer para que cuando pulse el boton de Grabar de mi formulario, los datos de las personas que se encuentran en el ComboBox se graben a la tabla de AsignacionAdicional (solo los campos id_documento (tabla documentacion) y id_personas (tabla personas)) para que en esta tabla (AsignacionAdicional) se graben los id_personas que tenga en el combobox y el id_documento de la tabla (documentacion). No importando que el id_documento se grabe dos veces o las veces que sea (siempre y cuando tenga una asignacion en el combobox o varias, de acuerdo a las personas que tenga asignadas el mismo documento).

por ejemplo:
si agrego en el Combo por ejemplo: id_personas=1 (pedro), id_personas=2 (juan), id_personas=3 (santiago), el id_documento=1
en la tabla de AsignacionAdicional tendre:
id_asignacion_Adicional=1,id_documento=1, id_personas=1 (pedro)
id_asignacion_Adicional=2,id_documento=1, id_personas=2 (juan)
id_asignacion_Adicional=3,id_documento=1, id_personas=3 (santiago)
.....
id_asignacion_Adicional=n..,id_documento=1, id_personas=n..

como se ve en el ejemplo, se graban tres veces el id_documento





espero me haya explicado bien... de todos muchas gracias de antemano

Última edición por Goyo fecha: 24-01-2007 a las 20:15:47.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como pasar los datos de un combobox a una tabla Goyo OOP 2 08-01-2007 23:21:22
como pasar los datos de un combobox a una tabla Goyo OOP 0 21-12-2006 21:13:49
pasar datos de la tabla a un combobox todook Conexión con bases de datos 5 29-11-2006 11:44:26
pasar datos de tabla a tabla? danytorres Conexión con bases de datos 6 15-06-2004 18:41:33
pasar datos de una tabla a otra redlyon13 Conexión con bases de datos 3 30-05-2004 22:25:53


La franja horaria es GMT +2. Ahora son las 18:50:05.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi