At 11:36 AM 06/21/1999 -0500, Gerald Kornelsen wrote:
>I should learn to collect ALL my thoughts before rushing off an e-mail.
>
>You can also force the browser font in a workspace by adding/editing the
>following lines.
>
>Browse * From mytable
> Position (0.260417,0.291667) Units "in"
> Width 7.51042 Units "in" Height 4.89583 Units "in"
>Set Window Frontwindow() Font ("Arial",0,7,0)
That's true, but here's a way to get ANY browser to a specified font and
size, even newly created ones on-the-fly. This code was provided by Andrew
Dressel:
Steve Wallace
GIS & Market Information Manager
Florida Farm Bureau Insurance Companies
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Until we can make a more permanent fix, you can save your eyes by
adding a line to your startup.wor to run this application:
'--------------------------------------------------------
Include "mapbasic.def"
Declare Sub Main
Declare sub WinFocusChangedHandler
Sub Main
'do nothing
End Sub
Sub WinFocusChangedHandler
If WindowInfo(CommandInfo(CMD_INFO_WIN),WIN_INFO_TYPE) = WIN_BROWSER
Then
Set Window FrontWindow() Font("MS Sans Serif",0,9,0)
End If
End Sub
'---------------------------------------------------------
If you save this MapBasic program as FixBrowserFont.MB then
the line you need in startup.wor would be
Run Application "FixBrowserFont.MBX"
Steve Wallace
GIS & Market Information Manager
Florida Farm Bureau Insurance Companies
----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
