HMG 3.0.44

HMG announcements; Latest HMG-related news, releases, fixes and updates.

Moderator: Rathinagiri

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

HMG 3.0.44

Post by Rathinagiri »

Hi all,

I am so happy to upload the new test version HMG 3.0.44.

It can be downloaded from site (37.51 MB)

Alternatively you can download from sourceforge.net too.

Code: Select all

- HMG 3.0.44 (Test) 2012/09/03 Changelog:
   - Fixed Portuguese language definitions (Thanks to Ronaldo (Chacal.GO))
   - New GridEx dynamic grid functionality and see the sample in HFCL samples directory. (Thanks to Claudio Soto)
      - GRID_ColumnCount         ---> Return the Number of Column on GRID
      - GRID_AddColumnEx         ---> Complement of Method:  AddColumn (nColIndex)
      - GRID_DeleteColumnEx      ---> Complement of Method:  DeleteColumn (nColIndex)
      - GRID_GetColumnControlsEx ---> Return Array with Controls of Column(nColIndex) ==> {cCAPTION, nWIDTH, nJUSTIFY, aCOLUMNCONTROL, bDYNAMICBACKCOLOR, bDYNAMICFORECOLOR, bCOLUMNWHEN, bCOLUMNVALID, bONHEADCLICK}
      - GRID_GetColumnControl    ---> Return specific Control of Column(nColIndex) ==> [cCAPTION, nWIDTH, nJUSTIFY, aCOLUMNCONTROL, bDYNAMICBACKCOLOR, bDYNAMICFORECOLOR, bCOLUMNWHEN, bCOLUMNVALID, bONHEADCLICK]
      - GRID_SetColumnControl    ---> Set specific Control of Column(nColIndex)    ==> [cCAPTION, nWIDTH, nJUSTIFY, aCOLUMNCONTROL, bDYNAMICBACKCOLOR, bDYNAMICFORECOLOR, bCOLUMNWHEN, bCOLUMNVALID, bONHEADCLICK]
      - GRID_GetColumnDisplayPos ---> Get the position of Column(nColIndex) in that display in the GRID
      - GRID_SetColumnDisplayPos ---> Set the position of Column(nColIndex) in that display in the GRID
      - GRID_GetColumnWidthDisplay -> Get the Width of Column(nColIndex) in that display in the GRID
      - GRID_SetBkImage          ---> Set background image in Grid
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.

User avatar
esgici
Posts: 4533
Joined: Wed Jul 30, 2008 9:17 pm
DBs Used: DBF
Location: iskenderun / Turkiye
Has thanked: 409 times
Been thanked: 116 times
Contact:

Post by esgici »

Thanks a lot to Rathi, Ronaldo and Claudio :)

Viva HMG ! :D

Regards / Saludos
Viva INTERNATIONAL HMG :D

User avatar
srvet_claudio
Posts: 2100
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Has thanked: 47 times
Been thanked: 209 times
Contact:

Post by srvet_claudio »

Thanks Rathi.
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil
Has thanked: 100 times
Been thanked: 182 times

Post by Pablo César »

Thanks to all for new release !

But what about FontColor and button - is it possible to change?
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein

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

Post by Rathinagiri »

Sorry, I will add it in the ensuing version.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.

User avatar
danielmaximiliano
Posts: 2350
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 414 times
Been thanked: 80 times
Contact:

Post by danielmaximiliano »

Gracias a todos por hacer posible que HMG siga creciendo.

Thank you all for making it possible HMG continues to grow.
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil
Has thanked: 100 times
Been thanked: 182 times

Post by Pablo César »

rathinagiri wrote:Sorry, I will add it in the ensuing version.
Tahnk you, my friend !
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein

User avatar
IMATECH
Posts: 179
Joined: Sun May 27, 2012 9:33 pm
Location: Brazil: Goiânia-GO.
Has thanked: 9 times
Been thanked: 3 times

Post by IMATECH »

Hi Rathi ! :)


Thanks for this release, thanks to all contributors too...


Then I invite all user to help in HMG messages/translations using new Harbour features...

To do:
SPANISH
ENGLISH
FRENCH
PORTUGUESE -> Fixed
GERMAN
RUSSIAN
ITALIAN
POLISH
BASQUE
CROATIAN
SLOVENIAN
CZECH
FINNISH
DUTCH
See a sample at:
viewtopic.php?p=21498#p21498
M., Ronaldo

