HMG 3.2 (Stable)

HMG Unicode versions 3.1.x related

Moderator: Rathinagiri

Post Reply
User avatar
tonton2
Posts: 291
Joined: Sat Jun 29, 2013 1:26 pm
Location: Algerie
Has thanked: 7 times
Been thanked: 11 times
Contact:

Re: HMG 3.2 (Stable)

Post by tonton2 » Tue Dec 17, 2013 9:34 am

voila un exemple de SUBSTR dans "COMBOSEARCHGRID" ,il a l'air de fonctionner normalement
here is an example of SUBSTR in "COMBOSEARCHGRID", it seems to work normally

Code: Select all

function _HMG_CSG_C2SQL( Value )
local cValue := ""
local cdate := ""
if ( valtype(value) == "C" .or. valtype( value ) == "M" ) .and. len(alltrim(value)) > 0
   value := strtran(value, "'", "''" )
endif
do case
   case Valtype(Value) == "N"
      cValue := AllTrim(Str(Value))
   case Valtype(Value) == "D"

      if !Empty(Value)
         cdate := dtos(value)
          cValue := "'"+SUBSTR(cDate,1,4)+"-"+SUBSTR(cDate,5,2)+"-"+SUBSTR(cDate,7,2)+"'"
      else
         cValue := "''"
      endif
   case Valtype(Value) $ "CM"
      IF Empty( Value)
         cValue="''"
      ELSE
         cValue := "'" + value + "'"
      ENDIF
   case Valtype(Value) == "L"
      cValue := AllTrim(Str(iif(Value == .F., 0, 1)))
   otherwise
      cValue := "''"       // NOTE: Here we lose values we cannot convert
endcase
return cValue
may be I did not understand the real problem :?:
L'Algerie vous salut
Y.TABET

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

Post by Rathinagiri » Mon Dec 23, 2013 5:42 am

Sorry friends,

I was on a business tour, an official tour and a personal tour continuously for the past one month. I have to catch up with the various posts. I am happy that there are hundreds of posts to follow. :)
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.

User avatar
CalScot
Posts: 274
Joined: Thu Mar 21, 2013 12:22 am
Location: California
Been thanked: 1 time

Post by CalScot » Mon Dec 23, 2013 7:58 am

Welcome back!
I hope that you were able to enjoy every part of your trip.
Regards,
CalScot

User avatar
srvet_claudio
Posts: 2044
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Has thanked: 35 times
Been thanked: 146 times
Contact:

Post by srvet_claudio » Wed Jan 22, 2014 11:05 pm

Hi All,
this is a patch for HMG:

1) unzip HMG.3.2_patch2.rar file in folder c:\hmg.3.2\

2) execute c:\hmg.3.2\BuildLib.bat

See demo: C:\hmg.3.2\SAMPLES\Controls\RichEditBox

Code: Select all

1) The documentation was rearranged (e.g. DISABLE/ENABLE EVENTS, CREATE EVENTS and READ KEYBOARD FUNCTIONS is moved to Advanced topic)

2) New Features (see doc):

***************
* RICHEDITBOX
***************

New Properties:
---------------
FontName
FontSize
FontBold
FontItalic
FontUnderline
FontStrikeOut
FontColor
FontBackColor
FontScript
Link
GetClickLinkRange
GetClickLinkText
RTFTextMode
AutoURLDetect
Zoom
SelectRange
CaretPos
Value
ViewRect
GetSelectText
GetTextLength
GetTextRange
GetPosChar
AddText
AddTextAndSelect
CanPaste
CanUndo
CanRedo
BackGroundColor
ParaAlignment
ParaNumbering
ParaNumberingStyle
ParaNumberingStart
ParaOffset
ParaLineSpacing
ParaIndent
FindText
ReplaceText
ReplaceAllText


New Methods:
-------------
SelectAll
UnSelectAll
SelCopy
SelPaste
SelCut
SelClear
Undo
Redo
ClearUndoBuffer
RTFLoadFile
RTFSaveFile
RTFPrint


New at definition:
------------------
NOHSCROLL
NOVSCROLL
ON SELECT
ON LINK
ON VSCROLL


******************
* SELECT PRINTER
******************

