FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
Componentcount
Hola buenas
Estoy intentando modificar todos los Tedit que tengo metidos en un Tpanel usando la propiedad componentcount del Tpanel, pero la cosa no funciona. En concreto quiero hacer esto: FOR I:=0 TO panel1.ComponentCount-1 DO BEGIN IF (panel1.COMPONENTS[i] IS TEDIT) THEN BEGIN TD:=panel1.COMPONENTS[i] AS TEDIT; TD.readonly := True; TD.Color := clsilver; END; end; end; Pero... no funciona. Componentcount vale 0. Alguien sabe qué es lo que hago mal? Saludos y gracias Hogol |
#2
|
||||
|
||||
Hola,
Las propiedades Components y ComponentCount hacen referencia a los COMPONENTES cuyo OWNER es el componente en cuestion (en este caso el Panel). En cambio, Controls y ControlCount tienen que ver con los CONTROLES cuyo PARENT es el componente en cuestion. Lo más probable (seguro, si los has creado en diseño) es que el ownner de los edits sea el form y no el panel. En cambio, si los edits "están" en el panel, seguro que éste será su Parent. En resúmen, si cambias ComponentCount por ControlCount y Components por Controls en tu código, seguro que este funcionará.
__________________
E pur si muove |
#3
|
|||
|
|||
Impresionante
Que velocidad de respuesta!
Lo acabo de probar tal como me has dicho y funciona perfectamente. Muchas gracias por la rápida respuesta y por la explicación. Un saludo Hogol |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|