![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
![]() 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 ![]() y ya puedo separar cada uno de los componente con ClassName ![]() ![]() 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 ![]() |
|
|
![]() |
|