- •Программа дисциплины,
- •Задания на домашнюю контрольную работу №2 и
- •Методические указания по их выполнению
- •Для учащихся заочного отделения
- •Раздел 6 Элементы системного программирования на Паскале
- •Тема 6.1 Доступ к системным ресурсам
- •2 Выполните задание, добавив, если необходимо, защиту от неправильного ввода данных. Форма обязательно должна содержать кнопку для закрытия приложения:
- •1 Состав проекта
- •2 Работа с проектом
- •3 Назначение и свойства компонентов страницы Standard
- •4 Обработка массивов при помощи компонентов страницы Standard
- •5 Назначение и свойства компонентов страницы Additional
- •Image – изображение
- •6 Назначение и свойства компонентов страницы Win 32
- •7 Ввод и вывод даты и времени
- •8 Назначение и свойства компонентов страницы Standard
- •9 Динамический обмен данными — dde
- •10 Назначение и свойства компонентов страницы Dialogs
- •11 Назначение и свойства компонентов страницы Samples
- •12 Обработка файлов
7 Ввод и вывод даты и времени
MonthCaLendar – календарь
В
красном кружке выделена текущая дата
(она же более развернуто указана в нижней
части календаря), синим подсвечена дата,
выбранная при помощи мыши. Слева показаны
номера недель в году (свойство WeekNumbers).
MaxDate Максимальная дата, до которой календарь может быть прокручен помесячно. Тип свойства — TDate (см. ниже)
MinDate Минимально допустимая для просмотра дата
ShowToday Имеет значение True, если текущая дата дополнительно отображается в нижней части календаря
ShowTodayCircle Имеет значение True, если текущая дата выделяется красным кружком.
Работа с календарем происходит на основе типа TDate (или его аналога TDateTime).
Текущая выбранная дата записывается в свойство Date этого типа. Кроме типа TDateTime можно применять также системный формат TSystemTime, который содержит полное описание текущих даты и времени:
Для работы с этими форматами в системе Delphi 7 имеется набор стандартных подпрограмм.
function Date: TDateTime; Возвращает текущую дату
function DayOfWeek(Date: TDateTime): Integer; Номер дня недели, число от 1 до 7. (1 — воскресенье, 7 — суббота)
procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word); – Выделение из даты года, месяца, дня и размещение их в переменных указанных на месте Year, Month, Day и имеющих тип Word.
procedure DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word); – Выделение из даты часов, минут, секунд и миллисекунд
function DateTimeToStr(DateTime: TDateTime): string; Преобразование даты и времени в строку
function DateToStr(Date: TDateTime): string; Преобразование даты в строку
function StrToDateTime (const S: string): Преобразование строки, хранящей описание TDateTime; даты в формате, соответствующем локальным требованиям Windows, в дату и время формата TDateTime
function StrToTime(const S: string): TDateTime; Преобразование строки, хранящей описание даты в формате, соответствующем локальным требованиям Windows, во время в формате TDateTime
function StrToDate (const S: string): TDateTime; Преобразование строки, хранящей описание даты в формате, соответствующем локальным требованиям Windows, в дату формата TDateTime.
DateTimePicker – компонент Поле ввода даты/времени
К
омпонент
представляет собой раскрывающийся
список и используется для ввода даты и
времени с клавиатуры (по формату в
соответствии с локальными настройками
Windows). При раскрытии списка открывается
календарь (компонент TMonthCalendar).
DateMode – выбор способа работы компонента.
Kind – Если значение свойства равно dtkDate, компонент используется для ввода даты, в противном случае (значение dtkTime) — для ввода времени
Когда дата или время в поле изменяются, генерируется сообщение OnChange. При раскрытии списка, содержащего календарь, объект пол учит сообщение OnDropDown, при закрытии — сообщение OnCloseUp.
8 Назначение и свойства компонентов страницы Standard
Рисунок 3- Компоненты страницы Standard
Timer – таймер
И
спользуется
если в программе надо совершать некие
действия через определенный промежуток
времени. Например анимация и мультипликация.
Имеет два свойства:
Enabled – принимает значение True, если требуется, чтобы Timer включился.
Interval – задает фиксированный промежуток времени между срабатываниями в миллисекундах. 1000 = 1 секунда.
Событие, у данного компонента, только одно — ОnТimег. Оно возникает, когда истекает указанный в свойстве Interval промежуток времени с момента последней генерации этого события.
Если для работы необходимо знать системное время, то его возвращает функция Time: TDateTime;
PaintBox – компонент для рисования
С
пециальный
компонент, имеющий канву (свойство
компонента, позволяющее рисовать на
его поверхности) и позволяющий рисовать
на ней. Рисование на PaintBox вместо формы
не имеет никаких преимуществ, кроме,
может быть, некоторого облегчения в
расположении одного или нескольких
рисунков в площади окна.
MediaPlayer – мультимедийный проигрыватель
П
редназначен
для воспроизведения в рамках программы
музыкальных и видеоклипов в различных
форматах, поддерживаемых драйвером MCI
(Media Control Interface).
CoLoredButtons – Настройка видимости различных кнопок управления. Можно сделать невидимым и весь компонент, установив его свойство Visible равным False. Это нужно, если требуется, например, проигрывать фоновую музыку или прокручивать небольшой анимационный клип.
Enabled Buttons – позволяет оставить видимыми некоторые кнопки, одновременно запретив их использование.
Тип мультимедийного файла, который будет воспроизводиться, задается одним из двух возможных способов: явно в свойстве DeviceType (Тип устройства) или загрузкой файла на этапе проектирования (с использованием свойства fileName). В последнем случае в качестве типа устройства указывается значение dtAutoSelect (автоматическое определение типа в зависимости от расширения файла).
Display – задается объект, в котором будет демонстрироваться видео, обычно, для этого используется компонент TPanel. В Delphi 7 входит пример Coolstuf, содержащий два видеоклипа.
Этот пример хранится в подкаталоге Demos\Coolstuf той папки, куда установлена система Delphi 7.
AutoEnable – Имеет значение True, если проигрыватель автоматически управляет состоянием своих кнопок. Например, когда клип закончен, кнопка Play становится недоступной, пока не будет выполнена команда Перемотка в начало
AutoOpen – Имеет значение True, если при запуске выполняется автоматическое открытие устройства MCI, предназначенного для воспроизведения информации заданного типа.
O
leContainer
– контейнер
OLE, основной компонент, обеспечивающий
внедрение и связывание различных
объектов в приложении.
