SysUtils.CurrencyFormat Variable

CurrencyFormat defines the currency symbol placement and separation used in floating-point–to–decimal conversions. Possible values are: 0 = $1 | 1 = 1$ | 2 = $ 1 | 3 = 1 $

Pascal

CurrencyFormat: Byte;

C++

Byte CurrencyFormat;

File

SysUtils

Description

On Windows, the initial value is fetched from LOCALE_ICURRENCY.

C++ Examples:

Copy Code

/*
This example uses a label and a button on a form. When the
user clicks the button, the current date displays in the
caption of the label. Because some of the date variables are
assigned new values, the format of the date in the label
changes. For example, if the date is 9/15/94, the date
displays as 9-15-1994.
*/
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  DateSeparator = '-';
  ShortDateFormat = "m/d/yyyy";
  Label1->Caption = DateToStr(Date());
}

Delphi Examples:

Copy Code

{
This example uses a label and a button on a form. When the 
user clicks the button, the current date displays in the 
caption of the label. Because some of the date variables are 
assigned new values, the format of the date in the label 
changes. For example, if the date is 9/15/94, the date 
displays as 9-15-1994.
} 
procedure TForm1.Button1Click(Sender: TObject);
begin
  DateSeparator := '-';
  ShortDateFormat := 'm/d/yyyy';
  Label1.Caption := DateToStr(Date);
end;

What do you think about this topic? Send feedback!