By: IMATECH

Imation Tecnologia

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

Post by Rathinagiri »

Hi Ronaldo,

Can you show me where can I find the proper language codes?
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.

User avatar
IMATECH
Posts: 179
Joined: Sun May 27, 2012 9:33 pm
Location: Brazil: Goiânia-GO.
Has thanked: 9 times
Been thanked: 3 times

Post by IMATECH »

Hi Rathi !


Of course: \HB32\src\codepage\*.*


After Set Local language/CodePage, Just call: Set ( _SET_LANGUAGE )


Below new contents for i_lang.ch

i_lang.ch

Code: Select all


// *---------------------------------------------------------------------------*
// SET LANGUAGE
// *---------------------------------------------------------------------------*
#translate SET LANGUAGE TO BASQUE      => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_EU    ; HB_LANGSELECT( hb_UserLang(), "DE850" ) ; InitMessages() // eu.DE850
#translate SET LANGUAGE TO BULGARIAN   => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_BG866 ; HB_LANGSELECT( hb_UserLang(), "BG866" ) ; InitMessages() // bg.BG866
#translate SET LANGUAGE TO CROATIAN    => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_HR852 ; HB_LANGSELECT( hb_UserLang(), "HR852" ) ; InitMessages() // hr.HR852
#translate SET LANGUAGE TO CZECH       => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_CS852 ; HB_LANGSELECT( hb_UserLang(), "CS852" ) ; InitMessages() // cs.CS852
#translate SET LANGUAGE TO DUTCH       => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_NL    ; HB_LANGSELECT( hb_UserLang(), "NL850" ) ; InitMessages() // nl.NL850
#translate SET LANGUAGE TO ENGLISH     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_EN    ; HB_LANGSELECT( hb_UserLang(), "EN" )    ; InitMessages() // en.EN
#translate SET LANGUAGE TO FINNISH     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_EN    ; HB_LANGSELECT( hb_UserLang(), "FI850" ) ; InitMessages() // en.FI850
#translate SET LANGUAGE TO FRENCH      => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_FR    ; HB_LANGSELECT( hb_UserLang(), "FR850" ) ; InitMessages() // fr.FR850
#translate SET LANGUAGE TO GERMAN      => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_DEWIN ; HB_LANGSELECT( hb_UserLang(), "DEWIN" ) ; InitMessages() // de.DEWIN
#translate SET LANGUAGE TO GREEK       => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_ELWIN ; HB_LANGSELECT( hb_UserLang(), "ELWIN" ) ; InitMessages() // el.ELWIN
#translate SET LANGUAGE TO HUNGARIAN   => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_HU852 ; HB_LANGSELECT( hb_UserLang(), "HU852" ) ; InitMessages() // hu.HU852
#translate SET LANGUAGE TO ITALIAN     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_IT    ; HB_LANGSELECT( hb_UserLang(), "IT850" ) ; InitMessages() // it.IT850
#translate SET LANGUAGE TO POLISH      => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_PLWIN ; HB_LANGSELECT( hb_UserLang(), "PLWIN" ) ; InitMessages() // pl.PLWIN
#translate SET LANGUAGE TO PORTUGUESE  => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_PT    ; HB_LANGSELECT( hb_UserLang(), "PT850" ) ; InitMessages() // pt.PT850
#translate SET LANGUAGE TO RUSSIAN     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_RU    ; HB_LANGSELECT( hb_UserLang(), "RU1251") ; InitMessages() // ru.RU125
#translate SET LANGUAGE TO SERBIAN     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_SRWIN ; HB_LANGSELECT( hb_UserLang(), "SRWIN" ) ; InitMessages() // sr_cyr.SRWIN
#translate SET LANGUAGE TO SLOVENIAN   => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_SLWIN ; HB_LANGSELECT( hb_UserLang(), "SLWIN" ) ; InitMessages() // sl.SLWIN
#translate SET LANGUAGE TO SPANISH     => _HMG_SYSDATA \[ 211 \] := '  ' ; REQUEST HB_LANG_ES    ; HB_LANGSELECT( hb_UserLang(), "ESWIN" ) ; InitMessages() // es.ESWIN

