Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.08.20;
Скачать: [xml.tar.bz2];

Вниз

Денежный разделитель   Найти похожие ветки 

 
Grant   (2006-08-02 16:15) [0]

Подскажите, пожалуйста, как программно определить какой разделитель используется в денежных суммах(то есть разделитель из Regional Opthions на закладке Currency). Cgfcb,j/


 
Grant   (2006-08-02 16:20) [1]

Уточню. Есть переменная типа Currency, она преобразовывается в строку. Как в этой страке найти разделитель копеек?


 
Jeer ©   (2006-08-02 16:26) [2]

var DecimalSeparator: char;


 
isasa ©   (2006-08-02 16:31) [3]

Unit

SysUtils

The following are a set of variables used to define the format for numeric or date/time strings:

var CurrencyString: string;
var CurrencyFormat: Byte;
var NegCurrFormat: Byte;
var ThousandSeparator: Char;
var DecimalSeparator: Char;
var CurrencyDecimals: Byte;
var DateSeparator: Char;
var ShortDateFormat: string;
var LongDateFormat: string;
var TimeSeparator: Char;
var TimeAMString: string;
var TimePMString: string;
var ShortTimeFormat: string;

var LongTimeFormat: string;
var ShortMonthNames: array[1..12] of string;
var LongMonthNames: array[1..12] of string;
var ShortDayNames: array[1..7] of string;
var LongDayNames: array[1..7] of string;

var SysLocale: TSysLocale;
var EraNames: array[1..7] of string;
var EraYearOffsets: array[1..7] of Integer;
var TwoDigitYearCenturyWindow: Word = 50;

var TListSeparator: Char;


 
Grant   (2006-08-02 16:40) [4]

Спасибо.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.08.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.038 c
2-1154180150
cando
2006-07-29 17:35
2006.08.20
Использование FindFirstChangeNotification


15-1153420548
Мефисто
2006-07-20 22:35
2006.08.20
Скульптуры с детских площадок (взято с ЖЖ) :)


9-1132873549
Юзерок
2005-11-25 02:05
2006.08.20
directX


15-1153806797
Ega23
2006-07-25 09:53
2006.08.20
С Днём рождения! 25 июля


15-1153486847
Курдль
2006-07-21 17:00
2006.08.20
В "винном кризисе" виноваты автоматизаторы.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский