Search found 165 matches

by KDJ
Sun Oct 15, 2017 8:59 pm
Forum: HMG General Help
Topic: A problem with EnumProcessID ()
Replies: 2
Views: 86

Re: A problem with EnumProcessID ()

esgici

Use EnumProcessesID().
by KDJ
Sat Sep 30, 2017 8:59 pm
Forum: HMG General Help
Topic: & in label
Replies: 5
Views: 146

Re: & in label

Franco Here is an example: #include "hmg.ch" MEMVAR _HMG_SYSDATA FUNCTION Main() LOCAL cText := "G&G name" DEFINE WINDOW MainWnd; ROW 100; COL 100; WIDTH 180; HEIGHT 120; TITLE "NOPREFIX label"; MAIN; NOSIZE; NOMINIMIZE; NOMAXIMIZE DEFINE LABEL Text1 ROW 20 COL 20 WIDTH 140 VALUE cText NOPREFIX .F....
by KDJ
Mon Sep 11, 2017 7:07 pm
Forum: PDF Generation
Topic: PDF Viewer DLL?
Replies: 134
Views: 8797

Re: PDF Viewer DLL?

PdfView version 2017-09-11: Added: - Main menu -> File -> Choose directory (also click on header of Files grid) - split of PDF document into single pages using PDFtk-Server tool (Main menu -> Document -> Split into single pages) Fixed: - function ChangeWindowMessageFilter() doesn't work. PdfView.zip
by KDJ
Sun Sep 10, 2017 12:22 pm
Forum: Language Related
Topic: read binary file with fopen
Replies: 5
Views: 262

Re: read binary file with fopen

jairpinho This file can be read without any problem: #include "Fileio.ch" #include "hmg.ch" FUNCTION Main() LOCAL cFile := "20161228.dtl" LOCAL nHandle := fOpen(cFile, FO_READ + FO_COMPAT) LOCAL nLen LOCAL cContent IF nHandle < 0 MsgBox("Error opening file!") ELSE fSeek(nHandle, 0, FS_SET) nLen := ...
by KDJ
Thu Sep 07, 2017 5:38 pm
Forum: Language Related
Topic: label at runtime
Replies: 27
Views: 768

Re: label at runtime

Can be used BT_DrawText or BT_DrawTextEx function.
Sample is in: ...\hmg\SAMPLES\BosTaurus\Demo3.prg.
by KDJ
Tue Sep 05, 2017 5:59 pm
Forum: HMG Tutorials and Tips
Topic: How do i call a procedure
Replies: 72
Views: 1939

Re: How do i call a procedure

mol wrote:
Tue Sep 05, 2017 6:48 am
...
xlUp is defined in excel.ch as:

Code: Select all

#DEFINE xlUp   -4162
Where is excel.ch, I have not found.

Here is MS Excel documentation in single file (EXCEL 2013 Developer Documentation.chm): https://www.microsoft.com/en-us/downloa ... x?id=40326
by KDJ
Tue Sep 05, 2017 4:54 am
Forum: HMG Tutorials and Tips
Topic: How do i call a procedure
Replies: 72
Views: 1939

Re: How do i call a procedure

ROBROS wrote:
Mon Sep 04, 2017 6:53 pm
...
oExcel:Selection:End(xlUp):Select()
...
What is the value of xlUp ?
by KDJ
Wed Jul 19, 2017 6:46 pm
Forum: PDF Generation
Topic: PDF Viewer DLL?
Replies: 134
Views: 8797

Re: PDF Viewer DLL?

Steed

It seems to me that in SumatraPDF is not possible to save individual pages of the document.
For this I am using PDFtk Server tool: https://www.pdflabs.com/tools/pdftk-server/
by KDJ
Sun Jul 16, 2017 8:57 pm
Forum: PDF Generation
Topic: PDF Viewer DLL?
Replies: 134
Views: 8797

Re: PDF Viewer DLL?

PdfView 2017-07-16 released.
Changed: now language strings are identified by a number defined in PdfView_LangStr.ch.
Fixed: minor bugs.

PdfView.zip
(5.07 MiB) Downloaded 55 times
by KDJ
Mon Jul 10, 2017 6:01 pm
Forum: HMG General Help
Topic: GetProperty of grid in form
Replies: 3
Views: 258

Re: GetProperty of grid in form

Serge

I think in this way:
x1 := GetProperty(cFORM, 'Grid_1', 'Item', A)[1]
or
x1 := GetProperty(cFORM, 'Grid_1', 'Cell', A, 1)
or
x1 := GetProperty(cFORM, 'Grid_1', 'CellEx', A, 1)