Código Delphi [-] ... begin Memo1.Font.Name:= 'Currier'; Memo1.Text:= Format('S. mil: %s %sS. dec: %s', [ThousandSeparator, #$A#$D#$A#$D, DecimalSeparator]); end;
... begin Memo1.Font.Name:= 'Currier'; Memo1.Text:= Format('S. mil: %s %sS. dec: %s', [ThousandSeparator, #$A#$D#$A#$D, DecimalSeparator]); end;