Search found 4 matches

by techops
Wed Feb 21, 2007 4:12 am
Forum: FiveWin for Harbour/xHarbour
Topic: How prevent running an application twice ?
Replies: 6
Views: 1915

there is a tmutex class from fivewin.info (Patrick Mast) you should look at
by techops
Tue Feb 13, 2007 10:48 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Detecting Region
Replies: 21
Views: 6965

Hi Jeff,

Have you tried the function with the different manifest constants. When I run it I get back "Australia" using _SENGCOUNTRY or "AUS" using LOCALE_SABBREVCTRYNAME. I am running XP-SP2
by techops
Tue Feb 13, 2007 4:09 am
Forum: FiveWin for Harbour/xHarbour
Topic: Detecting Region
Replies: 21
Views: 6965

Oops!

DLL32 FUNCTION GetSystemDefaultLCID();
AS LONG PASCAL;
FROM "GetSystemDefaultLCID" LIB "KERNEL32"

try this

# include "fivewin.ch"

# define LOCALE_ICOUNTRY 5
# define LOCALE_SCOUNTRY 6
# define LOCALE_SENGCOUNTRY 4098
# define LOCALE_SABBREVCTRYNAME 7

FUNCTION Main()

LOCAL strCountry ...
by techops
Tue Feb 13, 2007 2:33 am
Forum: FiveWin for Harbour/xHarbour
Topic: Detecting Region
Replies: 21
Views: 6965

Get region

Hi Jeff,

Try GetLocaleInfoA: the format is below

DLL32 FUNCTION GetLocInfoA;
( Locale AS LONG, ;
LCType AS LONG, ;
lpLCData AS STRING, ;
cchData AS LONG ) ;
AS LONG PASCAL;
FROM "GetLocaleInfoA" LIB "KERNEL32"

The CONSTANTs for passing are

CONSTANT long LOCALE_ICOUNTRY = 5 ' Country code ...