OpenPrinterGetDC()
OpenPrinterGetPageDC()
IsPrintPageMetaFile()
OpenPrinterGetPageWidth()
OpenPrinterGetPageHeight()


********************
* DEFINE WINDOW
********************

<FormName>.Handle
<FormName>.Index
<FormName>.IsMinimized
<FormName>.IsMaximized
<FormName>.ClientAreaWidth
<FormName>.ClientAreaHeight



*****************
* New Functions
*****************
    - FindTextDialog
    - ReplaceTextDialog
    - HMG_LoadResourceRawFile ( cFileName, cTypeResource | nTypeResourceID ) --> cData
    - GetFontList ( [ hDC ] , [ cFontFamilyName ] , [ nCharSet ] , [ nPitch ] , [ nFontType ] , [ lSortCaseSensitive ] , [ @aFontName ] )
    - System.EmptyClipboard

********************
* Enanced Function
********************
    - GetColor ( [ aDefaultColor ], [ @aCustomColors ], [ lFullOpenBox ] )
Attachments
HMG.3.2_patch2.rar
(1.73 MiB) Downloaded 419 times
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com

User avatar
danielmaximiliano
Posts: 2146
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 25 times
Contact:

Post by danielmaximiliano » Wed Jan 22, 2014 11:14 pm

Gracias Claudio por tu trabajo con HMG .
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México
Has thanked: 1 time
Been thanked: 2 times

Post by Javier Tovar » Wed Jan 22, 2014 11:38 pm

Gracias Dr. Claudio por su dedicación a HMG! :D

Saludos

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

Post by esgici » Thu Jan 23, 2014 10:45 am

srvet_claudio wrote: this is a patch for HMG:
Muchas Gracias Dr. :!:

Viva HMG :D
Viva INTERNATIONAL HMG :D

Mario Mansilla
Posts: 250
Joined: Wed Aug 13, 2008 2:35 pm
Location: Córdoba - Argentina
Been thanked: 2 times

Post by Mario Mansilla » Thu Jan 23, 2014 9:35 pm

Hola :
He bajado el nuevo patch y recompilado un proyecto que estoy realizando y a su vez mi avast antivirus al actualizarse me acusa el archivo ld.exe de la carpeta mingw/bin de la distribucion con el virus WIN:EVO-GEN .
Me da opciones de acusar falso positivo o bien ingresarlo como exclusion .
Por supuesto no me deja crear el ejecutable .
Alguien que use avast le sucede lo mismo . :(
Saludos
Mario Mansilla

Hello:
I downloaded the new patch and recompiled a project I'm already making my turn to update avast antivirus accuses me ld.exe file mingw / bin folder of the distribution with the virus WIN: EVO-GEN.
It gives me options to acknowledge or submit false positive as exclusion.
Of course not let me create the executable
Someone using avast same thing happens. : (
regards
Mario Mansilla

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 » Fri Jan 24, 2014 5:01 pm

Mario Mansilla wrote:Alguien que use avast le sucede lo mismo . :(
Hola Mario, yo uso Avast y no tuve problemas.

Gracias, Claudio por los nuevos recursos en el RichEditBox.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein

User avatar
andyglezl
Posts: 1158
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 35 times
Been thanked: 73 times
Contact:

Post by andyglezl » Sat Jan 25, 2014 12:32 am

Hola, estoy compilando con esta nueva version
y me despliega que no encuentra algunas funciones.
Ya ejecute BuildLib.bat, BuildAllLib.bat, en ANSI, en UNICODE, aplique
los "HMG.3.2Patch1.rar", "HMG.3.2Patch2.rar" y nada,
me sigue dando el mismo mensaje.
Alguna idea ?
----------------------------------------------------------------------
Hi, I'm compiling with this new version
and displays that I can not find some functions.
Now run BuildLib.bat, BuildAllLib.bat in ANSI, in UNICODE, apply
the "HMG.3.2Patch1.rar", "HMG.3.2Patch2.rar" and nothing,
still gives me the same message.
Any idea?
Attachments
error_hmg3.2.JPG
error_hmg3.2.JPG (124.54 KiB) Viewed 2594 times
Andrés González López
Desde Guadalajara, Jalisco. México.

Post Reply