FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour COMBOBOX HEIGHTGET is not working? *Solved*
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

COMBOBOX HEIGHTGET is not working? *Solved*

Posted: Mon May 18, 2020 01:00 PM

I use REDEFINE COMBOBOX from resource but HEIGHTGET is not working, nothing change.

Thanks in advance,

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
nageswaragunupudi
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Tue May 19, 2020 01:08 AM

Please try increasing height in the rc file.

Regards



G. N. Rao.

Hyderabad, India
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Tue May 19, 2020 01:24 AM
Dear Master,
I got it. Thank you.
nageswaragunupudi wrote:Please try increasing height in the rc file.
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Tue May 19, 2020 06:11 AM
How to change HEIGHTGET in RC file?

Code (fw): Select all Collapse
  CONTROL "", 102, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 73, 23, 27, 81

nageswaragunupudi wrote:Please try increasing height in the rc file.
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Tue May 19, 2020 09:08 PM
not work
Code (fw): Select all Collapse
   REDEFINE COMBOBOX nEstado ;
      ID 109 OF oDlgPE ;
      ITEMS aEstados ;
      HEIGHTGET 24 ;
      WHEN !Empty( cNomProy ) ;
      ON CHANGE ( IIf( nEstado == 1, ( cPermisoCierre := Space( 20 ), dFechaCierre := CToD( "" ), oDlgPE:Update() ), NIL ) )


work ok.
Code (fw): Select all Collapse
   REDEFINE COMBOBOX nEstado ;
      ID 109 OF oDlgPE ;
      ITEMS aEstados ;
      WHEN !Empty( cNomProy ) ;
      ON CHANGE ( IIf( nEstado == 1, ( cPermisoCierre := Space( 20 ), dFechaCierre := CToD( "" ), oDlgPE:Update() ), NIL ) );
      HEIGHTGET 24


look the pos of keyword HEIGHTGET
#xcommand REDEFINE COMBOBOX [ <oCbx> VAR ] <cVar> ;
[ <items: PROMPTS, ITEMS> <aItems> ] ;
[ ID <nId> ] ;
[ <dlg:OF,WINDOW,DIALOG> <oWnd> ] ;
[ <help:HELPID, HELP ID> <nHelpId> ] ;
[ ON CHANGE <uChange> ] ;
[ VALID <uValid> ] ;
[ <color: COLOR,COLORS> <nClrText> [,<nClrBack>] ] ;
[ <update: UPDATE> ] ;
[ MESSAGE <cMsg> ] ;
[ WHEN <uWhen> ] ;
[ BITMAPS <acBitmaps> ] ;
[ ON DRAWITEM <uBmpSelect> ] ;
[ STYLE <nStyle> ] ;
[ <pict: PICT, PICTURE> <cPicture> ];
[ ON EDIT CHANGE <uEChange> ] ;
[ HEIGHTGET <nHGet> ] ;
[ SELHEIGHT <nSelHt> ] ;
[ ITEMHEIGHT <nItmHt> ] ;
[ <lw: LISTWIDTH, DROPWIDTH> <nDropW> ] ;
[ DIRECTORY <cDir> [ATTRIB <attr>] [SAYDIR <oSayDir> ] ] ;
[ OWNERDRAW <uOwnerDraw> ];
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Wed May 20, 2020 02:51 AM
Dear Carlos,

Thank you for your reply and I try as your suggestion as below but it doesn't change anything.

Code (fw): Select all Collapse
   REDEFINE COMBOBOX oGet[2] VAR oDbf:TCG_SECNO ITEMS MEMVAR->aStn  ID 102 OF oDlg ;
            WHEN !lFlr ;
            ON CHANGE (MsgWait('test',,1)) ;
            HEIGHTGET 50


Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
nageswaragunupudi
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Wed May 20, 2020 04:40 AM
I use REDEFINE COMBOBOX from resource but HEIGHTGET is not working, nothing change.


Do not use HEIGHTGET

Use
Code (fw): Select all Collapse
........
SELHEIGHT 50 ;
.........


Alternatively, you can also do

Code (fw): Select all Collapse
ACTIVATE DIALOG oDlg ON INIT oCbx:nSelectionHeight := <nNewHeight>
Regards



G. N. Rao.

Hyderabad, India
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

Re: COMBOBOX HEIGHTGET is not working?

Posted: Wed May 20, 2020 08:46 AM
Dear Mst Rao,

SELHEITHGT is not working.
nageswaragunupudi wrote:
Do not use HEIGHTGET
Use
Code (fw): Select all Collapse
........
SELHEIGHT 50 ;
.........


