Page 13 of 29
Re: HMG 3.3.1 (Stable)
Posted: Wed Sep 24, 2014 3:11 pm
by tonton2
mol wrote:I've modified h_controlmisc.prg to allow user to enter base filename for saving his prinouts:
Code: Select all
Function _HMG_PRINTER_SavePages()
Local c , i , f , t , d , e, x, h, a := {}
Local g := {"PDF", "BMP","JPG","GIF","TIF","PNG","EMF"}
Local nTypePicture := { Nil , BT_FILEFORMAT_BMP, BT_FILEFORMAT_JPG, BT_FILEFORMAT_GIF, BT_FILEFORMAT_TIF, BT_FILEFORMAT_PNG, Nil }
Local hBitmap, nType
Local flag_PDF := .F.
local nWidth, nHeight, nDPI, cDocName
x := _HMG_PRINTER_GetOutFileType ( g ) /* Returns following Array:
( x[1]=>Folder_Name | x[2]=>File_Type | x[3]=>Base file name) */
.....................................
if HMG_LEN(x)=0
.............................................
FONTNAME "Arial"
FONTSIZE 9
END BUTTON
END WINDOW
CENTER WINDOW Out_File
ACTIVATE WINDOW Out_File
Return aRet
Bonsoir,
le problème persiste toujours, en mettant un autre nom pour le fichier(PDF), la sauvegarde se fait toujours avec le même nom:"HMG_Print_System_0001.pdf".
je ne peux pas changer le nom du fichier( pdf.)
merci a toute l'équipe
Google
good evening,
the problem still persists, when I put an another name for the file(PDF) , the backup always does the same name: "HMG_Print_System_0001.pdf."
I cannot change the name for the pdf file.
thank you to all the team
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 8:29 am
by Clip2Mania
the problem still persists, when I put an another name for the file(PDF) , the backup always does the same name: "HMG_Print_System_0001.pdf."
I cannot change the name for the pdf file.
As mentioned before, change h_controlmisc.prg
as proposed by Mol
Problem is that these modifications are not persistent. I've adapted the function _HMG_PRINTER_SavePages() as follows:
Code: Select all
if !empty(cDocName)
_HMG_PRINTER_SETJOBNAME(cDocName)
endif
cDocName := charrepl(":/.,|\@#$%&^*+ ",_HMG_SYSDATA [ 358 ],"_") + "_"
You can permanently change the function _HMG_PRINTER_SETJOBNAME where the default "HMG Print System" is set.
Hope this helps.
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 10:43 am
by tonton2
Code: Select all
if !empty(cDocName)
_HMG_PRINTER_SETJOBNAME(cDocName)
endif
cDocName := charrepl(":/.,|\@#$%&^*+ ",_HMG_SYSDATA [ 358 ],"_") + "_"
Hope this helps.[/quote]
Bonjour,
Can you give me more explanation, please
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 11:18 am
by Clip2Mania
You can permanently change the function _HMG_PRINTER_SETJOBNAME where the default "HMG Print System" is set.
In h_controlmisc.prg, search for the function _HMG_PRINTER_SETJOBNAME. Should be around line 6560 or so.
Code: Select all
Function _HMG_PRINTER_SETJOBNAME( cName )
if valtype ( cName ) = 'U'
_HMG_SYSDATA [358] := 'HMG Print System'
else
_HMG_SYSDATA [358] := cName
endif
Return Nil
Change the if-condition with whatever you want / rebuild
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 11:23 am
by esgici
Hi All
IMO modifying system file is not a good way
I hope this change will be applied in the next release,
because this is an important and general need.
Happy HMG
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 11:35 am
by Clip2Mania
+1
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 12:19 pm
by tonton2
esgici wrote:Hi All
IMO modifying system file is not a good way
I hope this change will be applied in the next release,
because this is an important and general need.
Happy HMG
+1
Merci a tous et pour Tout
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 12:43 pm
by tonton2
Javier Tovar wrote:Hola Tonton2,
-Solo ve a donde esta ese linea en el archivo C: \ HMG \ include \ i_tree.ch en la linea 233, y pones doble diagonal al inicio:
-Ejecutas el BuildAllLib.Bat
-Listo
Saludos
bonsoir
When we use this
we get that error
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 2:33 pm
by Agil Abdullah
Hallo Mr.Roberto López and friends,
I need some enhancements to EXTENDED-EDIT to make it more applicable and safer to manage data in offices. What I need are :
1) add an option [FIELDLOCK [n]] to EDIT EXTENDED command, to make sure that user cannot modify the designated field when in modify-operation. But always open when in append-operation.
2) Function "Find" is subject to case-sensitive, so it always fails to find record under name "Ray" if the key is "r" ; key must be "R". Pls make it NOT case-sensitive.
3) I think more interesting to move Edit-window to the right side, instead of left side because it hides the most important info which usually put in the left (except for Arabic who reads right-to-left style).
Attacched is my test *.prg
Thanks for kind attention.
Re: HMG 3.3.1 (Stable)
Posted: Thu Sep 25, 2014 8:21 pm
by esgici
tonton2 wrote:...When we use this
we get that error...
esgici wrote:
IMO modifying system file is not a good way