FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
acceder a todos pero modificar algunos...
Hola a todos, estoy teniendo problemas para modificar ciertas propiedades en algunos com ponentes.... Me explico con el objetivo:
En un formulario con varios controles (Memos, edits y botones) deseo que al pulsar el boton 'Cancelar' se limpien los Tedits; Son varios con nombres expecificos.. edNombre; edEtc... (seria mas sido mas facil si no hubiera puesto nombre) Estoy tratando con esta rutina: Código:
label1.caption:=''; label2.caption:=''; memoDatos1.Lines.Clear; memoDatos2.Lines.Clear; for i:= 0 to form2.ComponentCount-1 do c:= (form2.Components[i].Name) as string; if Form2.Components[i] is tEdit then begin (FindComponent((form2.Components[1].Name)) as tedit).Text; c.Text:=''; end; end; Un millon
__________________
if Vivir = Vivir + Aprender then Aprender = ? Alfredo Borges |
#2
|
|||
|
|||
Hola, no entiendo algunas asignaciones, como esa que haces de:
c:= (form2.Components[i].Name) as string; ¿"c" es una vraible tipo string o tipo TComponent o tipo TEdit ...? Como luego haces c.Text := ''; Tampoco entiendo que luego busques de nuevo, usando FindComponent, un componente al que ya estás accediendo mediante el array Components. Para no extenderme más prueba a ver si es esto lo que andas buscando:
Saludos
__________________
Guía de Estilo |
#3
|
||||
|
||||
Hola Alfredo
Yo hago algo así, parecido, pero en TTabSheet. Te pongo un ejemplo:
Simplemente nos recorremos el Form (en este caso) y cuando encontramos un TEdit (o lo que sea), lo "limpiamos"... ¡Ah! si necesitas saber el nombre: TControl(Control).Name Espero que te sirva... Salu2
__________________
La violencia es el último recurso del incompetente. (Salvor Hardin) |
#4
|
|||
|
|||
WUW...
Por algo asi comence pero se me fue poniendo escamoso..... y me fui enredando cada vez mas en el proceso... je je Una vez mas Gracias Andres .... funciona a la perfección con todos los controles del form, incluso con los que estan en paneles diferentes....
__________________
if Vivir = Vivir + Aprender then Aprender = ? Alfredo Borges |
#5
|
|||
|
|||
Gracias Ohcan, esta fino, te lo agradezco tambien.... solo que cuando hice las primeras pruebas use Controls en vez de components y me modificaba el text pero no de todos los paneles¿?
Muy agradecido de verdad....
__________________
if Vivir = Vivir + Aprender then Aprender = ? Alfredo Borges |
#6
|
||||
|
||||
Bueno... no sabía que tenías paneles... pero eso es sencillo...
puedes usar recursividad....
o algo por el estilo (que estoy escribiendo de memoria...
__________________
La violencia es el último recurso del incompetente. (Salvor Hardin) |
|
|
|