Search found 299 matches

by edk
Tue Apr 10, 2018 11:47 am
Forum: HMG Samples
Topic: Getfolder()
Replies: 19
Views: 1972

Re: Getfolder()

To which the user corresponds to the name "Gebruiker"? Will it be: Default, Default User, All Users, Public or is it called a local account in Windows?
What is the operating system?
by edk
Fri Apr 06, 2018 4:16 pm
Forum: HMG Samples
Topic: Getfolder()
Replies: 19
Views: 1972

Re: Getfolder()

Start application in "Run as Administrator" mode and check if you have access to this folder.
by edk
Fri Apr 06, 2018 1:00 pm
Forum: General Discussions
Topic: Happy Birthday to Anand AND m6face !
Replies: 12
Views: 479

Re: Happy Birthday to Anand AND m6face !

Happy B-days
by edk
Wed Apr 04, 2018 7:18 pm
Forum: HMG General Help
Topic: Slow down MSGYESNO()
Replies: 9
Views: 560

Re: Slow down MSGYESNO()

MsgYesNo ( <xData> , [<cTitle>] , [<lRevertDefault>] ) --> lResponse

MsgYesNo ( <xData> , [<cTitle>] ) or MsgYesNo ( <xData> , [<cTitle>], .F. ) default "Yes" button
MsgYesNo ( <xData> , [<cTitle>] , .T. ) default "No" button
by edk
Tue Apr 03, 2018 5:09 pm
Forum: GUI Basics
Topic: Partial clear screen
Replies: 13
Views: 757

Re: Partial clear screen

IMO the better solution will be to disable the availability of the button and then re-enable availability. <WindowName>.<ButtonName>.Enabled := .F. //disable button <WindowName>.<ButtonName>.Enabled := .T. //enable button You can also hide and show: <WindowName>.<ButtonName>.Hide <WindowName>.<Butto...
by edk
Tue Apr 03, 2018 12:01 pm
Forum: DataBases
Topic: Clipper conversion
Replies: 13
Views: 651

Re: Clipper conversion

Templar wrote:
Tue Apr 03, 2018 7:58 am
You, Sir, are a genius! That works perfectly. Thank you.
Please, do not call me Sir, because I haven't been honored by Queen Elizabeth II :lol:
Just Edward.
And I'm not a genius, it's just usual experience.

Edward.
by edk
Tue Apr 03, 2018 7:53 am
Forum: HMG Unicode version
Topic: Function to get the regional format settings
Replies: 9
Views: 788

Re: Function to get the regional format settings

Well now I have a riddle :? .
I recompiled on a different machine (Win10-32bit) and the characters are displayed correctly :shock: .
On this computer, where characters are incorrectly displayed, the system Win10-64bit is brand new and the original unmodified hmg3.4.4 installed.
by edk
Mon Apr 02, 2018 3:16 pm
Forum: DataBases
Topic: Clipper conversion
Replies: 13
Views: 651

Re: Clipper conversion

Hello Templar,
Greetings from Poland.

In my opinion, this should solve your issue:

Code: Select all

PROCEDURE MAIN
REQUEST HB_GT_WIN_DEFAULT
SetMode(25,80)
CLS
@1,1 TO 23,78 DOUBLE
ANS:="      "
@12,12 SAY "How are you?"
@12,25 GET ANS
READ
RK:=INKEY(0)
RETURN
Edward.
by edk
Mon Apr 02, 2018 3:03 pm
Forum: HMG Unicode version
Topic: Function to get the regional format settings
Replies: 9
Views: 788

Re: Function to get the regional format settings

KDJ wrote:
Mon Apr 02, 2018 1:52 pm
If you change LOCALE_SNATIVEDIGITS, try to change LOCALE_IDIGITSUBSTITUTION too.
So I did, but instead of these characters:
1.png
1.png (17.32 KiB) Viewed 582 times
I get this in response:
2.png
2.png (11.04 KiB) Viewed 582 times
I do not know if I compile correctly in UNICODE mode.
by edk
Mon Apr 02, 2018 9:34 am
Forum: HMG Unicode version
Topic: Function to get the regional format settings
Replies: 9
Views: 788

Re: Function to get the regional format settings

Is there any functions to get the regional format settings of the OS ? Yes, Win API function - GetLocaleInfo (or GetLocaleInfoEx): https://msdn.microsoft.com/en-us/library/windows/desktop/dd318101(v=vs.85).aspx Thanks Krzysztof. I did something like this: #include "hmg.ch" #include "hmgwinnls.ch" /...