You can subscribe to this list here.
2004 |
Jan
|
Feb
|
Mar
(64) |
Apr
(70) |
May
(54) |
Jun
(57) |
Jul
(34) |
Aug
(19) |
Sep
(28) |
Oct
(48) |
Nov
(42) |
Dec
(43) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2005 |
Jan
(50) |
Feb
(19) |
Mar
(10) |
Apr
(5) |
May
(1) |
Jun
(14) |
Jul
(23) |
Aug
(6) |
Sep
(118) |
Oct
(110) |
Nov
(36) |
Dec
(6) |
2006 |
Jan
(19) |
Feb
(7) |
Mar
(4) |
Apr
(32) |
May
(6) |
Jun
(14) |
Jul
(42) |
Aug
(38) |
Sep
(88) |
Oct
(21) |
Nov
(40) |
Dec
(37) |
2007 |
Jan
(31) |
Feb
(20) |
Mar
(26) |
Apr
(38) |
May
(4) |
Jun
(3) |
Jul
(3) |
Aug
(8) |
Sep
(2) |
Oct
(3) |
Nov
(25) |
Dec
(9) |
2008 |
Jan
(7) |
Feb
(10) |
Mar
(16) |
Apr
(10) |
May
(25) |
Jun
(16) |
Jul
(27) |
Aug
(8) |
Sep
(20) |
Oct
(54) |
Nov
(11) |
Dec
(14) |
2009 |
Jan
(28) |
Feb
(22) |
Mar
(13) |
Apr
(70) |
May
(25) |
Jun
(23) |
Jul
(12) |
Aug
(18) |
Sep
(7) |
Oct
(4) |
Nov
(8) |
Dec
(36) |
2010 |
Jan
(58) |
Feb
(66) |
Mar
(3) |
Apr
(16) |
May
(9) |
Jun
(10) |
Jul
(6) |
Aug
(8) |
Sep
(17) |
Oct
(15) |
Nov
(12) |
Dec
(27) |
2011 |
Jan
(3) |
Feb
(17) |
Mar
(5) |
Apr
(12) |
May
(1) |
Jun
|
Jul
(1) |
Aug
(5) |
Sep
(56) |
Oct
(24) |
Nov
(8) |
Dec
(32) |
2012 |
Jan
(20) |
Feb
(3) |
Mar
|
Apr
|
May
|
Jun
(9) |
Jul
(29) |
Aug
(3) |
Sep
(17) |
Oct
(60) |
Nov
(17) |
Dec
(52) |
2013 |
Jan
(22) |
Feb
(35) |
Mar
(31) |
Apr
(5) |
May
(16) |
Jun
(108) |
Jul
(57) |
Aug
(2) |
Sep
(11) |
Oct
|
Nov
(3) |
Dec
(13) |
2014 |
Jan
(39) |
Feb
(15) |
Mar
|
Apr
(31) |
May
|
Jun
(9) |
Jul
(16) |
Aug
(1) |
Sep
(8) |
Oct
(51) |
Nov
(5) |
Dec
(119) |
2015 |
Jan
(78) |
Feb
(47) |
Mar
(25) |
Apr
(32) |
May
(34) |
Jun
(42) |
Jul
(62) |
Aug
(10) |
Sep
(11) |
Oct
(5) |
Nov
(13) |
Dec
(24) |
2016 |
Jan
(12) |
Feb
(1) |
Mar
(2) |
Apr
|
May
(1) |
Jun
(12) |
Jul
(5) |
Aug
(32) |
Sep
(36) |
Oct
(34) |
Nov
(3) |
Dec
(1) |
2017 |
Jan
(2) |
Feb
(3) |
Mar
(2) |
Apr
|
May
(3) |
Jun
(5) |
Jul
(6) |
Aug
(5) |
Sep
|
Oct
|
Nov
|
Dec
(1) |
2018 |
Jan
(1) |
Feb
(1) |
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
(26) |
Sep
(24) |
Oct
(2) |
Nov
(6) |
Dec
(26) |
2019 |
Jan
(10) |
Feb
(5) |
Mar
|
Apr
(1) |
May
|
Jun
(1) |
Jul
(3) |
Aug
|
Sep
(2) |
Oct
(1) |
Nov
(1) |
Dec
(2) |
2020 |
Jan
(2) |
Feb
|
Mar
|
Apr
|
May
(5) |
Jun
(5) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2021 |
Jan
(1) |
Feb
|
Mar
|
Apr
(1) |
May
|
Jun
(1) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(1) |
2022 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2023 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
(4) |
Sep
|
Oct
(1) |
Nov
(1) |
Dec
(1) |
From: Alain A. <ala...@wa...> - 2015-07-27 07:09:50
|
Hi, Having a program which takes about 20 seconds to initialize before displaying the window, I can't use splash() function which as only the parameter time. I made my own function which is an external program and is called by my program. I ought to hide the window system title. Is-it possible and how ? Here is the very simple code of it : #include "windows.ch" #include "guilib.ch" #include "gtk.ch" // ============================================================================ Function main(cTitle,cImage,cIcon,cwidth,cheight,cleft,ctop,cversion) // ============================================================================ local oSplash, oIcon, oFont := HFont():Add( "Serif",0,-18 ) if pcount() > 6 oIcon:= HIcon():Addfile(cIcon) INIT WINDOW oSplash MAIN TITLE cTitle ; ICON oIcon AT val(cleft),val(ctop) SIZE val(cwidth),val(cheight) @ 0, 0 BITMAP cImage if pcount() == 8 @ 250,50 say cversion SIZE 30, 22 COLOR hwg_VColor("FF00FF") BACKCOLOR hwg_VColor("FFFFFF") endif ACTIVATE WINDOW oSplash endif return nil and here is now how it's called and closed: run("splash "+chr(34)+"GeneTools-splash"+chr(34)+" "+chr(34)+"/usr/local/share/hwgui/splash/genetools.png"+chr(34)+" "+chr(34)+cImageDir+"tool.png"+chr(34)+" 300 250 410 160 "+progvers+" &") ... init ... INIT WINDOW oMainWindow MAIN TITLE "Utilitaires de généalogie (v"+progvers+")" ; ICON oIcon AT 200,50 SIZE 844,422 ; ... // Fermeture du splash hb_processRun("wmctrl -l",,@cmd) if at("GeneTools-splash",cmd) > 0 run("sleep 1") run('wmctrl -c "GeneTools-splash"') endif ACTIVATE WINDOW oMainWindow Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-24 16:55) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2470) ------------------------------------------------------------------------ |
From: Alain A. <ala...@wa...> - 2015-07-25 07:06:36
|
Hi, When trying Designer under wine, and double-clicking on name field: Error BASE/1111 Argument error: LEN Called from ->LEN(0) Called from source\winapi/hedit.prg->HEDIT:NEW(85) Called from inspect.prg->EDIT1(168) Called from inspect.prg->(b)INSPOPEN(39) Called from source\winapi/hbrowse.prg->HBROWSE:EDIT(1706) Called from source\winapi/hbrowse.prg->HBROWSE:BUTTONDBL(1631) Called from source\winapi/hbrowse.prg->HBROWSE:ONEVENT(393) Called from ->HWG_ACTIVATEMAINWINDOW(0) Called from source\winapi/hwindow.prg->HMAINWINDOW:ACTIVATE(335) Called from designer.prg->MAIN(248) HWGUI 2.19 Build 3 Date:07/25/15 Time:09:05:22 Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alain A. <ala...@wa...> - 2015-07-24 17:44:08
|
Le 24/07/2015 14:07, Alain Aupeix a écrit : >> When you click on "File" menu item, there are "New report","Open >> report" or "New form", "Open form" ? > New Form ... Now it works, I must use a script to locate in designer folder. I will try it Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alain A. <ala...@wa...> - 2015-07-24 12:07:59
|
Le 24/07/2015 08:38, Alexander S.Kresin a écrit : > Alain Aupeix пишет: > > > 2) When I'm just trying to save a script, the linux printer box appears, >> what I dont want. > How exactly you do it ? Local oPrinter, oFont oStatus:SetText(" Création d'un script d'impression ...") INIT PRINTER oPrinter IF oPrinter == Nil hwg_MsgStop("Aucune imprimante ..."+chr(10)+"Veuillez vérifier ...","Impression") Return Nil ENDIF oFont := oPrinter:AddFont( "sans",8 ) oPrinter:StartDoc(.f.,"test.scr") oPrinter:StartPage() oPrinter:SetFont( oFont ) oPrinter:Box( 5,5,oPrinter:nWidth-5,oPrinter:nHeight-5 ) oPrinter:Say( "Linux printing first sample !", 50,10,165,26,DT_CENTER,oFont ) oPrinter:Line( 45,30,170,30 ) oPrinter:Line( 45,5,45,30 ) oPrinter:Line( 170,5,170,30 ) oPrinter:Say( "----------", 50,120,150,132,DT_CENTER ) oPrinter:Box( 50,134,160,146 ) oPrinter:Say( "End Of Report", 50,135,160,146,DT_CENTER ) oPrinter:EndPage() oPrinter:EndDoc("test.scr") oPrinter:End() oStatus:SetText("") Return Nil >> 3) When I'm trying to read a scriptfile, if I uses :preview(), it works. >> But, as I prefer the linux preview, if I remove :preview(), it doesn't >> opens linux printer box. > Use :PrintDoc() instead of "Preview() to print a document. That's now ok, thanks >>> The designer should work under wine - all HwGUI programs works. >>> Don't forget to run it with -r option to create/open reports instead >>> of screen forms. >> Same error with -r > When you click on "File" menu item, there are "New report","Open > report" or "New form", "Open form" ? New Form ... A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-24 07:44:43
|
Alain Aupeix пишет: > 2) When I'm just trying to save a script, the linux printer box appears, > what I dont want. How exactly you do it ? > > 3) When I'm trying to read a scriptfile, if I uses :preview(), it works. > But, as I prefer the linux preview, if I remove :preview(), it doesn't > opens linux printer box. Use :PrintDoc() instead of "Preview() to print a document. >> The designer should work under wine - all HwGUI programs works. >> Don't forget to run it with -r option to create/open reports instead >> of screen forms. > Same error with -r > When you click on "File" menu item, there are "New report","Open report" or "New form", "Open form" ? Regards, Alexander. |
From: Alain A. <ala...@wa...> - 2015-07-24 07:19:22
|
Le 24/07/2015 07:45, Alexander S.Kresin a écrit : > Alain Aupeix пишет: > >> I tried to create a script, but to be able to have a good size (else, >> size is bad in preview), we need to use: >> >> INIT PRINTER oPrinter >> >> and then the linux preview is always opened. what, in this case I ought >> not to have. >> >> For the second function, if I don't use :preview(), it makes nothing, no >> linux preview. >> >> As windows designer doesn't work under wine, I don't know how to create >> reports without coding it in program, which is not too nice, except if >> creating a scriptfile doesn't open the linux preview, and if linux >> preview is called when loading a scriptfile (I don't like hwgui version, >> which appears to be too windows design.). >> > I don't sure that I understood you well, but if you don't want to use > HwGUI's preview, simply do not call it, remove the oPrinter:Preview() line. 1) In the sample you gave, that's what I done, and only the linux printer box appears, and it's what I want. 2) When I'm just trying to save a script, the linux printer box appears, what I dont want. 3) When I'm trying to read a scriptfile, if I uses :preview(), it works. But, as I prefer the linux preview, if I remove :preview(), it doesn't opens linux printer box. > The designer should work under wine - all HwGUI programs works. > Don't forget to run it with -r option to create/open reports instead > of screen forms. Same error with -r Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-24 06:46:27
|
Alain Aupeix пишет: > I tried to create a script, but to be able to have a good size (else, > size is bad in preview), we need to use: > > INIT PRINTER oPrinter > > and then the linux preview is always opened. what, in this case I ought > not to have. > > For the second function, if I don't use :preview(), it makes nothing, no > linux preview. > > As windows designer doesn't work under wine, I don't know how to create > reports without coding it in program, which is not too nice, except if > creating a scriptfile doesn't open the linux preview, and if linux > preview is called when loading a scriptfile (I don't like hwgui version, > which appears to be too windows design.). > I don't sure that I understood you well, but if you don't want to use HwGUI's preview, simply do not call it, remove the oPrinter:Preview() line. The designer should work under wine - all HwGUI programs works. Don't forget to run it with -r option to create/open reports instead of screen forms. Regards, Alexander. |
From: Alexander S.K. <al...@be...> - 2015-07-24 06:35:17
|
Marcelo Anelli пишет: > The sentence > REQUEST HB_CODEPAGE_UTF8 > in xharbour give me udefined function? using 10128 build? > Try to change the following line in hedit.prg: FUNCTION hwg_Chr( nCode ) RETURN Iif( hb_cdpSelect()=="UTF8", hwg_keyToUtf8( nCode ), Chr( nCode ) ) to: FUNCTION hwg_Chr( nCode ) RETURN hwg_keyToUtf8( nCode ) If all will work well, we need to think how to do appropriate workaround for xHarbour. Regards, Alexander. |
From: Alain A. <ala...@wa...> - 2015-07-23 15:36:46
|
Le 23/07/2015 15:15, Alain Aupeix a écrit : > In my previous test, I saw that :preview() is like preview in linux, and > that the two preview functions come, first hwguy one, and then linux > one. Commenting the hwgui one, the linux done the trick. > > But I haven't yet test if the linux preview will work with scriptfiles. I tried to make two functions, one to create the script, one to print the script, after having modify it I found two issues which are a bit ennoying for me: I tried to create a script, but to be able to have a good size (else, size is bad in preview), we need to use: INIT PRINTER oPrinter and then the linux preview is always opened. what, in this case I ought not to have. For the second function, if I don't use :preview(), it makes nothing, no linux preview. As windows designer doesn't work under wine, I don't know how to create reports without coding it in program, which is not too nice, except if creating a scriptfile doesn't open the linux preview, and if linux preview is called when loading a scriptfile (I don't like hwgui version, which appears to be too windows design.). Thanks A+ > > A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alain A. <ala...@wa...> - 2015-07-23 15:35:47
|
<html> <head> <meta content="text/html; charset=windows-1252" http-equiv="Content-Type"> </head> <body text="#000000" bgcolor="#FFFFFF"> <div class="moz-cite-prefix">Le 23/07/2015 16:47, Marcelo Anelli a écrit :<br> </div> <blockquote cite="mid:CAO...@ma..." type="cite"> <div dir="ltr"> <div>The sentence<br> REQUEST HB_CODEPAGE_UTF8<br> </div> in xharbour give me udefined function? using 10128 build?<br> </div> </blockquote> I use harbour, not xharbour.<br> <br> A+<br> <div class="moz-signature">-- <br> <hr> Alain Aupeix<br> <a class="moz-txt-link-freetext" href="http://jujuland.pagesperso-orange.fr/">http://jujuland.pagesperso-orange.fr/</a><br> <a class="moz-txt-link-freetext" href="http://pissobi-lacassagne.pagesperso-orange.fr/">http://pissobi-lacassagne.pagesperso-orange.fr/</a><br> <hr> <small>U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468)</small> <hr> </div> </body> </html> |
From: Marcelo A. <mar...@gm...> - 2015-07-23 14:47:28
|
The sentence REQUEST HB_CODEPAGE_UTF8 in xharbour give me udefined function? using 10128 build? 2015-07-23 7:47 GMT-04:30 Alain Aupeix <ala...@wa...>: > Le 23/07/2015 12:36, Alexander S.Kresin a écrit : > > hb_cdpSelect( "UTF8" ) > Personnaly, I used > > RDDSETDEFAULT( "DBFNTX" ) > hwg_SetAppLocale( "UTF8" ) > > I added > > hb_cdpSelect( "UTF8" ) > > and all works correctly, but if I comment hwg_SetAppLocale( "UTF8" ) > my progs blocks. When I uncomment it, it works > > Perhaps I use accents in @ say ? > > Thanks > A+ > -- > ------------------------------------------------------------------------ > Alain Aupeix > http://jujuland.pagesperso-orange.fr/ > http://pissobi-lacassagne.pagesperso-orange.fr/ > ------------------------------------------------------------------------ > U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | > HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) > ------------------------------------------------------------------------ > > > ------------------------------------------------------------------------------ > _______________________________________________ > Hwgui-developers mailing list > Hwg...@li... > https://lists.sourceforge.net/lists/listinfo/hwgui-developers > -- Marcelo Anelli C. o^o¬ Fotógrafo Profesional ma...@ma... ma...@ma... http://www.marceloanelli.com/ |
From: Alain A. <ala...@wa...> - 2015-07-23 13:15:32
|
Le 23/07/2015 14:00, Alexander S.Kresin a écrit : > Alain Aupeix пишет: > >> But it's static, and I thougth, trying to read hprinter.prg that there >> was a way to create a file when creating the print job, and there where >> a way to then print it. >> >> METHOD LoadScript( cScriptFile ) >> METHOD SaveScript( cScriptFile ) >> >> Then it needs only the structure of the scriptfile to make it usable. >> Exactly as source code ? > Yes, I understand now. > The second parameter of the :StardDoc() method is a name of script file > to save. So, if you write ( in that PrnTest() function, for example ): > > oPrinter:StartDoc( ,"print.out" ) > > you will get a print.out file, which is the script you talk about. > Following is a sample how to preview/print this script: > > Function Main( cScriptFile ) > Local oPrinter > > oPrinter := HPrinter():New() > > oPrinter:LoadScript( cScriptFile ) > oPrinter:Preview() > > Return Nil In my previous test, I saw that :preview() is like preview in linux, and that the two preview functions come, first hwguy one, and then linux one. Commenting the hwgui one, the linux done the trick. But I haven't yet test if the linux preview will work with scriptfiles. A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-23 13:06:43
|
And yet another notice: IMO, the best way is to use the Designer - the windows executable should work with the help of wine. Regards, Alexander. |
From: Alexander S.K. <al...@be...> - 2015-07-23 13:01:30
|
Alain Aupeix пишет: > But it's static, and I thougth, trying to read hprinter.prg that there > was a way to create a file when creating the print job, and there where > a way to then print it. > > METHOD LoadScript( cScriptFile ) > METHOD SaveScript( cScriptFile ) > > Then it needs only the structure of the scriptfile to make it usable. > Exactly as source code ? Yes, I understand now. The second parameter of the :StardDoc() method is a name of script file to save. So, if you write ( in that PrnTest() function, for example ): oPrinter:StartDoc( ,"print.out" ) you will get a print.out file, which is the script you talk about. Following is a sample how to preview/print this script: Function Main( cScriptFile ) Local oPrinter oPrinter := HPrinter():New() oPrinter:LoadScript( cScriptFile ) oPrinter:Preview() Return Nil Regards, Alexander. |
From: Alexander S.K. <al...@be...> - 2015-07-23 12:24:30
|
Itamar M. Lins Jr. Lins пишет: > Hi! > > Error BASE/1075 Erro nos parâmetros: > > Called from ->HBROWSEEX:ONEVENT(830) > Called from ->HWG_DLGBOXINDIRECT(0) > Called from ->HDIALOG:ACTIVATE(135) > > In line 830 of hBrowseEx.prg > > line 828-> ELSEIF msg == WM_MBUTTONUP > Line 829-> ::nWheelPress := iif( ::nWheelPress > 0, 0, lParam ) > > > In line 829 lParam is logic! No, lParam isn't logic, it may has the POINTER type. Try change the line 829 to ::nWheelPress := iif( ::nWheelPress > 0, 0,hwg_PtrToUlong( lParam ) ) Regards, Alexander. |
From: Alain A. <ala...@wa...> - 2015-07-23 12:23:56
|
Le 23/07/2015 13:12, Alexander S.Kresin a écrit : > Alain Aupeix пишет: >> Sent again due to SourceForge problems ... >> ___________________________________________________________________________ >> >> If I understand the avalaible commands box, line, say, I have some >> trouble to understand what and how to use some parameters likeDT_RIGHT, >> DT_CENTER, DT_LEFT, and others I found searching in hwgui sources : >> >> DT_VCENTER, DT_SINGLELINE, DT_CALCRECT, DT_WORDBREAK, BS_LEFT, BS_RIGHT, >> JUSTIFY HEAD DT_CENTER, >> PANGO_ALIGN_CENTER, PANGO_ALIGN_RIGHT, DT_BOTTOM, TOP_INDENT, LEFT_INDENT >> >> If I think of understanding what are their purposes, I not able to use >> it very well. >> >> Please, can you give a sample more complete using a lot of these >> parameters, than the one you already give,and which a little poor. >> I beg it's possible to create a script which can be printed after with a >> simple function. Am-I right ? >> > This is a big issue, I haven't time right now to write a full > description - just a few words. > > DT_RIGHT, DT_CENTER, DT_LEFT are horizontal alignment parameters for a > text, DT_VCENTER and DT_BOTTOM - vertical alignment. The other, which > you wrote, aren't used for printing. > > Have you seen gtk_samples/a.prg/PrnTest() function ? It is very short > and gives only basic information: Yes, and it was the function I used as basis. But it's static, and I thougth, trying to read hprinter.prg that there was a way to create a file when creating the print job, and there where a way to then print it. METHOD LoadScript( cScriptFile ) METHOD SaveScript( cScriptFile ) Then it needs only the structure of the scriptfile to make it usable. Exactly as source code ? Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-23 12:20:26
|
Itamar M. Lins Jr. Lins пишет: >>The problem may be solved, if we introduce a >>new flag, :lEditing for example, which will be set in :Edit() method - >>and you will be possible to return from :bLostFocus if needed. Is it >>suitable ? > > Yes if possible and not very work for you, do this. I'll add it after Sourceforge will work again. > > A observation only, I use hBrowseEx. > For HBrowseEx you can use the :oEditDlg variable. IF !Empty( oBrw:oEditDlg ) - then the editing occurs now. Regards, Alexander. |
From: Alain A. <ala...@wa...> - 2015-07-23 12:17:23
|
Le 23/07/2015 12:36, Alexander S.Kresin a écrit : > hb_cdpSelect( "UTF8" ) Personnaly, I used RDDSETDEFAULT( "DBFNTX" ) hwg_SetAppLocale( "UTF8" ) I added hb_cdpSelect( "UTF8" ) and all works correctly, but if I comment hwg_SetAppLocale( "UTF8" ) my progs blocks. When I uncomment it, it works Perhaps I use accents in @ say ? Thanks A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-23 12:12:51
|
Alain Aupeix пишет: > Sent again due to SourceForge problems ... > ___________________________________________________________________________ > > If I understand the avalaible commands box, line, say, I have some > trouble to understand what and how to use some parameters likeDT_RIGHT, > DT_CENTER, DT_LEFT, and others I found searching in hwgui sources : > > DT_VCENTER, DT_SINGLELINE, DT_CALCRECT, DT_WORDBREAK, BS_LEFT, BS_RIGHT, > JUSTIFY HEAD DT_CENTER, > PANGO_ALIGN_CENTER, PANGO_ALIGN_RIGHT, DT_BOTTOM, TOP_INDENT, LEFT_INDENT > > If I think of understanding what are their purposes, I not able to use > it very well. > > Please, can you give a sample more complete using a lot of these > parameters, than the one you already give,and which a little poor. > I beg it's possible to create a script which can be printed after with a > simple function. Am-I right ? > This is a big issue, I haven't time right now to write a full description - just a few words. DT_RIGHT, DT_CENTER, DT_LEFT are horizontal alignment parameters for a text, DT_VCENTER and DT_BOTTOM - vertical alignment. The other, which you wrote, aren't used for printing. Have you seen gtk_samples/a.prg/PrnTest() function ? It is very short and gives only basic information: INIT PRINTER oPrinter oFont := oPrinter:AddFont( "sans",10 ) oPrinter:StartDoc() oPrinter:StartPage() oPrinter:SetFont( oFont ) oPrinter:Box( 5,5,oPrinter:nWidth-5,oPrinter:nHeight-5 ) oPrinter:Say( "Windows printing first sample !", 50,10,165,26,DT_CENTER,oFont ) oPrinter:Line( 45,30,170,30 ) oPrinter:Line( 45,5,45,30 ) oPrinter:Line( 170,5,170,30 ) oPrinter:Say( "----------", 50,120,150,132,DT_CENTER ) oPrinter:Box( 50,134,160,146 ) oPrinter:Say( "End Of Report", 50,135,160,146,DT_CENTER ) oPrinter:EndPage() oPrinter:EndDoc() oPrinter:Preview() oPrinter:End() Regards, Alexander. |
From: Alexander S.K. <al...@be...> - 2015-07-23 11:54:43
|
Alain Aupeix пишет: > @ 15, 35+(50*(rg-1)) OWNERBUTTON OF oDlg ID IDBUTTON ; > ON CLICK {||qout(IDBUTTON)} ; > SIZE 24,24 FLAT ; > ON CLICK codeblock receives two parameters: :oParent and :Id - the second is id of a button, so decision is very simple: ... ON CLICK {|o,nId|SomeFunc(nId)} Regards, Alexander. |
From: Alexander S.K. <al...@be...> - 2015-07-23 11:36:57
|
Marcelo Anelli пишет: > Hi all, > > i have troubles with spanish chars like accented chars and ñ,Ñ > > my system is for spanish people, and the only trouble is with get on dialog > > I use: > hwg_SetAppLocale( "UTF-8" ) > > Some hints will be appreciated... > Try: REQUEST HB_CODEPAGE_UTF8 hb_cdpSelect( "UTF8" ) and remove the hwg_SetAppLocale( "UTF-8" ) This works for me ( I use cyrillic ). Regards, Alexander. |
From: Alain A. <ala...@wa...> - 2015-07-23 11:34:35
|
Le 23/07/2015 12:22, Alexander S.Kresin a écrit : > Alain Aupeix пишет: >> If a file is choosen, no problem >> I no file, it seems the value returned by hwg_SelectfileEx() is numeric = 0 > Hmm... really. I thought, it should return Nil. > Anyway, the best way to check the return value is Empty() function. Thanks it works with empty But it's curious ... that it returns such value, I thought it ought to be en ampty string or NIL, but not numeric value. A+ -- ------------------------------------------------------------------------ Alain Aupeix http://jujuland.pagesperso-orange.fr/ http://pissobi-lacassagne.pagesperso-orange.fr/ ------------------------------------------------------------------------ U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-20 15:02) | HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2468) ------------------------------------------------------------------------ |
From: Alexander S.K. <al...@be...> - 2015-07-23 11:23:18
|
Alain Aupeix пишет: > > If a file is choosen, no problem > I no file, it seems the value returned by hwg_SelectfileEx() is numeric = 0 > Hmm... really. I thought, it should return Nil. Anyway, the best way to check the return value is Empty() function. Regards, Alexander. |
From: Itamar M. L. J. L. <ita...@gm...> - 2015-07-22 18:49:11
|
Hi! Error BASE/1075 Erro nos parâmetros: > Called from ->HBROWSEEX:ONEVENT(830) Called from ->HWG_DLGBOXINDIRECT(0) Called from ->HDIALOG:ACTIVATE(135) In line 830 of hBrowseEx.prg line 828-> ELSEIF msg == WM_MBUTTONUP Line 829-> ::nWheelPress := iif( ::nWheelPress > 0, 0, lParam ) Line 830-> IF ::nWheelPress > 0 //Bug ? Hwg_SetCursor( hwg_Loadcursor( 32652 ) ) ELSE Hwg_SetCursor( hwg_Loadcursor( IDC_ARROW ) ) ENDIF In line 829 lParam is logic! And line 830 -> IF numeric > logic ? this a bug ? Best regards, Itamar M. Lins Jr. |
From: Itamar M. L. J. L. <ita...@gm...> - 2015-07-22 18:44:25
|
>The problem may be solved, if we introduce a >new flag, :lEditing for example, which will be set in :Edit() method - >and you will be possible to return from :bLostFocus if needed. Is it >suitable ? Yes if possible and not very work for you, do this. A observation only, I use hBrowseEx. Best regards, Itamar M. Lins Jr. |