Tema: Re: delphi 2009
Autorius: Tester
Data: 2014-12-22 00:10:24
O kodėl nenori rašyti Eur vietoj Lt?
Delphyje gali užsiduoti savo valiutos simbolius
http://www.delphibasics.co.uk/RTL.asp?Name=CurrencyString
Ką lygtai ir darai.

procedure InitLocales;
begin
     {$ifdef WIN32}
     Application.UpdateFormatSettings:=False;
     {$endif WIN32}
     CurrencyString:='';
     CurrencyFormat:=1;
     NegCurrFormat:=5;
     ThousandSeparator:=' ';
     DecimalSeparator:='.';
     CurrencyDecimals:=2;
     DateSeparator:='.';
     TimeSeparator:=':';
     TimeAMString:='';
     TimePMString:='';
     ShortDateFormat:='yyyy.mm.dd';
     LongDateFormat:='yyyy.mm.dd';
     LongMonthNames[1]:='Sausio';
     LongMonthNames[2]:='Vasario';
     LongMonthNames[3]:='Kovo';
     LongMonthNames[4]:='Balandžio';
     LongMonthNames[5]:='Gegužės';
     LongMonthNames[6]:='Birželio';
     LongMonthNames[7]:='Liepos';
     LongMonthNames[8]:='Rugpjūčio';
     LongMonthNames[9]:='Rugsėjo';
     LongMonthNames[10]:='Spalio';
     LongMonthNames[11]:='Lapkričio';
     LongMonthNames[12]:='Gruodžio';


end;

"Remigijus" <mano@mailas.lt> wrote in message 
news:m76v01$76d$1@trimpas.omnitel.net...
> Sveiki,
>
> Situacija tokia: programoje reikia pakeisti Lt į €. Visur kur tik jie 
> matomi... Atrodytų reikalas visai paprastas, tačiau taip tik atrodo. Jei 
> reikėtų pakeisti į $, tai tikrai būtų paprasta. Esmė tame, kad euro 
> simblolis (skirtingai nuo dolerio) yra tik unicode simbolių rinkinyje - 
> 0128. Rezultate jo nerodo DBGrid. Lauko tipas ftCurrency, valiutos 
> simbolis nerašomas į pačią duombazę, o paimamas iš Windows regiono 
> nustatymų arba nurodomas pačioje programoje. Tačiau DBGrid matoma visai ne 
> tai, kas turėtų būti matoma...
> Be to, naudojamas dar vienas komponentas, kuris yra ne unikodinis ir, 
> matomai, čia sprendimo visai jokio nėra. Niekur ten neina pamatyt euro 
> simbolio ir naujesnės komponento versijos nėra... O gal yra koks nors 
> sprendimas tokiu atveju?
>
> R.