TParamText Dialogs
TParamText порожден от TStaticText, который использует параметризованные строки текста для форматного вывода, используя процедуру FormatStr.
Поля
ParamCount ParamCount: Integer; ParamCount указывает число параметров, содержащихся в ParamList.
См. так же: TParamText.ParamList
ParamList ParamList: Pointer; ParamList - это нетипированный указатель на массив или запись указателей или значений типа LongInt, используемый как параметр форматирования для текстовой строки.
Методы
Init constructor Init(var Bounds: TRect; AText: String; AParamCount: Integer); Инициализирует объект статического текста, вызывая TStaticText.Init с заданным Bounds и текстовой строкой AText, которая может содержать спецификаторы формата в форме %[-][nnn]X, который будет замещаться параметрами, переданными во время выполнения. Число параметров, переданных в ParamCount, присваивается полю ParamCount. Спецификаторы формата детально описаны в процедуре FormatStr.
См. так же: TStaticText.Init, FormatStr процедуры
Load constructor Load(var S: TStream); Распределяет объект TParamText в куче и загружает его занчение из потока S, вызывая TStaticText.Load, затем читая поле ParamCount из потока.
См. так же: TStaticText.Load
DataSize function DataSize: Word; virtual; Возвращает размер данных, требуемый параметрами объекта, т.е. ParamCount*SizeOf(LongInt).
GetText procedure GetText(var S: String); virtual; Создает форматированную строку текста в S, выполняя объединение параметров, заданных в ParamList в текстовую строку Text с помощью вызова FormatStr(S, Text^, ParamList^).
См. так же: FormatStr процедуры
SetData procedure SetData(var Rec); virtual; Этот видимый элемент читает DataSize байт в ParamList из Rec.
См. так же: TView.SetData
Store procedure Store(var S: TStream); Сохраняет объект в потоке S, вызывая TStaticText.Store, затем записывая поле ParamCount в поток.
См. так же: TStaticText.Store
Палитра
Объекты TParamText используют палитру по умолчанию CStaticText для отображения 6-го элемента в палитру стандартного диалога.
1 +===+ CStaticText | 6 | +=+=+ Текст -----+