Resize event

Question

if (EventEnum != SAPbouiCOM.BoEventTypes.et_FORM_ACTIVATE & EventEnum != SAPbouiCOM.BoEventTypes.et_FORM_LOAD)
     SAPbouiCOM.Form oCurrentForm = SBO_Application.Forms.Item(FormUID);
                if (EventEnum == BoEventTypes.et_FORM_RESIZE)
                    try
                        oCurrentForm.Items.Item("PLB").Left = oCurrentForm.Items.Item("10000330").Left - oCurrentForm.Items.Item("PLB").Width - 3;
                        oCurrentForm.Items.Item("PSOB").Left = oCurrentForm.Items.Item("PLB").Left - oCurrentForm.Items.Item("PSOB").Width - 3;
                        oCurrentForm.Items.Item("PLB").Top = oCurrentForm.Items.Item("10000330").Top;
                        oCurrentForm.Items.Item("PSOB").Top = oCurrentForm.Items.Item("PLB").Top;
                    catch { }
//TODO: This is triggered many times. WHY ?????
My goal is to keep 2 custom buttons aside system one but
I tried many things in form_Load, Activate or with things like BeforeAction, etc..etc
I dont know how to make sure that the buttons are really positioned correctly and avoid makeing a call to the resize event many times for nothing
In this actual form, the code make the form flickering many times before get finaly stop.
Else then that, the buttons are very nicely placed and when I resize, they stay right at their place.

Answer 1

> Marc ...
>
>
> My guess is that you can achive this by specifying
> the controls for which you need the resize.  You can
> do something like this ..
>
> if (EventEnum !=
> SAPbouiCOM.BoEventTypes.et_FORM_ACTIVATE & EventEnum
> != SAPbouiCOM.BoEventTypes.et_FORM_LOAD)
>                {
> SAPbouiCOM.Form oCurrentForm =
> SBO_Application.Forms.Item(FormUID);
> if (EventEnum == BoEventTypes.et_FORM_RESIZE)
> {
> try
> {
>      switch (FormUID)
>      {
>           case "PLB":
> oCurrentForm.Items.Item("PLB").Left =
> t = oCurrentForm.Items.Item("10000330").Left -
> oCurrentForm.Items.Item("PLB").Width - 3;
> oCurrentForm.Items.Item("PLB").Top =
> p = oCurrentForm.Items.Item("10000330").Top;
>                break;
>           case "PSOB":
> oCurrentForm.Items.Item("PSOB").Left =
> t = oCurrentForm.Items.Item("PLB").Left -
> oCurrentForm.Items.Item("PSOB").Width - 3;
> oCurrentForm.Items.Item("PSOB").Top =
> p = oCurrentForm.Items.Item("PLB").Top;
>                break;
>           }
> }
> catch { }
> }
> }
>
> The idea is to try to delimit the times the Resize
> event is detected.  Also try using the
> <b>oForm.Freeze = true</b> at the beginning and
> <b>oForm.Freeze = false</b> when done setting the
>  controls.  This should take care of the flickering.
Sorry but it never get into any one of those 2 case.
All I see is "F_12" or "F_13" when I debug at the switch line