Results 1 to 3 of 3

Thread: cWebModalDialog Size

Threaded View

Previous Post Previous Post   Next Post Next Post
  1. #3
    Join Date
    Feb 2009
    Perth, Western Australia

    Default Re: cWebModalDialog Size

    Hi Harm

    That will do what I want, thank you. We'll see what problems and browser compatibility issues I find in testing now.

    This is what I came up with, much simpler than playing with the CSS.

        // OnResizeWindow:
        Set pbServerOnResizeWindow To True
        Procedure OnResizeWindow Integer iWindowWidth Integer iWindowHeight
            Integer iMode iWidth iHeight
            WebGet peMode Of ghoWebApp To iMode
            If (iMode = rmDesktop) Begin
                Get piWidth To iWidth
                Get piHeight To iHeight
                WebSet piWidth To iWidth
                WebSet piHeight To iHeight
                WebSet piLeft To (Integer((iWindowWidth - iWidth) / 2) - 20)
                WebSet piTop To (Integer((iWindowHeight - iHeight) / 2) - 30)
            Else Begin
                WebSet piTop To 0
                WebSet piLeft To 0
                WebSet piWidth To (iWindowWidth - 35)
                WebSet piHeight To (iWindowHeight - 75)
        End_Procedure // OnResizeWindow
    So on the desktop the dialog will display as normal, whilst on mobile and tablet it displays as fullscreen.

    This is done using the desktop framework not drill down.
    Last edited by Tom Murphy; 26-Nov-2020 at 10:12 PM.

    Thomas Murphy
    Triumph Business Systems Pty Ltd

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts