On 04/09/12 22:51, ik wrote:
Hello,

I'm trying to do the following code:

for i := 0 to vispan.ComponentCount -1 do
     begin
       if vispan.Components[i] is TSpeedButton then
         begin
           if Assigned(TSpeedButton(vispan.Components[i]).Action) then
             TAction(TSpeedButton(vispan.Components[i]).Action).Enabled := True
           else
             TSpeedButton(vispan.Components[i]).Enabled := True;
         end;
     end;

where vispan is a TPanel that get the current visible panel.
However, it seems that ComponentCount is 0, even though it has 7
components inside.
The components does see the TPanel as it's parent, and so does the navigator.

Is it a bug, or am I missing something here ?

Lazarus 1.1 r38512M FPC 2.6.0 x86_64-linux-gtk 2
Probably the form is the owner and not the panel.

Stephano

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to