FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Accesar a las propiedades de otros objetos
F1....
Tengo un problemilla.... Estoy haciendo un procedimiento para validar datos desde una forma; para posteriormente llamarla desde cualquier otra y poder verificar que los datos que yo pida esten correctos; cada forma tiene un número distinto de objetos, los únicos que valido son los TEdit(que no estén vacios, que escriban letras cuando deban hacerlo, etc), TComboBox, etc. ya pase el formulario por valor: Procedure Validar (sender : TObject); ya puedo accesar a la lista de componentes con un for : For I := 1 to (Sender as TForm).Componentcount -1 Do y ya puedo separar cada uno de los componente con ClassName , pero ahora el problema es que yo quiero modificarle la propiedad color (por ejemplo) al componente (Sender as TForm).Components[i] y no puedo... Ya intenté declara una variable igual a al tipo de objeto que deseo modificar : Edit := TEdit.Create((Sender as TForm).Components[i]) y se crea el objet, pero no puedo modificar el valor ..... Alguien tiene una propuesta.... F1..... PLIS.... ATTE Sharkenstein ______/( ( ( P.D. Mil disculpas si está un poco extenso el texto, pero creo necesario explicar todo el contexto.... THNKS |
|
|
|