Hello there,

the free method gives an error when I try to free a control inside a panel.   
However the hide method or name work correctly.
see screenshot attached

Any idea ? many thanks

       For i:= panelSousMenu2.ControlCount-1 DownTo 0 Do
            begin
               if (panelSousMenu2.Controls[i] is TEdit) then
                    showMessage(TEdit(panelSousMenu2.Controls[i]).name) ;   <-- works fine
                    TEdit(panelSousMenu2.Controls[i]).free ;   <--- error
                    //panelSousMenu2.Controls[i].hide ;   <-- works fine

Have you seen this link?

http://www.elevatesoft.com/forums?action=view&category=ewb&id=ewb_general&page=1&msg=3479#3479

Walter

In addition to Walter's post:

Have you seen this link:

http://www.elevatesoft.com/forums?action=view&category=ewb&id=ewb_general&page=1&msg=3658#3658

Uli

With your example , I do this and that works . Perfect, thank you .

procedure TFormMenuGeneral.panelFree(Sender: TPanel);
begin
  Sender.free ;
end ;