ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 06.12.2024
Просмотров: 968
Скачиваний: 1
СОДЕРЖАНИЕ
1. Компоненты страницы standard
2. Компоненты страницы additional
5. Компоненты страницы samples
ЧасТь 1 . Практикум по программированию в delphi Запуск и начало работы в среде delphi
Работа 1. Создание надписей и установка кнопок на форме
Работа 2. Ввод и обработка произвольных текстовых и числовых данных.
Работа 4. Создание и обработка табличных данных. Использование кнопок с фиксацией и с изображением
Работа 5. Создание и просмотр рисунков
Работа 6. Работа со списками, фигурами и регуляторами
1. Компоненты страницы standard
1.1. TFrame - рама и шаблоны компонентов
1.2. TMainMenu - главное меню формы (программы)
1.3. TPopupMenu - вспомогательное (локальное) меню
1.8. TCheckBox - независимый переключатель
1.11. TComboBox - раскрывающийся список выбора
1.12. TScrollBar - управление значением величины
1.13. TGroupBox - панель группирования
2. Компоненты страницы additional
2.1. TBitBtn - кнопка с изображением
2.2. TSpeedButton - кнопка для инструментальных панелей
2.3. TMaskEdit - специальный редактор
2.4. TStringGrid - таблица строк
2.5. TDrawGrid - произвольная таблица
2.6. TImage - отображение картинок
2.7. TShape - стандартная фигура
2.10. TСheckListBox - группа независимых переключателей
2.11. TSplitter - компонент для изменения размеров
2.12. TStaticText - метка для отображения текста
2.13. TControlBar - инструментальная панель
3.1. TTabControl - набор закладок
3.2. TPageControl - набор страниц с закладками
3.3. TImageList - хранилище изображений
3.4. TRichEdit - ввод и отображение rtf-текста
3.8. THotKey - ввод акселератора
3.10. TDateTimePicker - ввод и отображение даты/времени
3.12. TTreeView - дерево иерархии
3.13. TListView - список просмотра
3.15. TStatusBar - информационная панель
3.16. TToolBar и ToolButton - инструментальная панель и ее кнопки
3.17. TCoolBar и tCoolBand - инструментальная панель и полосы для нее
3.18. TPageScroller - панель с прокруткой
4.2. TPaintBox - окно для рисования
4.3. TMediaPlayer - медиаплейер
5. Компоненты страницы samples
5.1. TGauge - индикатор величины
5.2. TColorGrid - выбор или отображение цвета
5.3. TSpinButton - спаренная кнопка
5.4. TSpinEdit - редактор для ввода целого числа
5.5. TDirectoryOutLine - отображение структуры каталогов
5.6. TCalendar - ввод и отображение даты
5.2. TColorGrid - выбор или отображение цвета
Компонент предназначен для выбора и/или отображения цветов из 16-цветной палитры. Выбирать/отображать можно два цвета: основной и фоновый. Основной выбирается щелчком левой кнопки мыши и отображается символами fg, фоновый выбирается правой кнопкой и отображается символами bg (если оба цвета совпадают, соответствующая клетка таблицы помечается символами fb).
Свойства компонента:
|
BackgroundColor |
Содержит выбранный фоновый цвет |
|
BackgroundEnabled |
Разрешает/запрещает выбор фонового цвета. |
|
BackgroundIndex |
Содержит индекс выбранного фонового цвета |
|
ClickEnablesColor |
Разрешает/запрещает выбор цветов |
|
GridOrdering |
Определяет конфигурацию таблицы |
|
ForegroundColor |
Содержит выбранный основной цвет |
|
ForegroundEnabled |
Разрешает/запрещает выбор основного цвета. |
|
Foregroundlndex |
Содержит индекс выбранного основного цвета |
|
Selection |
Содержит индекс последнего выбранного цвета |
Индекс цвета - это число в диапазоне О... 15, указывающее номер соответствующей ячейки в порядке перехода от самых темных цветов к самым светлым: 0 - ячейка с черным цветом, 1 - с коричневым, ..., 15 - с белым цветом.
Пары свойств BackgroundEnabled - ClickEnablesColor И ForegroundEnabled - ClickEnablesColor запрещают выбор и отображение соответствующего цвета только в том случае, когда каждое из них имеет значение False. Однако даже в этом случае свойство selection хранит номер ячейки таблицы, по которой последний раз был произведен щелчок левой или правой кнопкой мыши. Это свойство изменяется до возникновения события от мыши и при необходимости может использоваться для выбора цвета без его отображения. С помощью метода function ColorToIndex(AColor: TColor): Integer; программа может получить индекс табличного цвета, наиболее близкого к цвету AColor. Событие property OnChange: TNotifyEvent; возникает только при разрешенном выборе/отображении соответствующего цвета.
5.3. TSpinButton - спаренная кнопка
В отличие от компонента TUpDown компонент TSpinButton не связан с регулированием числовой величины и может использоваться просто как пара кнопок: верхняя (Op) и нижняя (Down). Для компонента следует написать обработчики его событий OnUpClick и OnDownClick, в которых реализуется реакция программы на щелчок по той или иной кнопке.
Рисунки на кнопках определяются свойствами UpGlyph и DownGiyph. Каждый рисунок может содержать 1, 2 или 3 изображения: 1-е - для нормальной кнопки, 2-е - для запрещенной, 3-е - для нажатой.
5.4. TSpinEdit - редактор для ввода целого числа
Компонент TSpinEdit предназначен для ввода/отображения числа. Он представляет собой комбинацию специализированного потомка однострочного редактора rcustomEdit и кнопок TSpinButton. Редактор способен вводить только числа (в этом и заключается его специализация), а кнопки используются для изменения числа на некоторую фиксированную величину.
Свойства компонента:
|
Button |
Содержит ссылку на встроенный объект TSpinButton |
|
EditorEnabled |
Разрешает/запрещает использовать редактор для ручного ввода числа |
|
Increment |
Содержит число, на которое будет изменяться свойство value при нажатии кнопок TSpinButton |
|
MaxValue |
Содержит верхнюю границу диапазона возможных значений value |
|
MinValue |
Содержит нижнюю границу диапазона возможных значений value |
|
Value |
Содержит текущее значение числовой величины |
5.5. TDirectoryOutLine - отображение структуры каталогов
Компонент предназначен для отображения древовидной структуры каталогов. В отличие от TDirectoryListBox компонент отображает полную структуру каталогов, а не маршрут доступа к одному из них.
Компонент является наследником класса TCustomOutLine, и поэтому многие его свойства совпадают с аналогичными свойствами другого наследника этого класса компонента TOutLine. Свойство TextCase определяет высоту букв в именах каталогов: tcLowerCase - строчные буквы; tcUpperCase - заглавные буквы; tcAsis - строчные и заглавные буквы.
Следующие два свойства доступны только на этапе прогона программы: property Drive: Char; property Directory: TFileName; . Первое определяет выбранный диск, второе - выбранный каталог.
5.6. TCalendar - ввод и отображение даты
Компонент TCalendar отображает календарь на выбранный месяц и год. Его свойства Day, Month и Year могут содержать любую дату от 1 до 9999 года от Рождества Христова.
Свойства:
|
CalendarDate |
Содержит выбранную дату |
|
|
CellText[ACol, ARow] |
Содержит текст в ячейке календаря на пересечении столбца ACol с рядом ARow (только для чтения) |
|
|
Day |
Определяет выбранный день месяца |
|
|
GridLineWidth |
Устанавливает толщину линий таблицы календаря |
|
|
Month |
Определяет выбранный месяц |
|
|
Readonly |
Если содержит True, пользователь не может выбрать другую дату |
|
|
StartOfWeek |
Определяет день недели, который будет отображаться в самом левом столбце таблицы |
|
|
UseCurrentDate |
Если содержит True, компонент будет показывать текущую системную дату |
|
|
Year |
Определяет выбранный год |
|
|
Методы компонента: |
|
|
|
procedure NextMonth; |
Показывает календарь на следующий месяц |
|
|
procedure NextYear; |
Показывает календарь на следующий год |
|
|
procedure PrevMonth; |
Показывает календарь на предыдущий месяц |
|
|
procedure PrevYear; |
Показывает календарь на предыдущий год |
|
Приложения
1. Процедуры и функции для работы со строками
|
Function AnsiLowerCase(const S: String ): String; |
Возвращает исходную строку S, в которой все заглавные буквы заменены на строчные в соответствии с национальной кодировкой Windows (т. е. с учетом кириллицы) |
|
|
Function AnsiUpperCase(const S: String ): String; |
Возвращает исходную строку s, в которой все строчные буквы заменены на заглавные в соответствии с национальной кодировкой Windows |
|
|
Function Concat(Sl [, S2, ..., SN]: String ): String; |
Возвращает строку, представляющую собой сцепление строк-параметров S1, S2, ... , SN |
|
|
Function Copy(St: String; Index, Count: Integer): String; |
Копирует из строки St count символов, начиная с символа с номером Index |
|
|
Procedure Delete(St: String; Index, Count:" Integer |
Удаляет count символов из строки St, начиная с символа с номером index |
|
|
Procedure Insert(SubSt: String; St, Index: Integer); |
Вставляет подстроку SubSt в строку St, начиная с символа с номером Index |
|
|
Function Length(St: String): Integer; |
Возвращает текущую длину строки St |
|
|
Function LowerCase(const S:String): String; |
Возвращает исходную строку S, в которой все латинские заглавные буквы заменены на строчные |
|
|
procedure OleStrToStrVar(Source: PWideChar; var Dest:String) ; |
Копирует “широкую” (двухбайтную) строку в обычную строку Object Pascal |
|
|
Function Pos(SubSt, St:String): Integer |
Отыскивает в строке St первое вхождение подстроки SubSt и возвращает номер позиции, с которой она начинается. Если подстрока не найдена, возвращается ноль |
|
|
Procedure SetLength(St:String; NewLength: Integer); |
Устанавливает новую (меньшую) длину NewLength строки St. если NewLength больше текущей длины строки, обращение к SetLength игнорируется |
|
|
function StringOfChar(Ch:Char; Count: Integer):String; |
Создает строку, состоящую из Count раз повторенного символа ch |
|
|
function StringToOleStr(const Source: String):PWideChar; |
Копирует обычную строку в двухбайтную |
|
|
function StringToWideChar(const Source: String; Dest:PWideChar; DestSize: Integer) : PWideChar; |
Преобразует обычную строку в строку с символами UNICODE |
|
|
Function Uppercase(const S:String): String; |
Возвращает исходную строку S, в которой все строчные латинские буквы заменены на заглавные |
|
|
Подпрограммы преобразования строк в другие типы |
||
|
Function StrToCurr(St: String): Currency; |
Преобразует символы строки St в целое число типа Currency. Строка не должна содержать ведущих или ведомых пробелов |
|
|
Function StrToDate(St: String): TDateTime; |
Преобразует символы строки St в дату. Строка должна содержать два или три числа, разделенных правильным для Windows разделителем даты (в русифицированной версии таким разделителем является “.”). Первое число - правильный день, второе - правильный месяц. |
|
|
Function StrToDateTime(St: String): TDateTime;
|
Преобразует символы строки St в дату и время. Строка должна содержать правильную дату (см. StrToDate) и правильное время (см. StrToTime), разделенные пробелом, например: StrToDateTime('28.06 18:23') |
|
|
Function StrToFloat(St:String): Extended |
Преобразует символы строки St в вещественное число. Строка не должна содержать ведущих или ведомых пробелов |
|
|
Function StrToInt(St:String): Integer; |
Преобразует символы строки St в целое число. Строка не должна содержать ведущих или ведомых пробелов |
|
|
Function StrToIntDef(St:String; Default: Integer):Integer; |
Преобразует символы строки St в целое число. Если строка не содержит правильного представления целого числа, возвращается значение Default |
|
|
Function StrToIntRange(St:String; Min, Max: Longint):Lomgint; |
Преобразует символы строки St в целое число и возбуждает исключение ERangeError, если число выходит из заданного диапазона Min.. .мах |
|
|
Function StrToTime(St:String): TDateTime;
|
Преобразует символы строки St во время. Строка должна содержать два или три числа, разделенных правильным для Windows раздели телем времени (для русифицированной версии таким разделителем является “:”). |
|
|
Procedure Val(St: String; var X; Code: Integer); |
Преобразует строку символов St во внутреннее представление целой или вещественной переменной х, которое определяется типом этой переменной. |
|
|
Подпрограммы обратного преобразования |
||
|
Function DateTimeToStr(Value: TDateTime): String; Procedure DateTime-ToString(var St: String; Format: String;- Value: TData-Time); |
Преобразует дату и время из параметра в строку символов Преобразует дату и время из параметра value в строку St в соответствии со спецификаторами параметра Format (см. пояснения ниже) |
|
|
Function DateToStr(Value: TDateTime): String; |
Преобразует дату из параметра value в строку символов |
|
|
Function FloatToStr(Value: Extended): String; |
Преобразует вещественное значение value в строку символов. |
|
|
Function FloatToStrF(Value: Extended; Format: TFloatPormat; Precision, Digits: Integer) : String; |
Преобразует вещественное значение Value в строку символов с учетом формата Format и параметров precision и Digits (см. пояснения ниже). |
|
|
Function Format(const Format: String; const Args: array of const): Strings; |
Преобразует произвольное количество аргументов открытого массива Args в строку в соответствии с форматом Format (см. пояснения ниже) |
|
|
Function FormatDateTime (Format: String; Value:.TDateTime): String; |
Преобразует дату и время из параметра value в строку символов в соответствии со спецификаторами параметра Format (см. пояснения ниже) |
|
|
Function FormatFloat(Format:String; Value: Extended): String; |
Преобразует вещественное значение value в строку символов с учетом спецификаторов формата Format (см. пояснения ниже) |
|
|
function IntToHex(Value: Integer; Digits: Integer):Strings; |
Преобразует целое число Value в строку символьного представления шестнадцатеричного формата: Digits - минимальное количество символов в строке |
|
|
Function IntToStr(Value: Integer) : String; |
Преобразует целое значение Value в строку символов |
|
|
Procedure Str(X [:Width[:Decimals]]; var St:String) ;
|
Преобразует число х любого вещественного илицелого типов в строку символов St; параметры width и Decimals, если они присутствуют, задают формат преобразования: |
|
|
Function TimeToStr(Value: TDateTime): String; |
Преобразует время из параметра Value в строку символов |
|