// *---------------------------------------------------------------------------*
// SET CODEPAGE
// *---------------------------------------------------------------------------*
#translate SET CODEPAGE TO BASQUE      =>  REQUEST HB_CODEPAGE_EN    ;  HB_CDPSELECT("EN")
#translate SET CODEPAGE TO BULGARIAN   =>  REQUEST HB_CODEPAGE_BG866 ;  HB_CDPSELECT("BG866")
#translate SET CODEPAGE TO CROATIAN    =>  REQUEST HB_CODEPAGE_HR852 ;  HB_CDPSELECT("HR852")
#translate SET CODEPAGE TO CZECH       =>  REQUEST HB_CODEPAGE_CS852 ;  HB_CDPSELECT("CS852")
#translate SET CODEPAGE TO DUTCH       =>  REQUEST HB_CODEPAGE_NL850 ;  HB_CDPSELECT("NL850")
#translate SET CODEPAGE TO ENGLISH     =>  REQUEST HB_CODEPAGE_EN    ;  HB_CDPSELECT("EN")
#translate SET CODEPAGE TO FINNISH     =>  REQUEST HB_CODEPAGE_FI850 ;  HB_CDPSELECT("FI850")
#translate SET CODEPAGE TO FRENCH      =>  REQUEST HB_CODEPAGE_FR850 ;  HB_CDPSELECT("FR850")
#translate SET CODEPAGE TO GERMAN      =>  REQUEST HB_CODEPAGE_DEWIN ;  HB_CDPSELECT("DEWIN")
#translate SET CODEPAGE TO GREEK       =>  REQUEST HB_CODEPAGE_EL437 ;  HB_CDPSELECT("EL437")
#translate SET CODEPAGE TO HUNGARIAN   =>  REQUEST HB_CODEPAGE_HU852 ;  HB_CDPSELECT("HU852")
#translate SET CODEPAGE TO ITALIAN     =>  REQUEST HB_CODEPAGE_IT850 ;  HB_CDPSELECT("IT850")
#translate SET CODEPAGE TO POLISH      =>  REQUEST HB_CODEPAGE_PLWIN ;  HB_CDPSELECT("PLWIN")
#translate SET CODEPAGE TO PORTUGUESE  =>  REQUEST HB_CODEPAGE_PT850 ;  HB_CDPSELECT("PT850")
#translate SET CODEPAGE TO RUSSIAN     =>  REQUEST HB_CODEPAGE_RU1251 ; HB_CDPSELECT("RU1251")
#translate SET CODEPAGE TO SERBIAN     =>  REQUEST HB_CODEPAGE_SRWIN ;  HB_CDPSELECT("SRWIN")
#translate SET CODEPAGE TO SLOVENIAN   =>  REQUEST HB_CODEPAGE_SLWIN ;  HB_CDPSELECT("SLWIN")
#translate SET CODEPAGE TO SPANISH     =>  REQUEST HB_CODEPAGE_ESWIN ;  HB_CDPSELECT("ESWIN")

cLang := hb_langname()

? cLang // BASQUE => eu.DE850
? cLang // BULGARIAN => bg.BG866
? cLang // CROATIAN => hr.HR852
? cLang // CZECH => cs.CS852
? cLang // DUTCH => nl.NL850
? cLang // ENGLISH => en.EN
? cLang // FINNISH => en.FI850
? cLang // FRENCH => fr.FR850
? cLang // GERMAN => de.DEWIN
? cLang // GREEK => el.ELWIN
? cLang // HUNGARIAN => hu.HU852
? cLang // ITALIAN => it.IT850
? cLang // POLISH => pl.PLWIN
? cLang // PORTUGUESE => pt.PT850
? cLang // RUSSIAN => ru.RU125
? cLang // SERBIAN => sr_cyr.SRWIN
? cLang // SLOVENIAN => sl.SLWIN
? cLang // SPANISH => es.ESWIN




Then for correct HMG messages, adjust files:
h_controlmisc.prg
h_init.prg
h_windows.prg
HFCL\Source\gridprint.prg



*** Real user's requests, will be the best way for exactly CodePage set ***


Best regards
Last edited by IMATECH on Tue Oct 09, 2012 5:00 pm, edited 1 time in total.
M., Ronaldo

By: IMATECH

Imation Tecnologia

Post Reply