Ver Mensaje Individual
  #4  
Antiguo 13-12-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 31
Lepe Va por buen camino
Ahh, perdona, lo entendí mal.

Yo usaría un TListBox para añadir los destinatarios, puedes guardar el nombre del director y su código de la base de datos con algo así:

Ahora cada elemento de ese Listbox, tiene el nombre del director (para mostrarlo al usuario, y su código "oculto". Solo tienes que realizar un bucle sobre ese Listbox para ir insertando en la tabla adicional.

Yo crearía una consulta al vuelo para insertar los valores, algo así:
Código Delphi [-]
query1.sql.text := ' insert into asignacionadicional(codigoDirector) VALUES ( :codigo)';
query1.prepare;
for i:=0 to listbox1.items.count -1 do
begin
  query1.parambyname('codigo').Value := integer(listbox1.items.objects[i]);
  query1.ExecSql;
end;

Saludos

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.

Última edición por Lepe fecha: 13-12-2006 a las 19:03:33.
Responder Con Cita