![]() |
![]() |
| Paypal | 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
|
||||
|
||||
|
Otra forma de hacerlo podría ser usando la función FindComponent. Esto podrías usarlo en el caso en que tus edits tenga el mismo nombre común y un indice. Es decir, tener cinco edits y que los llames así:
Edit1 Edit2 Edit3 Edit4 Edit5 Puedes usar la función FindComponent para acceder directamente al componente en cuestión, o hacer un bucle y vaciar los todos. Por ejemplo para el caso de los 5 edits:
En este caso como sabemos que tenemos 5 edits se lo indicamos en el bucle. Y para cada uno buscamos con la función FindComponent (que necesita como parametro un nombre de componente = propiedad name), que en nuestro caso tiene todos en común "Edit" y una parte numérica que la llamamos X. Hay que hacer un cast de esta X, ya que la función espera un parámetro de tipo string. Después se especifica si el componente encontrado es del tipo TEdit. Y luego hacemos lo mismo que arriba, vaciamos su Text. Me ha quedado un poco lioso, así que si tienes dudas aquí estamos. Saludos |
|
#2
|
||||
|
||||
|
En mi opinión muy personal, esa función FindComponent deberían eliminarla de la VCL. Usar FindComponent es como quere hacer de Delphi un lenguaje interpretado en donde se puede acceder a los objetos por sus nombres. Pero además, FindComponent es de por sí un ciclo sobre todos los componentes del formulario para buscar el que tenga el nombre dado, de manera que estaríamos haciendo un doble ciclo innecesario.
Si se requiere trabajar sistemáticamente con un grupo de controles, Edits en este caso, para mi lo mejor es declarar un arreglo:
llenarlo al momento de construir el formulario y entonces iterar sobre el arreglo cuando se necesario. // Saludos |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| demasiados access violation | ingel | Varios | 17 | 20-09-2006 03:53:25 |
| Demasiados Caracteres en QReport | JANDREGUE | Impresión | 1 | 24-04-2005 09:01:57 |
| Metodo para borrar directorio | VolaRe | Varios | 4 | 25-07-2004 16:29:52 |
| Demasiados usuarios (2) | muli | Firebird e Interbase | 6 | 11-05-2004 13:38:38 |
| demasiados decimales | Irina | Varios | 2 | 19-06-2003 14:24:33 |
|