NOTE VideoBIOSVersion currently works under

Компонент для получения информации о BIOS (версия, дата , ОС и версия VideoBios ).

Скачать (dcu + исходный текст) :

// BIOSVersion & date Delphi component // send you questions & comments to // aziz@telebot.net // NOTE VideoBIOSVersion currently works under WindowsNT only unit BIOSDate; type TBIOSDate = class(TComponent) published { Published declarations } /////обьявите не read-only - чтоб видны были в design time property BIOSVersion : string read fBIOSVersion {write fBIOSVersion}; property BIOSDate : string read fBIOSDate {write fBIOSDate}; property VideoBIOSVersion : string read fVideoBIOSVersion {write fVideoBIOSVersion}; property OS : string read fOs {write fOS}; end;

Автор: "JINX"

Функция для представления "суммы прописью".

На самом деле написать такую функцию несложно, но тем не менее этот вопрос несколько раз присылали на Круглый стол.
Присылайте свои варианты - соберем коллекцию :о).

Здесь собрано несколько решений этой задачи. Вы можете сами оценить стиль программирования, логичность и универсальность кода и выбрать что может Вам пригодиться.

Paul Smirnoff, Alexey Raymanov. Функция по значению вещественного числа генерирует строковое представление денежной суммы. Причем строковое представление денежной суммы может произовидиться либо в рублях и копейках, либо в долларах США и центах США.
Игорь Ковалевский
Владимир Папаев (правильное склонение)
Компонент из библиотеки vgVCL Владимира Гайтанова.

Содержание Назад Вперед