Как мога да променя регионалните настройки за време и дата?
благодаря предварително.

Unit



Sysutils



The following are a set of variables used to define the format for numeric or date/time strings:



var CurrencyString: string;

var CurrencyFormat: Byte;

var NegCurrFormat: Byte;

var ThousandSeparator: Char;

var DecimalSeparator: Char;

var CurrencyDecimals: Byte;

var DateSeparator: Char;

var ShortDateFormat: string;

var LongDateFormat: string;

var TimeSeparator: Char;

var TimeAMString: string;

var TimePMString: string;

var ShortTimeFormat: string;



var LongTimeFormat: string;

var ShortMonthNames: array[1..12] of string;

var LongMonthNames: array[1..12] of string;

var ShortDayNames: array[1..7] of string;

var LongDayNames: array[1..7] of string;



var SysLocale: TSysLocale;

var EraNames: array[1..7] of string;

var EraYearOffsets: array[1..7] of Integer;

var TwoDigitYearCenturyWindow: Word = 50;



var TListSeparator: Char;

10x za tova. Междувременно намерих и друго решение на въпроса:)
Ще се възползвам и от двете:)

Да допълня, че горните променливи се инициализират при стартиране на Application-а и промените в тях са валидни само в рамките му.
За да промениш настройките за цялата система трябва да го правиш с API, но мисля че това е лош стил, защото правото да си определя регионал настройките е дадено на усера от Бог Гейтс и никой програмер не трябва да му отнема това свещено право

Стана ясно че мога да го направя и със SetLocalTime i s GetLocalTime, така че да не завися от настройките на регионалните...както и да е. трябвало да почета малко преди да поствам.

10кс още веднъж

Порових се в Help -a но не намерих параметрите за SetLocalTime и GetLocalTime.
Как точно го правиш ?

var Systime:TSystemTime;
...
//poleta na SysTime
wYear:=2003;
wMonth:=04;
wDayOfWeek:=1;
wDay:=7;
wHour:=10;
wMinute:=1;
wSecond:=0;
wMiliSeconds:=0;
SetLocalTime(SysTime);
//gotovo

//s GetLocalTime e obratnoto - t.e GetLocalTime(SysTime) i posle chetesh
//triabva da otbeleja che GetLocal i SetLocal sa chastni sluchai na SetSystem
//i GetSystem

Редактирано от dalt на 07.04.03 10:09.

az izpolzvam drugo to
sepravi ot BDE to tam moje6 do gi razgleda6 nstoikite ?