how can I customize the print preview buttonbar by placing large buttons?
is there an example?
TPreview():bButtonBar := { |oPreview, oWnd| <yourbuttonbarfunc( oPreview, oWnd) }
Function MyButtonBarPreview( oPreview, oWnd)
local oBar
DEFINE BUTTONBAR oBar OF oWnd SIZE 64, 64
return nil
oPreview:oBar := oBar
function MyBar( oPrev, oWnd )
local oBar
DEFINE BUTTONBAR oBar OF oWnd SIZE 64,64 2007
DEFINE BUTTON OF oBar PROMPT "BTN" CENTER
oPrev:oBar := oBar
return nil
nageswaragunupudi wrote:Function MyButtonBarPreview( oPreview, oWnd)
local oBar
DEFINE BUTTONBAR oBar OF oWnd SIZE 64, 64
return nil
Please add the line
- Code: Select all Expand view RUN
oPreview:oBar := oBar
at the end of this function.
Example code:
- Code: Select all Expand view RUN
function MyBar( oPrev, oWnd )
local oBar
DEFINE BUTTONBAR oBar OF oWnd SIZE 64,64 2007
DEFINE BUTTON OF oBar PROMPT "BTN" CENTER
oPrev:oBar := oBar
return nil
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 78 guests