Access ADP Application Title Change @ Runtime

[roccorocks]

Does anyone have a way to do this? Does not seem to be available through the "Application" properties. Appreciate any help on this.

thanks,

Rocco

 

[Ed2020]

The following API should do the job (if I;ve understood your requirements correctly):

'API declaration
Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal dpString As String) As Long

'Run API call and alter application title
Public Sub adhSetAppTitleAPI(strText As String)

Call SetWindowText(Application.hWndAccessApp, strText)

End Sub

Ed Metcalfe.

Please do not feed the trolls.....

 

[payback]

Using VBA called from your autoexec macro or elsewhere -

    CurrentProject.Properties.Add "AppTitle", MYNAMEGOESHERE
    Application.RefreshTitleBar