Логин: Пароль:    Регистрация Всеми возможностями сайта можно пользоваться
только после авторизации.
   Забыли пароль?

Поиск
L



Статистика
u
Пользователи онлайн: нет
Гостей онлайн: 2
Всего онлайн: 2
Зарегистрировано юзеров: 6358
Комментариев на сайте: 645
Новый юзер: Realtyvaday



Последние комментарии
c
Aqel прокомментировал "Урок 71 - Работа с сжатыми файлами":
GZip псевдоархив, на мой вопрос тоже не отвечают, как распаковать отдельные файлы/папки...
Pingitrus прокомментировал "Урок 71 - Работа с сжатыми файлами":
Есть еще кто нибудь живой на этом сайте, кто сможет помочь? Так то все работает, zip и rar распаковывает, но у меня есть файл dat который сжат GZip, почему то его не удается распаковать или так не получится так как этот файл не является архивом или является?)) пишет ошибку что неверная функция



Мы в соцсетях
c
Delphi
Урок 16 - Знакомство с компонентами (часть 7/12)

  Продолжаем изучать закладку Win32 и в этом уроке мы познакомимся с двумя компонентами, а именно: Animate и StatusBar.

Компонент Animate позволяет проигрывать на форме клипы в формате AVI и отображать стандартную анимацию. Но я не рекомендую загружать в этот компонент клипы, потому что размер файла должен быть небольшой и должно стоять определенное сжатие. Лично я использую этот компонент для отображения стандартных анимаций в программе.
Для этого у компонента Animate есть свойство CommonAVI. Из выпадающего списка значений можно выбрать любую анимацию. Давайте выберем aviCopyFile и изменим свойство Active в значение True. У нас на форме сразу отображается анимация копирования файлов.

Анимация копирования файлов


Скажу сразу, если у вас не windows xp, то отображение стандартных анимаций не гарантируется, так как их может не быть в системе.
Свойство Transparent отвечает за прозрачность фона анимации. Если стоит значение True, то фон прозрачен.

Двигаемся дальше и переходим к следующему компоненту StatusBar. Кидаем его на форму и тут же видим, что он прилипает к нижней части формы (что бы изменить положение компонента воспользуйтесь свойством Align). StatusBar необходим прежде всего для отображения справочной информации и каких либо подсказок. Давайте создадим несколько панелей. Делается это очень просто. Кликаем правой кнопкой мыши по компоненту StatusBar и нажимаем на первый же пункт меню Panels Editor. Появляется окошко редактирования панелей.

Окошко редактирования панелей


Нажимаем на желтую кнопочку Add New и создаем новую панель.

Создание новой панели


Сразу мы можем ввести сюда какой-нибудь текст, например "Панель", задать ширину панели, ну и так далее...

Изменение свойст панели


Давайте еще создадим 2 панели для дальнейшего примера, но не будем у них менять никаких свойств.
В компоненте StatusBar очень легко отображать всплывающие подсказки. Для этого поместим на форму компонент Button и в свойстве Hint (всплывающая подсказка) напишем "Кнопка". Теперь выделяем компонент StatusBar и в свойстве AutoHint меняем значение на True. Компилируем программу, наводим на кнопку и видим, что подсказка отобразилась в первой панели компонента StatusBar.
Если мы хотим вывести текст в определенную панель, то нужно написать следующий код:
procedure TForm1.Button1Click(Sender: TObject); //событие OnClick у компонента Button
begin
StatusBar1.Panels.Items[2].Text:='Текст'; //строка кода
end;
Здесь мы обращаемся к третей по счету панели, которая имеет индекс 2 и изменяем у нее свойство Text.
Вы спросите: "Почему же так? Панель третья, а индекс у нее 2". Все просто, индекс начинается с нуля. То есть первая панель имеет индекс 0, вторая индекс 1, третья индекс 2 и так далее...
Запустите программу и посмотрите результат.

В следующем уроке мы продолжим изучение компонентов с вкладки Win32.

Ну вот и всё! Удачи!
Встретимся в следующем уроке!


Источник: www.thedelphi.ru
Автор: Савельев Александр
Опубликовано: 22 Марта 2013
Просмотров: 14671

Урок 15 - Знакомство с компонентами (часть 6/12) Урок 17 - Знакомство с компонентами (часть 8/12)

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



аватар Добавил(а): FallenRu [Новичок] Дата: 2013-05-26
Саш,добавь плз ссылку на следующий урок.




аватар Добавил: Admin [Сэнсэй] vk.com/savelev_a_y Дата: 2013-05-26
готово.




аватар Добавил(а): FallenRu [Новичок] Дата: 2013-05-26
Благодарю




аватар Добавил: Denismen [Новичок] Дата: 2013-09-27
Сенк




аватар Добавил(а): niksan [Новичок] Дата: 2014-05-28
А Вы можете подсказать, где в Windows7 находятся эти анимации? Или где их можно скачать?