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
    Location
    Perth, Western Australia
    Posts
    836

    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.

    Code:
        // 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)
            End
            Else Begin
                WebSet piTop To 0
                WebSet piLeft To 0
                WebSet piWidth To (iWindowWidth - 35)
                WebSet piHeight To (iWindowHeight - 75)
            End
        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.
    Cheers,

    Thomas Murphy
    Triumph Business Systems Pty Ltd
    www.triumph.com.au

Posting Permissions

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