FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Changing Main Window Title
Posts: 233
Joined: Sat Dec 30, 2006 06:10 AM
Changing Main Window Title
Posted: Wed Feb 29, 2012 03:10 AM
I define the main window of my app as follows:

Code (fw): Select all Collapse
DEFINE WINDOW Win_Main FROM 0, 0 TO 600, 800 PIXEL TITLE 'Application name' MDI ICON oIcon MENU mainmenu()
...
...
ACTIVATE WINDOW Win_Main ON INIT login() VALID lExitAllowed


The user then logs in and I have a variable: cUsername

I would now like to change the Win_main Title to cUsername + ' Application name'

I've tried this after the login:

hMainWnd := Win_Main:hWnd
SetProp( hMainWnd, "Title", cUsername + ' Application name')
Win_Main:Refresh()

And it gives an error.

Thanks in advance.

Ollie.
Many thanks

Ollie.



Using:

xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)

Borland C++ 5.5.1

FWH 9.04 (2009 Apr)
Posts: 1335
Joined: Fri Jun 13, 2008 11:04 AM
Re: Changing Main Window Title
Posted: Wed Feb 29, 2012 04:15 AM
Did you try

Code (fw): Select all Collapse
WndMain():cTitle:="Changed the Title to FiveWin"


Here is a sample code

Code (fw): Select all Collapse
#Include "FiveWin.ch"
//---------------//
Function Main()

    Local oWnd
    
    DEFINE WINDOW oWnd FROM 0, 0 TO 600, 800 PIXEL TITLE 'Application name' MDI 
    
    ACTIVATE WINDOW oWnd ON INIT Login()

Return NIL

//-----------------//
Function Login()

    Local oWnd2,oBtn
    
    DEFINE WINDOW oWnd2 OF WndMain() MDICHILD TITLE "Login"
    
        @10,10 BUTTON oBtn PROMPT "Change Title" SIZE 150,50 ACTION ;
            ( WndMain():cTitle:="Changed the Title to FiveWin" )
          
    ACTIVATE WINDOW oWnd2

Return NIL


Regards
Anser
Posts: 233
Joined: Sat Dec 30, 2006 06:10 AM
Re: Changing Main Window Title
Posted: Wed Feb 29, 2012 04:41 AM

Perfect. Thanks. :D

Many thanks

Ollie.



Using:

xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)

Borland C++ 5.5.1

FWH 9.04 (2009 Apr)

Continue the discussion