Problems in Class Window, Statusbar e Browse

Moderator: Rathinagiri

Post Reply
User avatar
pctoledo
Posts: 123
Joined: Wed Aug 25, 2010 10:45 am
Location: Araçatuba - SP - Brazil
Has thanked: 3 times
Been thanked: 7 times
Contact:

Problems in Class Window, Statusbar e Browse

Post by pctoledo » Thu Jul 21, 2011 6:17 pm

Friends, I am testing the HMG4, I noticed that some commands are with problems:

In Class Window:
:MinButton
:MaxButton
:Sizable
:Minimize
:Maximize
:Sizable (NoSize)

Samples 1:

Code: Select all

FUNCTION Main

   LOCAL oWindow

   HbQt_ErrorSys()

   WITH OBJECT oWindow := Window():New()
      :Row      := 10
      :Col      := 10
      :Width    := 400
      :Height   := 400
      :Title    := 'Nice OOP Demo!!!'
      :Type     := WND_MAIN
      :OnInit   := { || oWindow:Center() }
      :Minimize := .F.
   END WITH

   oWindow:Activate()

RETURN NIL
Image

Samples 2:

Code: Select all

FUNCTION Main

   LOCAL oWindow

   HbQt_ErrorSys()

   WITH OBJECT oWindow := Window():New()
      :Row      := 10
      :Col      := 10
      :Width    := 400
      :Height   := 400
      :Title    := 'Nice OOP Demo!!!'
      :Type     := WND_MAIN
      :OnInit   := { || oWindow:Center() }
      :Sizable  := .F.
   END WITH

   oWindow:Activate()

RETURN NIL
Image

In Class StatusBar:
:Width

Samples:

Code: Select all

FUNCTION Main

   HbQt_ErrorSys()

   DEFINE WINDOW Form_1              ;
      AT 0,0                         ;
      Width 600 Height 400           ;
      Title 'HMG StatusBar Demo'     ;
      Main                           ;
      Font 'Arial' Size 10           ;
      On Init { || Form_1.Center() }

      DEFINE STATUSBAR Font "Arial" Size 12
         StatusItem "Raised Clickable"  Width  500 RAISED ICON 'new.ico' ACTION MsgInfo( 'Click! 1' )
         StatusItem 'Flat Clickable!'   Width 100 FLAT   ICON 'car.ico' ACTION MsgInfo( 'Click! 2' )
      END STATUSBAR

   END WINDOW

   ACTIVATE WINDOW Form_1

RETURN NIL
Width 500 and Width 100

Image

In Class Browse:
Scrollbar color...

Samples compiled in 18/02/2011:
Image

Samples compiled in today:
Image
Regards/Saludos,

Toledo

Clipper On Line

User avatar
Rathinagiri
Posts: 5263
Joined: Tue Jul 29, 2008 6:30 pm
DBs Used: MariaDB, SQLite, SQLCipher and MySQL
Location: Sivakasi, India
Has thanked: 169 times
Been thanked: 172 times
Contact:

Post by Rathinagiri » Fri Jul 22, 2011 5:10 am

Thanks for reporting. I will check what happened.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.

mrduck
Posts: 497
Joined: Fri Sep 10, 2010 5:22 pm

Post by mrduck » Fri Jul 22, 2011 7:06 am

pctoledo wrote:Friends, I am testing the HMG4, I noticed that some commands are with problems:

In Class Window:
:MinButton
:MaxButton
:Sizable
:Minimize
:Maximize
:Sizable (NoSize)
Sizable method was not moved from window.prg to basic.prg, but Mauricio should have already commited the patch. I presume the other method have the same problem.
In Class Browse:
Scrollbar color...

Samples compiled in 18/02/2011:
Image

Samples compiled in today:
Image
I also noticed this problem.

User avatar
concentra
Posts: 256
Joined: Fri Nov 26, 2010 11:31 am
Location: Piracicaba - Brasil

Post by concentra » Fri Jul 22, 2011 11:44 am

mrduck wrote:Sizable method was not moved from window.prg to basic.prg, but Mauricio should have already commited the patch. I presume the other method have the same problem.
Correct. Will revise the others.
[[]] Mauricio Ventura Faria

User avatar
concentra
Posts: 256
Joined: Fri Nov 26, 2010 11:31 am
Location: Piracicaba - Brasil

Post by concentra » Fri Jul 22, 2011 11:53 am

Hi.
To me :Sizable is working properly with current SVN.
But :minimize and :maximize are present but aren't SETGET methods...
Were them in the past ?
[[]] Mauricio Ventura Faria

User avatar
concentra
Posts: 256
Joined: Fri Nov 26, 2010 11:31 am
Location: Piracicaba - Brasil

Post by concentra » Fri Jul 22, 2011 12:01 pm

mrduck wrote:
In Class Browse:
Scrollbar color...

Samples compiled in 18/02/2011:
Image

Samples compiled in today:
Image
I also noticed this problem.
Isn't this QT DLLs version related ?
[[]] Mauricio Ventura Faria

User avatar
concentra
Posts: 256
Joined: Fri Nov 26, 2010 11:31 am
Location: Piracicaba - Brasil

Post by concentra » Fri Jul 22, 2011 12:04 pm

pctoledo wrote::MinButton
:MaxButton
This is also working to me in the current SVN...
[[]] Mauricio Ventura Faria

User avatar
pctoledo
Posts: 123
Joined: Wed Aug 25, 2010 10:45 am
Location: Araçatuba - SP - Brazil
Has thanked: 3 times
Been thanked: 7 times
Contact:

Post by pctoledo » Fri Jul 22, 2011 1:50 pm

concentra wrote:To me :Sizable is working properly with current SVN.
concentra wrote:
pctoledo wrote::MinButton
:MaxButton
This is also working to me in the current SVN...
I updated HMG4 in the current SVN and are working.

thanks!
Regards/Saludos,

Toledo

Clipper On Line

User avatar
pctoledo
Posts: 123
Joined: Wed Aug 25, 2010 10:45 am
Location: Araçatuba - SP - Brazil
Has thanked: 3 times
Been thanked: 7 times
Contact:

Post by pctoledo » Sat Jul 23, 2011 11:37 am

Friends, take a test compiling c:\hmg.4\samples\frame\demo_1.prg:

All right!
Image

Including: Sizable: =. F. in the Class Window, all other objects (Frame, Label, Button, etc.) disappear.

Image
Regards/Saludos,

Toledo

Clipper On Line

User avatar
l3whmg
Posts: 694
Joined: Mon Feb 23, 2009 8:46 pm
Location: Italy
Contact:

Post by l3whmg » Sat Jul 23, 2011 1:47 pm

Hi, I'm thinking because within sizebale method you use ::oQtobject:layout().
Perhaps it's better to use:
::oQtObject:setMaximumWidth( nW )
::oQtObject:setMaximimHeight( nH )
::oQtObject:setMinimumWidth( nW )
::oQtObject:setMinimumHeight( nH )

where nW is current ::nWidth and nH is current ::nHeight (they must be setted)

On the other hand you have problem to disable: what are the initial MaximumWidth, MaximumHeight, MinimumWidth and MinimumHeight?
On QT docs they are: 16777215, 16777215, 0, 0; there is another way: good or not I don't know because I don't tested it.

Cheers
Luigi from Italy
www.L3W.it

Post Reply