FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Recorrer componentes y Destruirlos
Hola a todos, tengo una duda y seria genial que alguien me de una respuesta ya que es buscado pero sin suerte.
Estoy haciendo un sistema para una boleteria de colectivos y dependiendo de la cantidad de asiento que tenga el colectivo creo una cantidad determinada de botones que simulan los asientos. mi incoveniente se encuentra cuando tengo que cambiarles el TAG a los botones ya estos guardan los ID de los asientos que pertenecen al viajes seleccionado. El error que me ocurre es que siempre cambia el tag del ultimo Boton y no de todos uno por uno como deberia. Este es mi codigo:
Espero sus respuestass Gracias. Última edición por ecfisa fecha: 17-07-2013 a las 02:07:01. Razón: Quitar carita del código |
#2
|
||||
|
||||
Cita:
No veo en ningún lado la creación de los TButtons, pero suponiendo que ya estén creados yo haría el planteo de este modo: Con seguridad encuentres algún error en el código por que lo hice en el notepad (no tengo Delphi en este equipo), pero en líneas generales creo que la lógica se entiende. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#3
|
|||
|
|||
Gracias por la respuesta Ecfisa ya lo resolvi de otra forma pero probare la tuya igual.
Gracias por la pronta respuesta. |
#4
|
||||
|
||||
Bien que lo hayas solucionado, y bien por la solución de Ecfisa, pero tengo unas observaciones:
1. No haces un ordenamiento en el Select de asientos, por loq ue puedes llevarte sorpesas después de un ar de asignaciones de puestos. Es decir, podría salirte el asiento 12 de primero y despuesé el 3, etc. 2. En general las listas en Delphi comienzan a numerarse de cero, asi que cuando haces el recorrido de los componentes, con:
No estás teniendo en cuenta el componente cero... 3. Es una buena práctica recorrer los Datasets con While, como lo hace ecfisa en su ejemplo:
4. No veo de donde sacas la variable "Boton", en la línea:
Posiblemente esto era lo que te generaba el error que mencionas, pues debe ser una variable global que utilizas para crear los botones y puedes estar quedando con el último valor Tal vez no te hubiera fallado si asigans el valor a la variable previmente:
otra opcion como hace ecfisa es hacer el typeCast directamente sobre la lista de componentes/controles TButton(PNL_Colectivo.Controls[i]).Tag |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
recorrer componentes | NEG1414 | C++ Builder | 12 | 11-12-2007 05:50:43 |
Recorrer los componentes de un DbCtrlGrid ? | andresenlared | Varios | 4 | 18-07-2007 01:32:55 |
Recorrer un pchar | Status Quo | Varios | 23 | 27-05-2006 19:07:55 |
Recorrer un archivo .rtf | blamsa | Varios | 2 | 25-05-2005 11:52:48 |
Recorrer un Treeview | mateamargo | OOP | 0 | 11-11-2003 16:53:39 |
|