Try this code to set the MapInfo Pro Program name in a win32 app
Declare function GetActiveWindow32 Lib "User32" Alias "GetActiveWindow" ()
as Integer
Declare Sub SetWindowText32 Lib "User32" Alias "SetWindowTextA" (ByVal
hWnd as Integer, ByVal Str as string)
Dim Win32 As Integer
'set the program name
Win32 = GetActiveWindow32()
Call SetWindowText32(Win32,"NEW PROGRAM NAME")
Brad Judson
At 09:41 PM 10/12/99 +0100, you wrote:
>Hello Spencer
>
>> Is there a way, using MapBasic, to change the title that appears at the
>top
>> of the MI window from 'MapInfo Professional' to 'My Application'?
>
>Within MapInfo Pro, it is only possible with the runtime edition. The MB
>command "set window title ..." doesn't work on full MI Pro. The sneaky
>approach is to use the Windows API, specifically the SetWindowText(HWND,
>char*) function. MapInfo's HWND is obtained through a call to
>SystemInfo(SYS_INFO_APPLICATIONWND). I've always wrapped the title set
>function up in a DLL but I am sure you can access it directly from MB with a
>suitable external function declaration.
>
>Regards,
>Warren Vick
>Europa Technologies Ltd, U.K.
>http://www.europa-tech.com
>
>----------------------------------------------------------------------
>To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
>"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
>
GeoInfo Solutions Ltd.
mailto:[EMAIL PROTECTED]
http://www.geoinfosolutions.com
phone/fax 250-656-7170
----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
