Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-03-2008
ZRR ZRR is offline
Miembro
 
Registrado: jun 2005
Posts: 39
Poder: 0
ZRR Va por buen camino
Exclamation problema creacion dinamica de combos en Turbo Delphi

Que tal, buen dia a todos.

Tengo un programa que crea una lista de combos (TDBLookUpComboBox) de forma dinámica, este programa lo comencé a desarrollar en Delphi 7 y todo iba bien, pero al cambiar a Turbo Delphi, compila correctamente, el problema es que cuando el usuario elige los datos de los combos, al hacer click sobre uno de los combos, se desaparece la selección que había realizado de los demas, esto solo sucede si compilo el programa con turbo delphi.

Los componentes son creados de la siguiente forma:

Código Delphi [-]
 
while not QryRutaHor.Eof do
begin
...
   //primera lista de combos
    combo:= TDBLookUpComboBox.Create(SBViajes);
    combo.Name:='ComboV'+QryRutaHor.FieldByName('CveHorario').AsString;
    if i>0 then combo.Top:=SBViajes.Controls[SBViajes.ComponentCount-4].Top-4
    else combo.Top:=5;
    combo.Left:=arrCol[c+3]; //columna
    combo.Parent:= SBViajes;
    combo.ListSource:=DSQryVeh;
    combo.ListField:='NUMEROVEH';
    combo.KeyField:='NUMEROVEH';
    combo.OnExit:=BuscaChofer;
    combo.Visible:=false;
    combo.Width:=widthCombo-140;
    //Segunda lista de combos
    combo:= TDBLookUpComboBox.Create(SBViajes);
    combo.Name:='ComboE'+QryRutaHor.FieldByName('CveHorario').AsString;;
    if i>0 then combo.Top:=SBViajes.Controls[SBViajes.ComponentCount-5].Top-4
    else combo.Top:=5;
    combo.Left:=arrCol[c+4]; //columna
    combo.Parent:= SBViajes;
    combo.ListSource:=DSQryEmpl;
    combo.ListField:='NOMBRE';
    combo.KeyField:='CVEEMPL';
    //combo.DataSource:=DSIBRutaHorarioVeh;
    //combo.DataField:='CVEEMPL';
    combo.Visible:=false;
    combo.Width:=widthCombo;
    combo.OnCloseUp:=PonCambioRol;
...
end; //while

De lo anterior quedan dos columnas de combos todos con el mismo listsource:

Combo A1 Combo B1
Combo A2 Combo B2
Combo A3 Combo B3

Los nombres de cada combo son similares pero no iguales, por ejemplo :

"ComboV1" "ComboE1"
"ComboV9" "ComboE15"
"ComboV11" "ComboE8"

Al seleccionar un valor de un combo de la columna A, se borran todos los valores elegidos previamente en los combos de esta columna, los de la B no se afectan, lo mismo sucede con la columna de combos B.

No se a que se debe este problema, ya que solo sucede al compilar con Turbo Delphi.

Alguien sabe como puedo solucionarlo?

Muchas gracias
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
Problema instalando Turbo Delphi, con Net Framework 2.0 Forest Varios 2 08-02-2008 19:20:16
Problema con Turbo delphi krlosrp Varios 0 28-08-2007 23:20:53
creación dinámica de componentes Mariana Varios 1 20-09-2005 17:07:07
Creacion dinamica de TTable hermes_32 OOP 3 11-08-2004 16:46:44
Creacion dinamica menu morfeo21 Varios 1 30-04-2004 17:33:14


La franja horaria es GMT +2. Ahora son las 09:32:32.


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