Add this script to the Other event. When the WM_ENTERSIZEMOVE event fires, it'll end up in Other, get processed by the If, and you can add whatever script you need in there to close the DDLB.



The value for WM_ENTERSIZEMOVE is 561, so the code will look like this:





// Window - other event

// This traps the event WM_ENTERSIZEMOVE as sent by Windows. It trips as soon as you click to move/resize the window

if message.number = 561 then // capture event - Begin Size/Move

// close the DDLB here (either direct, or call a function or trigger an event)

end if

That was exactly what I needed Brad, thank you so much.  It's just too bad that I wasn't a little more clever as your original reply had basically the same information in it and I wasn't clever enough to put it all together.  Regardless, I now have it working very well, and greatly appreciate the input from you and Olin.  I will post what I put together as a reply to Olin's e-mail above.



Once again, thank you very much Brad,

Aubrey

Well Brad, with lots of help, I have come up with a solution that seems to work quite well.  I'll post it here and if you feel it is worth publishing somewhere, and don't mind doing it, please feel free to do that.  I'm not sure I would be comfortable being referenced as the creator however.  You provided me with the original idea of how to approach this.  I then found the F4 Up Key logic in a PBDJ article.  And then Brad added the third part of the solution allowing me to trap the proper window messages.  So it seems to me that the creator is the PowerBuilder community, particularly those of you who are always helping others resolve their issues!  And I thank you all for that.



That being said, below is the solution I have put together.  I would be very happy to hear if there are any issues/improvements with implementing this code that I have not thought of.  And as usual, it could be modified to include other messages where appropriate.  All of the changes are made within the MDI Frame object.  Here we go (The solution was edited September 26, 2017 at 08:40 Pacific to simplify it:



Global Function:

SUBROUTINE keybd_event( int bVk, int bScan, int dwFlags, int dwExtraInfo) LIBRARY "user32.dll"



Instance Variables:

Constant    Integer    VK_F4    = 115  //  Constant used to send the F4 Up Key command



Other Event:



//  Trigger the appropriate user defined events when WM_ENTERSIZEMOVE is received

CHOOSE CASE message.number

    CASE 561

        TriggerEvent('ue_wm_EnterSizeMove', wparam, lparam)

   

End Choose



ue_wm_EnterSizeMove New Event



//  If focus is on a field in a datawindow that has an edit style of ddlb or dddw,

//  and if the ddlb/dddw is dropped down when the MDI frame is moved/resized,

//  the dropped down portion does not move with the MDI frame.



//  The F4 Key Up command collapses the droped down ddlb/dddw resolving this issue.



GraphicObject Which_Control



Window    ActiveSheet



DataWindow    dw_Which



String    ls_Column

String    ls_Style



//  Determine the Active Sheet.  If a sheet is not active, the ddlb/dddw issue doesn't exist,

//  so we do not need to do anything

ActiveSheet    = This.GetActiveSheet()



If IsValid(ActiveSheet) Then



    //  Issue the F4 Key Up, if appropriate.



    Which_Control = GetFocus()

    

    CHOOSE CASE TypeOf(Which_Control)

        CASE DataWindow!

        

            dw_Which        = Which_Control

            ls_Column    = dw_Which.GetColumnName()

            ls_Style        = dw_Which.Describe(ls_Column + ".Edit.Style")

            

            //  If the field with focus has an edit style of ddlb or dddw,

            //  issue the F4 Key Up to collapse the dropped down portin.

            If ls_Style = 'dddw' or ls_Style = 'ddlb' Then

                dw_Which.SetFocus()

                dw_Which.SetColumn(ls_Column)

            //    keybd_event( VK_F4,0,0,0 ) // F4 key down

                keybd_event( VK_F4,0,2,0 ) // F4 key up

            End If

        

    End Choose



End If