FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour GET with ACTION Wrong!
Posts: 445
Joined: Thu Feb 21, 2008 11:58 AM
GET with ACTION Wrong!
Posted: Wed Aug 27, 2008 05:29 PM
I try to use the GET with ACTION clausule, but the right align still wrong

The value still behind the button! Very ugly!


Peace and lighting!

JĂșlio CĂ©sar M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Actions in Gets
Posted: Wed Aug 27, 2008 06:17 PM

Hello JC,

There was a topic in the forum < Button in Get problem >,
a few days ago, about this problem.

Regards
Uwe :lol:

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
GET with ACTION Wrong!
Posted: Wed Aug 27, 2008 06:44 PM

JĂșlio,

We are currently working on it, to solve that problem and also the horizontal scrolling issue.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 445
Joined: Thu Feb 21, 2008 11:58 AM
GET with ACTION Wrong!
Posted: Wed Aug 27, 2008 06:46 PM
Antonio Linares wrote:JĂșlio,

We are currently working on it, to solve that problem and also the horizontal scrolling issue.


Ok! Thanks for your answer!
Peace and lighting!

JĂșlio CĂ©sar M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9
Posts: 167
Joined: Thu Mar 22, 2007 11:24 AM
GET with ACTION Wrong!
Posted: Thu Sep 25, 2008 09:41 AM
Antonio Linares wrote:JĂșlio,

We are currently working on it, to solve that problem and also the horizontal scrolling issue.


Is it solved in 8.9 ?

Frank
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
GET with ACTION Wrong!
Posted: Thu Sep 25, 2008 10:00 AM

Frank,

No, not yet.

We plan to have it ready in a few days.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 24
Joined: Wed Oct 15, 2008 01:04 PM
GET with ACTION Wrong!
Posted: Wed Oct 15, 2008 04:26 PM

Has this problem been fixed in 8.10?

Thks.

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
GET with ACTION Wrong!
Posted: Wed Oct 15, 2008 05:23 PM

No, it has not been solved, though the source code is in 8.10.

Please review source\classes\tget.prg and look for WM_NCCALCSIZE

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 246
Joined: Sat Mar 03, 2007 08:42 PM
GET with ACTION Wrong!
Posted: Thu Oct 16, 2008 08:27 AM
Antonio Linares wrote:No, it has not been solved, though the source code is in 8.10.Please review source\classes\tget.prg and look for WM_NCCALCSIZE
I'm also waiting for this fix before I can use it :-)

Patrick
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
GET with ACTION Wrong!
Posted: Thu Oct 16, 2008 09:20 AM

Patrick,

The source code for it is in 8.10, but if we apply it the client area gets reduced and the button is not visible.

We are not sure yet if it can get visible, or if we have to place it out of the GET, not as a child control.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 24
Joined: Wed Oct 15, 2008 01:04 PM
GET with ACTION Wrong!
Posted: Fri Nov 07, 2008 09:07 AM

Hi Antonio:

Will you solve it in 8.11?

I have searched this feature for a long time. Waiting for it since I want to start a new project massively using this feature.

Thanks.

Posts: 445
Joined: Thu Feb 21, 2008 11:58 AM
GET with ACTION Wrong!
Posted: Fri Nov 07, 2008 12:19 PM
Antonio Linares wrote:Patrick,

The source code for it is in 8.10, but if we apply it the client area gets reduced and the button is not visible.

We are not sure yet if it can get visible, or if we have to place it out of the GET, not as a child control.


Antonio,

Maybe the button must be a child of the owner of "get"... painted beside him.
Will stay beautiful.
What you think about this?
Peace and lighting!

JĂșlio CĂ©sar M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
GET with ACTION Wrong!
Posted: Fri Nov 07, 2008 01:09 PM
This is a proposed solution by mcfox. We appreciate your feedback:

Modify these lines in Class TGet:
         case lAnd( GetWindowLong( ::hWnd, GWL_STYLE ), ES_RIGHT )
              SetTextAlign( ::hDC, TA_RIGHT )
              if ::lSpinner
                 ExtTextOut( ::hDC, 1, ::nWidth() - 7 - GetSysMetrics( SM_CYHSCROLL ),;  
                    { 0, 0, ::nHeight(), ::nWidth() }, GetWindowText( ::hWnd ) )
              else
                 ExtTextOut( ::hDC, 1, ::nWidth() - 7 ,;  
                    { 0, 0, ::nHeight(), ::nWidth() }, GetWindowText( ::hWnd ) )
              endif


with this if:
         case lAnd( GetWindowLong( ::hWnd, GWL_STYLE ), ES_RIGHT )
              SetTextAlign( ::hDC, TA_RIGHT )
              if ::lSpinner
                 ExtTextOut( ::hDC, 1, ::nWidth() - 7 - GetSysMetrics( SM_CYHSCROLL ),;  
                    { 0, 0, ::nHeight(), ::nWidth() }, GetWindowText( ::hWnd ) )
              else
              	 if ValType( ::bAction ) == "B"  // Agregar
                      ExtTextOut( ::hDC, 1, ::nWidth() - 7 - ::nHeight,;  //agregar
                    { 0, 0, ::nHeight(), ::nWidth() }, GetWindowText( ::hWnd )  ) //agregar
                 else  //agregar
	                 ExtTextOut( ::hDC, 1, ::nWidth() - 7 ,;  
                    { 0, 0, ::nHeight(), ::nWidth() }, GetWindowText( ::hWnd ) )
						endif //agregar               
              endif


Finally, in:
::SetMargins( 1, 1 )

Modify it to:
	 if ValType( ::bAction ) == "B" // new
	 	::SetMargins( 1, ::nHeight) //new
	 else //new
	 	 ::SetMargins( 1, 1 )
	 endif //new
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 445
Joined: Thu Feb 21, 2008 11:58 AM
GET with ACTION Wrong!
Posted: Wed Nov 12, 2008 06:56 PM

Antonio,

The solution of mcfox works very fine! Now, it's all ok!

Peace and lighting!

JĂșlio CĂ©sar M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9

Continue the discussion