fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2011-04-16 09:30 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbxbp/xbpfontdialog.prg
    ! Minor.

  * contrib/hbxbp/xbpwindow.prg
    ! Protected: :setStyleSheet() method. 
      It was not Xbase++ compatible so to achieve exactly Xbase++
      compatibility, this is necessary.
This commit is contained in:
Pritpal Bedi
2011-04-16 16:33:32 +00:00
parent 19063f43de
commit 678e4d7e3e
3 changed files with 14 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/ChangeLog
View File

@@ -16,6 +16,15 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-04-16 09:30 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbxbp/xbpfontdialog.prg
! Minor.
* contrib/hbxbp/xbpwindow.prg
! Protected: :setStyleSheet() method.
It was not Xbase++ compatible so to achieve exactly Xbase++
compatibility, this is necessary.
2011-04-16 16:53 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+ contrib/hbqt/tests/testres.hbp
+ Added project file for testres.

2
harbour/contrib/hbxbp/xbpfontdialog.prg
View File

@@ -332,7 +332,7 @@ METHOD XbpFontDialog:XbpFontObject()
oXbp:nominalPointSize := ::oFont:pointSize()
oXbp:weightClass := ::oFont:weight()
oXbp:setCompoundName( hb_ntos( oXbp:nominalPointSize ) + "." + oXbp:familyName )
oXbp:setCompoundName( trim( hb_ntos( oXbp:nominalPointSize ) + "." + oXbp:familyName + " " + iif( oXbp:bold, "bold", "" ) + iif( oXbp:italic, "italic", "" ) ) )
oXbp:create()

6
harbour/contrib/hbxbp/xbpwindow.prg
View File

@@ -189,8 +189,6 @@ CLASS XbpWindow INHERIT XbpPartHandler
METHOD isDerivedFrom( cClassORoObject )
METHOD setPresParam( aPPNew )
METHOD setCSSAttribute( cAttr, cCSS )
METHOD setStyleSheet( cAttr, cCSS )
METHOD getCSS( nAttr, xValue )
DATA cTitle INIT ""
METHOD title( cTitle ) SETGET
@@ -270,6 +268,10 @@ CLASS XbpWindow INHERIT XbpPartHandler
ACCESS pParent INLINE iif( empty( ::oParent ), NIL, ::oParent:oWidget )
PROTECTED:
METHOD setStyleSheet( cAttr, cCSS )
METHOD getCSS( nAttr, xValue )
ENDCLASS
/*----------------------------------------------------------------------*/