|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
|
Объект TInputDialog обеспечивает общее диалоговое окно для получения текстового ввода от пользователя (одной строки текста).
Buffer: PChar;
Указывает на буфер, возвращающий текстовый ввод пользователя. При передаче конструктору диалогового окна ввода содержит используемый по умолчанию текст, который первоначально выводится в редактируемом управляющем элементе.
BufferSize: Word;
Содержит размер буфера, который возвращает ввод пользователя.
Caption: PChar;
Указывает на строку, которая выводится в качестве заголовка диалогового окна.
Prompt: PChar;
Указывает на подсказку диалогового окна ввода, которая выводится над строкой ввода.
Ниже описываются методы, определенные в данном объекте.
constructor Init(AParent: PWindowsObject; ACaption, APrompt, ABuffer: PChar; ABufferSize: Word);
Строит файловый диалоговый блок с порождающим окном, переданным в параметре AParent, вызывая наследуемый от TDialog конструктор Init. Имя шаблона ресурса определяется поиском в BWCCClassName. Если приложение использует BWCC, диалоговый блок ввода будет использовать ресурс BWCC. В противном случае используется обычный диалоговый блок Windows.
См. также: TDialog.Init.
function CanClose: Boolean; virtual;
Считывает в буфер Buffer из управляющего элемента редактирования диалогового блока до BufferSize символов, затем возвращает True, указывая, что диалоговый блок можно закрыть.
procedure SetupWindow; virtual;
При установке окна вызывает метод SetupWindow, наследуемый из TDialog, затем устанавливает заголовок диалогового блока в соответствие со строкой Caption. Текст подсказки устанавливает в Prompt, текст буфера - в Buffer, а затем ограничивает число вводимых пользователем символов значением BufferSize - 1.
TItemList = array[0..MaxCollectionSize - 1] of Pointer;
Назначение: Массив общих указателей, предназначенных для внутреннего использования в TCollection.