Analitcs

Pesquisar no conteúdo do blog.atlabs.com.br

quarta-feira, 16 de janeiro de 2013

DELPHI - DecimalSeparator no Delphi XE3

Reações: 


// Forma antiga:
begin
  DecimalSeparator
end;
// Forma nova : Delphi XE3
var
  AFormatSettings : TFormatSettings;
begin
  AFormatSettings.DecimalSeparator;
end;

{o mesmo deve ser feito para os outros formatos abaixo:
    CurrencyString: string;
    CurrencyFormat: Byte;
    CurrencyDecimals: Byte;
    DateSeparator: Char;
    TimeSeparator: Char;
    ListSeparator: Char;
    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;
    ThousandSeparator: Char;
    DecimalSeparator: Char;
    TwoDigitYearCenturyWindow: Word;
    NegCurrFormat: Byte;
} 

Nenhum comentário:

Postar um comentário

Observação: somente um membro deste blog pode postar um comentário.

Max Gehringer