Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Узнать запущен ли сервис FireBird
Категория: Интернет и Сети
Категория: Интернет и Сети
Создать индекс для таблицы ABS (Absolute Database)
Категория: Базы данных
Категория: Базы данных
Упаковка ZIPTV
Категория: Компоненты
Категория: Компоненты
Объект экрана — Screen
Категория: Компоненты
Категория: Компоненты
Узнать используется ли файл другим приложением
Категория: Базы данных
Категория: Базы данных
Замена подстроки в строке
Категория: Текст и строки
Категория: Текст и строки
Перекодировка в DBASE
Категория: Базы данных
Категория: Базы данных
Перекодировка текста DOS-Windows-Koi8
Категория: Текст и строки
Категория: Текст и строки
Удалить файл в Корзину
Категория: Приложение
Категория: Приложение
Взять часть URL, которая следует после названия сайта
Категория: Интернет и Сети
Категория: Интернет и Сети
Delphi - Справочник: Format
Format
|
1 function Format ( Const Formatting : string; Const Data : array of const ) : string; 2 function Format ( Const Formatting : string; Const Data : array of const; FormatSettings : TFormatSettings ) : string; |
Функция (Unit SysUtils)
|
Богатое форматирование чисел и текста в строке
|
Описание:
|
Функция Format обеспечивает 'C' подобное форматирование множества простых типов данных в строке. Она обеспечивает очень точное управление по этому форматированию. Параметр Formatting определяет, как массив Data Данных управляется в возвращенной строке. Форматируемая cтрока может включать соединение обычных символов (которые передаются неизменными в строку результата), и символам форматирования данных. Такое форматирование лучше всего объясняется кодом примера. В простых условиях каждые данные, форматирующие подстроку начинаются с % и заканчиваются индикатором типа данных: d = Десятичное (целое число) e = Научный f = Установленный g = Генерал m = Деньги n = Число (плавающее) p = Указатель s = Строка u = Десятичное число без знака x = Шестнадцатеричный Общий формат форматирования каждой подстроки следующий: %[Index:][-][Width][.Precision]Type где квадратные скобки относятся к дополнительным параметрам, и :. - символы - литералы, первые 2 из которых используются, чтобы идентифицировать два из дополнительных параметров. Версия 2 этой функции - для использования в пределах потоков. Вы должны заполнить запись FormatSettings перед вызовом запроса. Она берёт местную копию глобальной переменной, форматирующей переменные, которые делают подпрограмму потоко-безопасной. |
Пример кода: Показ всех форматируемых типов данных
|
begin // Значение ширины диктует размер вывода // с пробелом, добавляющемся слева // Обратите внимание <>, символы добавляются, чтобы показать форматирование ShowMessage(Format('Padded decimal = <%7d>', [1234])); // С '-' оператором, данные выравниваются влево ShowMessage(Format('Justified decimal = <%-7d>', [1234])); // Значение точности вынуждает 0 дополнений к желательному размеру ShowMessage(Format('0 padded decimal = <%.6d>', [1234])); // Комбинация ширины и точности // Обратите внимание, что значение ширины предшествует значению точности ShowMessage(Format('Width + precision = <%8.6d>', [1234])); // Индексное значение позволяет следующему значению в массиве // данных быть измененным ShowMessage(Format('Reposition after 3 strings = %s %s %s %1:s %s', ['Zero', 'One', 'Two', 'Three'])); // Обратите внимание, испытание показало, что * для параметра ширины // может привести к ECONVERTERROR. ShowMessage(Format('In line = <%10.4d>', [1234])); ShowMessage(Format('Part data driven = <%*.4d>', [10, 1234])); ShowMessage(Format('Data driven = <%*.*d>', [10, 4, 1234])); end;
Результат:
|
Padded decimal = < 1234> Justified decimal = <1234 > 0 padded decimal = <001234> Width + precision = < 001234> Reposition after 3 strings = Zero One Two One Two In line = < 1234> Part data driven = < 1234> Data driven = < 1234> |
Примечание:
|
Различные опции форматирования, типа DecimalSeparator и CurrencyString используются для некоторых из этих опций форматирования. См. более определенные версии команд отображения данных, типа CurrToStrF для подробностей. |