Title Bar???

[Gush]

I'm using this code to maximize the Microsoft Access window:

    cn = "OMain"
    wn = "Microsoft Access"
    Dim w As Long
    
    w = FindWindow(ByVal cn, ByVal wn)
    ShowWindow w, SW_SHOWMAXIMIZED

It's working fine.

Now I want (if can be done) to hide microsoft access's title bar.

Can we do that?

[Gush]

People please I need this urgent, can it or can it not be done?

[Nucleus]

I think this is what you want. In access set the border style to none for the form you want to hide the title bar of.

[Gush]

Nope,

I need to hide the title bar of the whole Microsoft Access Application.


Thank you very much.

[PsychoMark]

http://www.vbaccelerator.com/tips/vba0016.htm

This sample uses the Form's hWnd, but it can easily be replaced by Access's hWnd. Should work...

[Nucleus]

In the absence of an alternative suggestion, you can always change the title from Access to your own custom title like so:

Function ChangeProperty(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
    Dim dbs As Object, prp As Variant
    Const conPropNotFoundError = 3270

    Set dbs = CurrentDb
    On Error GoTo Change_Err
    dbs.Properties(strPropName) = varPropValue
    ChangeProperty = True

Change_Bye:
    Exit Function

Change_Err:
    If Err = conPropNotFoundError Then    ' Property Not found.
        Set prp = dbs.CreateProperty(strPropName, _
            varPropType, varPropValue)
        dbs.Properties.Append prp
        Resume Next
    Else
        ' Unknown error.
        MsgBox "Change Property Error: " & Err.Number & ": " & Err.Description
        ChangeProperty = False
        Resume Change_Bye
    End If
End Function

Used to change application's title:

ChangeProperty "AppTitle", dbText, "I hope your app has a cool title To put here" 'custom title

[Gush]

thank you very much, I got the code.

[Nucleus]

Gush, did you get some code that works to remove the titlebar from access?

[Gush]

I tried the code from
http://www.vbaccelerator.com/tips/vba0016.htm
and it worked on a visual basic form, but not on Access,
any other suggestions would be appreciated.


Thank you all for your replies.



Gush.