Alternatively, you can also do

Code (fw): Select all Collapse
ACTIVATE DIALOG oDlg ON INIT oCbx:nSelectionHeight := <nNewHeight>


This one is working well.


Thank you so much.
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Silvio.Falconi
Posts: 7318
Joined: Thu Oct 18, 2012 07:17 PM

Re: COMBOBOX HEIGHTGET is not working? *Solved*

Posted: Wed May 20, 2020 10:15 AM
NOT RUN OK ON RESOURCES

On my order I have

@ 2,5 COMBOBOX aGet[1] VAR nIcoElemento Items aElementiItems ;
BITMAPS aBmpCombo SIZE 50,90 PIXEL of oFolder:aDialogs[1];
ON CHANGE ( ncella:="", aGet[2]:refresh()) HEIGHTGET 66

and run ok

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
MOISES
Posts: 838
Joined: Wed Aug 22, 2007 10:09 AM

Re: COMBOBOX HEIGHTGET is not working? *Solved*

Posted: Wed May 20, 2020 01:48 PM

On resource, try

ACTIVATE DIALOG oDlg ON INIT oCbx:nSelectionHeight := <nNewHeight>

Saludos / Regards,



FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
nageswaragunupudi
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: COMBOBOX HEIGHTGET is not working? *Solved*

Posted: Wed May 20, 2020 01:48 PM
I did some tests with fwh\samples\combosb.prg using \fwh\samples\combosb.rc.
I found that both HEIGHTGET and SELHEIGHT are working with resources.

Please build and run \fwh\samples\combosb.prg without any changes.
This is what you see.



Now, add these clauses "HEIGHTGET 50" and "HEIGHTGET 30" to oCbx2 and oCbx3 respectively.
This is the code.
Code (fw): Select all Collapse
   REDEFINE COMBOBOX oCbx2 VAR cItem2 ITEMS { "One", "Two", "Three" } ;
      ID ID_DROPDOWN OF oDlg ;
      STYLE CBS_DROPDOWN ;
      HEIGHTGET 50 ;
      ON CHANGE ( cItem4 := cItem2, oSay:Refresh() ) ;
      VALID ( If( ! oCbx2:Find( oCbx2:oGet:GetText() ),;
                  oCbx2:Add( oCbx2:oGet:GetText() ),), .t. )

   REDEFINE COMBOBOX oCbx3 VAR cItem3 ITEMS { "One", "Two", "Three" } ;
      ID ID_DROPDOWNLIST OF oDlg ;
      HEIGHTGET 30 ;
      ON CHANGE ( cItem4 := cItem3, oSay:Refresh() ) ;
      VALID ( cItem4 := cItem3, oSay:Refresh(), .t. )

This is what you see.


Now, change these clauses as "SELHEIGHT 30" and "SELHEIGHT 50" to oCbx2 and oCbx3 respectively.
This is the code
Code (fw): Select all Collapse
   REDEFINE COMBOBOX oCbx2 VAR cItem2 ITEMS { "One", "Two", "Three" } ;
      ID ID_DROPDOWN OF oDlg ;
      STYLE CBS_DROPDOWN ;
      SELHEIGHT 30 ;
      ON CHANGE ( cItem4 := cItem2, oSay:Refresh() ) ;
      VALID ( If( ! oCbx2:Find( oCbx2:oGet:GetText() ),;
                  oCbx2:Add( oCbx2:oGet:GetText() ),), .t. )

   REDEFINE COMBOBOX oCbx3 VAR cItem3 ITEMS { "One", "Two", "Three" } ;
      ID ID_DROPDOWNLIST OF oDlg ;
      SELHEIGHT 50 ;
      ON CHANGE ( cItem4 := cItem3, oSay:Refresh() ) ;
      VALID ( cItem4 := cItem3, oSay:Refresh(), .t. )

This is what you see.


These tests show that both HEIGHTGET and SELHEIGHT work with resources too.
First test these changes in \fwh\samples\combosb.prg.
After that, if in your program these clauses are not working, look for the differences this sample and your own sources.
Regards



G. N. Rao.

Hyderabad, India
dutch
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM

Re: COMBOBOX HEIGHTGET is not working? *Solved*

Posted: Thu May 21, 2020 02:15 PM

Dear Master Rao,

I found the problem of HEIGHTGET that does not work. It is RESIZE16 clause effect. It will be work, if no RESIZE16.

Thank you so much.
Dutch

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

Continue the discussion

Static archive · New replies & topics via GitHub Discussions