![]() |
![]() |
![]() |
![]() |
![]() |
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 ![]() |
#2
|
||||
|
||||
Cita:
Asegurate antes de hacer el CAST ( TEdit(...)) de que el componente es un TEdit, ya que sino tendrás un "Abstract error".
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi ![]() P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
![]() Gracias Neftaly por ese tip, aunque nada más funciona estando en la misma forma, no puedo modificar las propiedades desde un módulo de Datos, por ejemplo, pero se me ocurre crear un componente y pegarlo en cada form, de esta manera funcionará...
Que buena onda que existan tipos que aún deseen ayudar y enseñar a otros ![]() Atte Sharkenstein.., "LA ESCUELA ES EL ARCA DE NOE..... " . . . " PORQUE ES LA SALVACIÓN DE LOS ANIMALES" ![]() |
![]() |
|
|
![]() |
|