formlib.fullscreen(false) doesn't work

Discussion in 'Code Samples & Tips' started by Byak@, Aug 13, 2008.

  1. Byak@

    Byak@ Active Member Licensed User

    Code:
    Sub Globals
    f=
    0
    End Sub

    Sub App_Start
    flib.New1(
    "form1",B4PObject(1))
     Form1.show
    End Sub

    Sub Button1_Click
    If f=0 Then
    flib.FullScreen(
    true)
    f=
    1
    Else
    flib.FullScreen(
    false)
    End If
    End Sub
    flib.FullScreen(false) doesn't return titles...why?
     
  2. Erel

    Erel Administrator Staff Member Licensed User

    FormLib.FullScreen is a one way function.
    You will need to use the Door library to return the title bar or menu:
    Code:
    'obj and obj2 are Objects (from the door library)
    Sub Globals
        
    'Declare the global variables here.

    End Sub

    Sub App_Start
        Form1.Show
        flb.New1(
    "form1",B4PObject(1))
        obj.New1(
    false)
        obj2.New1(
    false)
        obj2.FromControl(
    "form1")
        obj2.Value = obj2.GetProperty(
    "Menu")

        flb.FullScreen(
    true)
    End Sub

    Sub ReturnTitle
        obj.FromControl(
    "form1")
        obj.SetProperty(
    "MaximizeBox",true)
        obj.SetProperty(
    "ControlBox",true)
        obj.SetProperty(
    "FormBorderStyle","Sizable")
        obj.SetProperty(
    "WindowState","Normal")
    End Sub

    Sub ReturnMenu
        obj.FromControl(
    "form1")
        obj.SetProperty2(
    "Menu",obj2.Value)
    End Sub
     
  3. Byak@

    Byak@ Active Member Licensed User

    thanks Erel
     
  4. Cableguy

    Cableguy Expert Licensed User

    @Erel

    Issues like this, should be placed in a "closed" forum, like "Known limitations", because every once in a while, someone atrts up a thread like this one, without first searching the forum....
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice