HMG 3.4.0
Moderator: Rathinagiri
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
HMG 3.4.0
Muy bueno ver estas cosas ocurriendo (reconocimiento).
Felicitaciones a todos.
Felicitaciones a todos.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
- vagblad
- Posts: 160
- Joined: Tue Jun 18, 2013 12:18 pm
- DBs Used: MySQL,DBF
- Location: Thessaloniki, Greece
Re: HMG 3.4.0
Because i also had problems with Grid's velocity i tried an experiment:
I got a sample from MiniGUI's samples (Located at MiniGUI\Samples\Advanced\MySqlCli) and i ran it through HMG also:
On a MySQL table with 88.000 records and 16 Fields i run a query for 20000 records. These are the results i get:
MiniGUI : 19.42 seconds
HMG 3.3.1: 35.01 Seconds
HMG 3.4.0 (With .AddItem Method) : 32.68 Seconds
HMG 3.4.0(With .AddItemEx Method) : 29.39 Seconds
So it seems that 3.4.0 is definitely faster than the 3.3.1 version but behind MiniGUI's speed.
Just to clarify the code used is exactly the same for both enviroments.
I've read all the posts regarding grid's speed(inlcuding Marek's and Dr. Soto's very interesting discussion).
Do you think is there a possible way to speed the process up, or if we want more stability we have to sacrifice the speed?
I am sorry if i've missed something (a post or a thread).
Thanks for all your hard work
Best Regards
I got a sample from MiniGUI's samples (Located at MiniGUI\Samples\Advanced\MySqlCli) and i ran it through HMG also:
On a MySQL table with 88.000 records and 16 Fields i run a query for 20000 records. These are the results i get:
MiniGUI : 19.42 seconds
HMG 3.3.1: 35.01 Seconds
HMG 3.4.0 (With .AddItem Method) : 32.68 Seconds
HMG 3.4.0(With .AddItemEx Method) : 29.39 Seconds
So it seems that 3.4.0 is definitely faster than the 3.3.1 version but behind MiniGUI's speed.
Just to clarify the code used is exactly the same for both enviroments.
I've read all the posts regarding grid's speed(inlcuding Marek's and Dr. Soto's very interesting discussion).
Do you think is there a possible way to speed the process up, or if we want more stability we have to sacrifice the speed?
I am sorry if i've missed something (a post or a thread).
Thanks for all your hard work
Best Regards
Vagelis Prodromidis
Email: vagblad@gmail.com, Skype: vagblad
Email: vagblad@gmail.com, Skype: vagblad
- 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.4.0
If your grid is gonna have more lines ( say > 1000 lines), it will be better to manage the memory by ourselves. ie., using virtual grid.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
HMG 3.4.0
Hola
No entiendo el porque me da error con una ventana MODAL, y con una ventana CHILD funciona OK. Ayuda !
------------------------------------------------------------------------------------------------------------------------
I do not understand why I get error with MODAL window, and a CHILD window works OK. Help!
Gracias / Thanks
No entiendo el porque me da error con una ventana MODAL, y con una ventana CHILD funciona OK. Ayuda !
------------------------------------------------------------------------------------------------------------------------
I do not understand why I get error with MODAL window, and a CHILD window works OK. Help!
Gracias / Thanks
DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." CHILD BACKCOLOR BLUE ; // in this way works OK
ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
*DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." MODAL BACKCOLOR BLUE ; // in this way gives me error
* ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
Code: Select all
#include "HMG.CH"
Function main( )
nAnchWMain := GetDesktopWidth()
nAltoWMain := GetDesktopHeight()
DEFINE WINDOW Form_Main AT 0,0 WIDTH nAnchWMain HEIGHT nAltoWMain-10 NOMAXIMIZE NOSIZE MAIN BACKCOLOR BLUE ;
FONT 'Verdana' SIZE 10 ICON 'Msj.ico' TITLE '...'
ON KEY ESCAPE OF Form_Main ACTION ThisWindow.Release
DEFINE MAIN MENU
POPUP '&Archivo'
ITEM 'ONSIZE' ACTION VariosBrowses() IMAGE 'Usuario.bmp'
SEPARATOR
ITEM 'Salir' ACTION IF( MsgYesNo( "Desea Salir del Sistema ?", "A V I S O",.T.), Form_Main.Release, nil ) IMAGE 'Salir2.Bmp'
END POPUP
END MENU
DEFINE WINDOW Form_2 ROW 030 COL 220 WIDTH nAnchWMain-235 HEIGHT nAltoWMain-120 WINDOWTYPE PANEL BACKCOLOR GREEN
END WINDOW
DEFINE STATUSBAR FONT 'Verdana' SIZE 08
STATUSITEM "..." WIDTH 1200
STATUSITEM '...' WIDTH 100
STATUSITEM '...' WIDTH 100
END STATUSBAR
END WINDOW
CENTER WINDOW Form_Main
ACTIVATE WINDOW Form_Main
RETURN nil
* ¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯¯._.¯
FUNCTION VariosBrowses()
DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." CHILD BACKCOLOR BLUE ; // in this way works OK
ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
*DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." MODAL BACKCOLOR BLUE ; // in this way gives me error
* ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
ON KEY ESCAPE OF Browse_1 ACTION ( ThisWindow.Release )
DEFINE TAB Tab_2 AT 005,005 WIDTH 660 HEIGHT 425 FONT "Arial" SIZE 9 VALUE 1 TOOLTIP "Bases de Datos"
//*** Página 1 ***-------------------------------------------*
PAGE "Clientes"
END PAGE
//*** Página 2 ***-------------------------------------------*
PAGE "Ejecutivos"
END PAGE
END TAB
@ 435,550 BUTTON Bttn_Salir CAPTION '&Salir' WIDTH 060 HEIGHT 25 FONT "Arial" SIZE 09 ACTION ( ThisWindow.Release ) TOOLTIP "Salir Mantto."
END WINDOW
CENTER WINDOW Browse_1
ACTIVATE WINDOW Browse_1
RETURN
FUNCTION ONSIZEW()
Browse_1.Tab_2.Width := Browse_1.Width-30
Browse_1.Tab_2.Height := Browse_1.Height-90
Browse_1.Bttn_Salir.Col := Browse_1.Width-120
Browse_1.Bttn_Salir.Row := Browse_1.Height-75
RETURN
Andrés González López
Desde Guadalajara, Jalisco. México.
Desde Guadalajara, Jalisco. México.
- vagblad
- Posts: 160
- Joined: Tue Jun 18, 2013 12:18 pm
- DBs Used: MySQL,DBF
- Location: Thessaloniki, Greece
Re: HMG 3.4.0
andyglezl wrote:Hola
No entiendo el porque me da error con una ventana MODAL, y con una ventana CHILD funciona OK. Ayuda !
------------------------------------------------------------------------------------------------------------------------
I do not understand why I get error with MODAL window, and a CHILD window works OK. Help!
Gracias / Thanks
DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." CHILD BACKCOLOR BLUE ; // in this way works OK
ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
*DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." MODAL BACKCOLOR BLUE ; // in this way gives me error
* ON SIZE ONSIZEW() ON MAXIMIZE ONSIZEW()
Hola Andy,
If you remove the ON MAXIMIZE event from the MODAL window it will compile just fine.
-------------------------------------------------------------------------------------------------------
Si quita el evento en Maximizar en la ventana modal se compilará bien.
ON MAXIMIZE
ON MINIMIZE
NOTIFYICON
NOTIFYTOOLTIP
ON NOTIFYCLICK
These are 5 events you cannot declare when making a MODAL window.
------------------------------------------------------------------------------------------
Estos son 5 eventos que no se puede declarar al realizar una ventana modal.
Hope it helps.
Best Regards
PS. Sorry about the google translate quality
Vagelis Prodromidis
Email: vagblad@gmail.com, Skype: vagblad
Email: vagblad@gmail.com, Skype: vagblad
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
HMG 3.4.0
Good explained, Mr. Prodromidis !
Thank you for clarifying.
Whatever be the reason, always is good to use HMG IDE !
Best regards
Thank you for clarifying.
Whatever be the reason, always is good to use HMG IDE !
Best regards
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Re: HMG 3.4.0
Hola Mr. Prodromidis
Muchas gracias por su ayuda !
-----------------------------------
Hello Mr. Prodromidis
Thank you very much for your help!
Muchas gracias por su ayuda !
-----------------------------------
Hello Mr. Prodromidis
Thank you very much for your help!
Andrés González López
Desde Guadalajara, Jalisco. México.
Desde Guadalajara, Jalisco. México.
Re: HMG 3.4.0
Hola
Aun no se pueden manejar en el BROWSE de esta version, los campos autoincrementales ?
Algun parche ?, Se podrá en la siguiente ?...
----------------------------------------------------------------------------------------------------------
hello
Still can not handle on the BROWSE this version, AUTO_INCREMENT fields ?
Some patch ?, It may be on next ?...
Aun no se pueden manejar en el BROWSE de esta version, los campos autoincrementales ?
Algun parche ?, Se podrá en la siguiente ?...
----------------------------------------------------------------------------------------------------------
hello
Still can not handle on the BROWSE this version, AUTO_INCREMENT fields ?
Some patch ?, It may be on next ?...
Code: Select all
#include "HMG.CH"
FUNCTION main()
local i
dbcreate( "test", ;
{ { "CODIGO", "+", 5, 0 }, ;
{ "NOMBRE", "C", 45, 0 }, ;
{ "RFC", "C", 13, 0 }, ;
{ "CLAVE", "C", 20, 0 }, ;
{ "FIEL", "C", 20, 0 }, ;
{ "CIECF", "C", 20, 0 }, ;
{ "KEY", "C", 200, 0 }, ;
{ "CER", "C", 200, 0 } }, "DBFNTX" )
use test
for i :=1 to 10
dbappend()
next
DEFINE WINDOW Browse_1 AT 0,0 WIDTH 800 HEIGHT 600 TITLE "..." MAIN BACKCOLOR BLUE
@ 000,000 BROWSE BRW_Ctes WIDTH 800 HEIGHT 600 WORKAREA Test LOCK VALUE 1 WIDTHS { 70, 210, 130, 100, 100, 100, 399, 300 } ;
HEADERS { 'CODIGO', 'NOMBRE', 'RFC', 'CLAVE', 'FIEL', 'CIECF', 'KEY', 'CER' } ;
FIELDS { 'Test->CODIGO', 'Test->NOMBRE', 'Test->RFC', 'Test->CLAVE', 'Test->FIEL', 'Test->CIECF', 'Test->KEY', 'Test->CER' } ;
FONT "VERDANA" SIZE 10 FONTCOLOR BLUE ON HEADCLICK { { || nil }, { || nil }, { || nil } } ;
EDIT APPEND DELETE INPLACE READONLY { .F.,.F.,.F.,.F.,.F.,.F.,.F.,.F. } TOOLTIP '<Doble Click>=Edit <ALT-A>=Add <SUP>=Delete'
END WINDOW
CENTER WINDOW Browse_1
ACTIVATE WINDOW Browse_1
RETURN
Andrés González López
Desde Guadalajara, Jalisco. México.
Desde Guadalajara, Jalisco. México.
- Pablo César
- Posts: 4059
- Joined: Wed Sep 08, 2010 1:18 pm
- Location: Curitiba - Brasil
HMG 3.4.0
Hi Andrés,
I think this is a Harbour issue not HMG and as I have already reported on this topic Harbour will be able from next new HMG release, I believe.
I do not know if HDT has decided to release a new version for next or just to make a new patch.
But these features, I believe should it be ready with a new version at next HMG release.
I also waiting for UNICODE field that it will be supported too. Let's wait...
I think this is a Harbour issue not HMG and as I have already reported on this topic Harbour will be able from next new HMG release, I believe.
I do not know if HDT has decided to release a new version for next or just to make a new patch.
But these features, I believe should it be ready with a new version at next HMG release.
I also waiting for UNICODE field that it will be supported too. Let's wait...
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Re: HMG 3.4.0
Hi guys!
From where I can download newest release of harbour?
Link on Harbour-project.org drives to sourceforce and version 3.0 from 2012.
From where I can download newest release of harbour?
Link on Harbour-project.org drives to sourceforce and version 3.0 from 2012.