This is one of those things that hard to look up just because you get so many hits on other subjects.
anybody know how to change the AutoCAD header/title at the top left?
thanks!
This is one of those things that hard to look up just because you get so many hits on other subjects.
anybody know how to change the AutoCAD header/title at the top left?
thanks!
Look at MODEMACRO in Help.
John B
"With or without religion, you would have good people doing good things and evil people doing evil things. But for good people to do evil things, that takes religion." - Steven Weinberg.
JTB_TitleBar.lsp
www.jtbworld.com
Thanks for the replies!
ModeMacro changes the status line (in the old days it changed the titlebar). From what I have seen on the documentation you can't use it to change the titlebar anymore. Am I wrong?
JTB-Titlebar-
I'm giving this one some serious thought! I'm a little weary of using it because it's copy righted and I can't get into the DVB file (passworded). and when it's potentially being loaded coporate wide that's not really a good thing.
Thanks!
I only briefly looked at JTB_TitleBar on the website so I may be missing something.
Why do you want to modify the DVB file?
It appears the LSP file controls what is displayed in the title bar.
Jeff Paulsen
Jeff,
mainly it's just a matter of paranoia. I'll be releasing the code to hundreds of CAD users on a corporate level. I just don't want to let an unknown (DVB contents) get out there. Coming from a freeware source I'm a little more weary than I would be if it came from a known trusted source.
Beyond that... I'm just a curious cat... I want to know how they did it! LOL
Thanks!
i totally understand what you are saying, but if it makes you feel any better, Autodesk has commissioned Jim Bergmark to code for them before.
I got this off of another forum. Simple code... works great!
Private Declare Function SetWindowText Lib "user32" _
Alias "SetWindowTextA" (ByVal hWnd As Long, ByVal lpString As String) As Long
Sub main()
AppHwnd = Application.hWnd
SetWindowText AppHwnd, "This is a test" & Chr(0)
End Sub
Thanks for the replies!
Robert