PDA

View Full Version : یافتن تعیین فرمت تاریخ ویندوز و تغییر آن



anbardaran
چهارشنبه 08 فروردین 1386, 10:34 صبح
سلام

بعضی وقتها (مثلا هنگام استفاده از یک Convertor تاریخ میلادی به شمسی) نیاز هست که فرمت تاریخ ویندوز نوع خاصی باشه. مثلا yyyy/MM/dd

امکان یافتن فرمت تاریخ و تغییر اون یه حالت دلخواه چطوریه؟
(البته تو مثالهای دلفی 7 یه چیزی برای این کار پیدا کردم، ولی (احتمالا بدلیل تازه کاری من )نتونستم فرمت تاریخ رو عوض کنم


%%:\Program Files\Borland\Delphi7\Demos\Db\MastApp

)

با تشکر فراوان
انبارداران

حامد مصافی
چهارشنبه 08 فروردین 1386, 11:31 صبح
سلام
در مسیر زیر کلید هایی برای تنظیمات بین المللی ویندوز وجود دارند


HKEY_CURRENT_USER\Control Panel\International


sLongDate , sShortDate شما رو به هدفتون میرسونه

anbardaran
چهارشنبه 08 فروردین 1386, 11:50 صبح
بسیار ممنونم از راهنمایی شما
کد زیر هم جهت دوستانی که قصد استفاده دارند

با تشکر
انبارداران



var
Reg: TRegistry;
sShortDate, sLongDate, sDate: String;
begin

Reg := TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
sShortDate := 'yyyy/MM/dd';
sLongDate := 'yyyy/MM/dd';
sDate := '/';
if Reg.OpenKey('Control Panel\International', True) then
begin
if sShortDate <> Reg.ReadString('sShortDate') then
Reg.WriteString('sShortDate', sShortDate);
if sLongDate <> Reg.ReadString('sLongDate') then
Reg.WriteString('sLongDate', sLongDate);
if sDate <> Reg.ReadString('sDate') then
Reg.WriteString('sDate', sDate);
end;
Reg.Free;
end;