HMG 3.3.1 (Stable)

HMG Unicode versions 3.1.x related

Moderator: Rathinagiri

User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

HMG 3.3.1 - Posible BUG ( CellEx )

Post by Pablo César »

The property COLUMNVALID in Grid, makes a validation during the cell is still active. The problem I wish to change value of this cell in this validation function. But can't be changed... :(

You can see C:\hmg.3.3.1\SAMPLES\Controls\Grid\GRID_14\demo.prg and Test() function there, is not working... :(

But if you make the same test at C:\hmg.3.3.0\SAMPLES\Controls\Grid\GRID_14\demo.prg works normally !!!

I think there is a bug in GRID around _SetItem().

Please, someone can confirm this ? Can anybody make this test for me ?

Code: Select all

#include "hmg.ch"

Function Main()
Local aRows [20] [3]

DEFINE WINDOW Form_1 ;
	AT 0,0 ;
	WIDTH 640 ;
	HEIGHT 400 ;
	TITLE 'Mixed Data Type Grid Test' ;
	MAIN 

	DEFINE MAIN MENU
		DEFINE POPUP 'File'
			MENUITEM 'Exit'	ACTION ThisWindow.Release
		END POPUP
	END MENU

	aRows [1]	:= {'Simpson','Homer','555-5555'}
	aRows [2]	:= {'Mulder','Fox','324-6432'} 
	aRows [3]	:= {'Smart','Max','432-5892'} 
	aRows [4]	:= {'Grillo','Pepe','894-2332'} 
	aRows [5]	:= {'Kirk','James','346-9873'} 
	aRows [6]	:= {'Barriga','Carlos','394-9654'} 
	aRows [7]	:= {'Flanders','Ned','435-3211'} 
	aRows [8]	:= {'Smith','John','123-1234'} 
	aRows [9]	:= {'Pedemonti','Flavio','000-0000'} 
	aRows [10]	:= {'Gomez','Juan','583-4832'} 
	aRows [11]	:= {'Fernandez','Raul','321-4332'} 
	aRows [12]	:= {'Borges','Javier','326-9430'} 
	aRows [13]	:= {'Alvarez','Alberto','543-7898'} 
	aRows [14]	:= {'Gonzalez','Ambo','437-8473'} 
	aRows [15]	:= {'Batistuta','Gol','485-2843'} 
	aRows [16]	:= {'Vinazzi','Amigo','394-5983'} 
	aRows [17]	:= {'Pedemonti','Flavio','534-7984'} 
	aRows [18]	:= {'Samarbide','Armando','854-7873'} 
	aRows [19]	:= {'Pradon','Alejandra','???-????'} 
	aRows [20]	:= {'Reyes','Monica','432-5836'} 

	@ 10,10 GRID Grid_1 ;
		WIDTH 620 ;
		HEIGHT 330 ;
		HEADERS {'Column 1','Column 2','Column 3'} ;
		WIDTHS {140,140,140} ;
		ITEMS aRows ;
		EDIT ;
		COLUMNVALID 	{ ;
				{ || Test() } , ;
				{ || NotBeEmpty(This.CellValue) } , ;
				{ || ! Empty ( This.CellValue ) } ;
				} 

END WINDOW
CENTER WINDOW Form_1
ACTIVATE WINDOW Form_1
Return Nil

Function NotBeEmpty ( cCellValue )  // Not working
If Empty(cCellValue)
   // This.CellValue:="<Is in blank>"
   
   nCellRowIndex := This.CellRowIndex
   nCellColIndex := This.CellColIndex
   Form_1.Grid_1.CellEx ( nCellRowIndex, nCellColIndex ) := "<Is in blank>"
Endif
Return .T.

Function Test()
If Empty (This.CellValue)

	This.CellValue := '*'  // Not working

EndIf
Return
In the previous version 3.3.0 it's working, see at first column when we left empty what's happen:
Screen3.png
Screen3.png (21.18 KiB) Viewed 6400 times
In my PC the 3.3.1 is not working...
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
User avatar
Rathinagiri
Posts: 5471
Joined: Tue Jul 29, 2008 6:30 pm
DBs Used: MariaDB, SQLite, SQLCipher and MySQL
Location: Sivakasi, India
Contact:

Re: HMG 3.3.1 (Stable)

Post by Rathinagiri »

For me, it is working on both the versions.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

HMG 3.3.1 (Stable)

Post by Pablo César »

Rathinagiri wrote:For me, it is working on both the versions.
Thank you Rathi for your reply. Sorry to ask you about with basic question: but have you applied all patches (Upto Ptach 6) ?
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
User avatar
srvet_claudio
Posts: 2193
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Contact:

Re: HMG 3.3.1 - Posible BUG ( CellEx )

Post by srvet_claudio »

Pablo César wrote:The property COLUMNVALID in Grid, makes a validation during the cell is still active. The problem I wish to change value of this cell in this validation function. But can't be changed... :(

You can see C:\hmg.3.3.1\SAMPLES\Controls\Grid\GRID_14\demo.prg and Test() function there, is not working... :(

But if you make the same test at C:\hmg.3.3.0\SAMPLES\Controls\Grid\GRID_14\demo.prg works normally !!!
Please, change INCLUDE\i_this.ch and SOURCE\h_grid.prg files for these new files, and rebuild the lib.
Attachments
This_CellValue.rar
(19.99 KiB) Downloaded 378 times
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

HMG 3.3.1 (Stable)

Post by Pablo César »

srvet_claudio wrote:Please, change INCLUDE\i_this.ch and SOURCE\h_grid.prg files for these new files, and rebuild the lib.
Gracias Claudio !

It's working perfectly now !
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

HMG 3.3.1 (Stable)

Post by Pablo César »

Dear Claudio, tell me please:

This _SetItem ( "Grid_2", "Form_1", nGridRow, {aTemp[1],"<Label in Blank>"} ) should it works ?

Because then I used : This.CellValue:="<Label in Blank>" and worked.

This in the function of validation at COLUMNVALID.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Re: HMG 3.3.1 (Stable)

Post by Javier Tovar »

Hola a todos

Después de sustituir los archivos el IDE no trabaja y en todos los archivos que quiero compilar con el IDE me sale este error.

Saludos

///////////////////////////////////////////////////////////////////////////////////////////////
Hello everyone

After replacing the IDE files does not work and all the files you want to compile with the IDE I get this error.

regards
ErrorIDE.jpg
ErrorIDE.jpg (40.27 KiB) Viewed 6247 times
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Re: HMG 3.3.1 (Stable)

Post by Javier Tovar »

Y también me sucede lo mismo con Build.bat

Saludos
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Re: HMG 3.3.1 (Stable)

Post by Javier Tovar »

Hola a todos,

Volví a poner Ultima versión de HMG, Ultimo Parche. sin los dos archivos anteriores.

También quiero informar que el control Slider cuando esta en un Tab y le quiero poner BackColor a "NIL Default" me da el siguiente error:
ErrorIDE_Slider.png
ErrorIDE_Slider.png (261.93 KiB) Viewed 6239 times
También probe con: CheckBox, RadioButtons, Label, TextBox y si funcionan bien. Solo Slider es el que da error. Alguna idea?

Saludos
//////////////////////////////////////////////////////////////////////////////////////////////////////////
Hello everyone,

I replaced Release of HMG, Ultimo Patch. without the above two files.

I would also like to report that the Slider control when in one Tab and you want to put BackColor to "NIL Default" gives me the following error:


Also probe with: CheckBox, RadioButtons, Label, TextBox, and if they work well. Only Slider is giving error. Any ideas?

regards
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

HMG 3.3.1 (Stable)

Post by Pablo César »

Javier, after replaced files, have you rebuilded HMG lib ?
srvet_claudio wrote:Please, change INCLUDE\i_this.ch and SOURCE\h_grid.prg files for these new files, and rebuild the lib.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Post Reply