topic-1466

Posts: 76

Joined: Fri Dec 30, 2005 10:25 AM

Toolbar
Posted: Mon Jan 30, 2006 10:53 AM

I need a toolbar in a dialog. But it doesn't work (error-message: "cannot create window class TBAR").

Test4711() works
Test4712() doesn't work

why?

Code: Select all Collapse

*******************
FUNCTION Test4711()
*******************
LOCAL oWnd, oBar
DEFINE WINDOW oWnd TITLE "Test"
DEFINE BUTTONBAR oBar OF oWnd
ACTIVATE WINDOW oWnd VALID .T.
RETURN NIL

*******************
FUNCTION Test4712()
*******************
LOCAL oDlg, oBar
DEFINE DIALOG oDlg TITLE "Test"
DEFINE BUTTONBAR oBar OF oDlg
ACTIVATE DIALOG oDlg VALID .T.
RETURN NIL

Frank-Peter

Enrico Maria Giordano

Posts: 9022

Joined: Thu Oct 06, 2005 08:17 PM

Re: Toolbar
Posted: Mon Jan 30, 2006 11:20 AM

Try to activate the toolbar during the ON INIT event of the DIALOG.

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

fp

Posts: 76

Joined: Fri Dec 30, 2005 10:25 AM

Re: Toolbar
Posted: Mon Jan 30, 2006 11:55 AM

Hello EnricoMaria,

thanks, it works now:

Code: Select all Collapse

*******************
FUNCTION Test4713()
*******************
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "Test"
ACTIVATE WINDOW oWnd VALID .T. ON INIT OnInitUdf(oWnd)
RETURN NIL


*******************
FUNCTION Test4714()
*******************
LOCAL oDlg
DEFINE DIALOG oDlg TITLE "Test"
ACTIVATE DIALOG oDlg VALID .T. ON INIT OnInitUdf(oDlg)
RETURN NIL



****************************
STATIC FUNCTION OnInitUdf(o)
****************************
LOCAL oBar
DEFINE BUTTONBAR oBar OF o
RETURN .T.

Frank-Peter

FiveTech Support Forums

Continue the discussion