Web Mahsülleri OfisiOfis yazılımcının kara gün dostudur!

Bölgesel dil ayarlarından kaynaklanan sorunları önleyebilmek için program çalışmaya başlarken küçük bir kontrol yapabilirsiniz. Örnek kodlar aşağıdaki gibidir.

var
Reg: TRegistry;

Reg:= TRegistry.Create;
Reg.RootKey:= HKEY_CURRENT_USER;
Reg.OpenKey(‘\Control Panel\International’, False);  // regeditte istenilen konuma odaklanma

// Register kayıtlarını okuma işlemi

Reg.ReadString(‘sCountry’);                  // varsayılan ülke : ‘Türkiye’
Reg.ReadString(‘sDate’);                       // varsayılan ayraç : ‘.’
Reg.ReadString(‘sDecimal’);                  // varsayılan ayraç : ‘,’
Reg.ReadString(‘sLongDate’);                // varsayılan uzun tarih : ‘dd MMMM yyyy dddd’
Reg.ReadString(‘sShortDate’);               // varsayılan kısa tarih : ‘dd.MM.yyyy’
Reg.ReadString(‘sLanguage’);                // varsayılan dil : ‘TRK’
Reg.ReadString(‘sThousand’);                // varsayılan ayraç : ‘.’
Reg.ReadString(‘sMonDecimalSep’);      // varsayılan ayraç : ‘,’

// Register kayıtlarını değiştirme işlemi

Reg.WriteString(‘sCountry’,'Türkiye’);
Reg.WriteString(‘sDate’,’.’);
Reg.WriteString(‘sDecimal’,',’);
Reg.WriteString(‘sLongDate’,'dd MMMM yyyy dddd’);
Reg.WriteString(‘sShortDate’,'dd.MM.yyyy’);
Reg.WriteString(‘sLanguage’,'TRK’);
Reg.WriteString(‘sThousand’,’.’);
Reg.WriteString(‘sMonDecimalSep’,',’);