Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   saber cuantos componentes tengo en un form (https://www.clubdelphi.com/foros/showthread.php?t=42815)

gulder 23-04-2007 23:57:02

saber cuantos componentes tengo en un form
 
hola foro como andan, mi pregunta es la siguiente ustedes saben por los hilos anteriores o para los que no saben estoy trabajando en una aplicacion que me permite crear componentes en tiempo de ejecusion bueno hasta hay bien,haora lo que quiero es saber como hago para saber cuantos componentes tengo en mi forma pero no guardandolo en un contador cada vez que cree cada componente sino de forma general espero me hallan entendido gracias de antemano GULDER :rolleyes: :rolleyes: :rolleyes:

luisgutierrezb 24-04-2007 00:00:33

mmm si mal no recuerdo, forma.ComponentCount

marcoszorrilla 24-04-2007 00:00:56

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr(Form1.ComponentCount));
end;

Un Saludo.

gulder 24-04-2007 00:09:28

marcoszorrilla,luisgutierrezb hmmmmmmm
 
marcoszorrilla,luisgutierrezb hmmmmmmm me han dejado anonadado no pense que existiera una funsion haci gracias de antemano gulder :D

gulder 24-04-2007 05:32:17

otra preguntilla
 
hola foro como andan lo que se me dio hora fue como hago para entrar a las propiedades de cada componenten recuerden que los creo en tiempo de ejecusion gracias de antemano GULDER.:confused: :confused: :confused: :confused: :confused: :confused: :confused:

RONPABLO 24-04-2007 08:08:04

con Components... algo asi como esto:

Código Delphi [-]
var i : Integer;
Componente  : TComponet;
...
...
...
ifForm1.ComponentCount > 0 then
begin
   for i := 0 to Form1.ComponentCount - 1 do
   begin
     Componente := Form1.Components[ i ];
     if Componente is TEdit then
     begin
        TEdit(Component).Text:='Hola mundo';
     end
     else if Componente is TButton then
     begin
        TButton (Componente).Click;
     end;
   end;
end;

gulder 25-04-2007 20:46:55

Gracias Ronpablo
 
gracias RONPABLO estoy mirando lo que me dices ;)


La franja horaria es GMT +2. Ahora son las 00:10:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi