FormatSettings jako stała - czy tak się da?

FormatSettings jako stała - czy tak się da?
RD
  • Rejestracja:około 12 lat
  • Ostatnio:11 miesięcy
  • Postów:212
0

Witam, czy idzie zdefiniować typ TFormatSettings jako stałą? Próbuje tak jak poniżej ale kompilator nie pozwala na to.

Kopiuj
  FormatSettings: record
    CurrencyFormat: Byte;
    NegCurrFormat: Byte;
    ThousandSeparator: Char;
    DecimalSeparator: Char;
    CurrencyDecimals: Byte;
    DateSeparator: Char;
    TimeSeparator: Char;
    ListSeparator: Char;
    CurrencyString: string;
    ShortDateFormat: string;
    LongDateFormat: string;
    TimeAMString: string;
    TimePMString: string;
    ShortTimeFormat: string;
    LongTimeFormat: string;
    ShortMonthNames: array[1..12] of string;
    LongMonthNames: array[1..12] of string;
    ShortDayNames: array[1..7] of string;
    LongDayNames: array[1..7] of string;
    TwoDigitYearCenturyWindow: Word;
  end = (
    CurrencyFormat: 3;
    NegCurrFormat: 8;
    ThousandSeparator: ' ';
    DecimalSeparator: ',';
    CurrencyDecimals: 2;
    DateSeparator: '-';
    TimeSeparator: ':';
    ListSeparator: ';';
    CurrencyString: 'zł';
    ShortDateFormat: 'dd-mm-yyyy';
    LongDateFormat: 'dd-mmmm-yyyy';
    TimeAMString: 'am';
    TimePMString: 'pm';
    ShortTimeFormat: 'hh:nn:ss';
    LongTimeFormat: 'hh:nn:ss';
    ShortMonthNames: ('Sty','Lut','Mar','Kwi','Maj','Cze','Lip','Sie','Wrz','Paź','Lis','Gru');
    LongMonthNames: ('Styczeń','Luty','Marzec','Kwiecień','Maj','Czerwiec','Lipiec','Sierpień','Wrzesień','Październik','Listopad','Grudzień');
    ShortDayNames: ('Pon','Wt','Śr','Czw','Pią','Sob','Nie');
    LongDayNames: ('Poniedziałek','Wtorek','Środa','Czwartek','Piątek','Sobota','Niedziela');
    TwoDigitYearCenturyWindow: 28048);

i np użycie

Kopiuj
    
  FormatDateTime('dd.mm.yyyy hh:nn:ss',Now,FormatSettings);
_13th_Dragon
  • Rejestracja:ponad 19 lat
  • Ostatnio:3 miesiące
0

const FormatSettings:TFormatSettings=( CurrencyFormat: 3; ...


Wykonuję programy na zamówienie, pisać na Priv.
Asm/C/C++/Pascal/Delphi/Java/C#/PHP/JS oraz inne języki.
RD
  • Rejestracja:około 12 lat
  • Ostatnio:11 miesięcy
  • Postów:212
0

Mam jeszcze jedno pytanie za co odpowiada zmienna CurrencyFormat ?

KA
  • Rejestracja:prawie 20 lat
  • Ostatnio:minuta
  • Lokalizacja:Gorlice
0

Za to gdzie zostanie umieszczony symbol waluty przy formatowaniu na string.

Zresztą co za problem się pobawić:

Kopiuj
CurrencyFormat:= 3;
ShowMessage(Format('%m', [1234.567]));

Nie odpowiadam na PW w sprawie pomocy programistycznej.
Pytania zadawaj na forum, bo:
od tego ono jest ;) | celowo nie zawracasz gitary | przeczyta to więcej osób a więc większe szanse że ktoś pomoże.
edytowany 1x, ostatnio: kAzek

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.