Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 11634
Последний выпуск: 19.06.2015

Волк в овечьей шкуре. (Как в Delphi создать приложение с поддержкой скинов)

Автор: F1reF0x
5 сентября 2005 года

Я не сторонник неправильных форм, приложений со сменой "шкурок" и различных визуальных эффектов.

Но пользователь зачастую выбирает программный продукт который красивее, а не удобнее. Конечно кто красивое не любит :). Понятно что калькулятор с поддержкой скинов, по крайней мере глупо, но в медиа плеерах например это часто можно увидеть. Сегодня я научу тебя как использовать в твоих приложениях поддержку скинов.

Первое что надо сделать это естественно установить библиотеку для работы со скинами. Их великое множество, но я предпочитаю работать DynamicSkinForm(http://www.almdev.com/), единственный его маленький недостаток что он требует денег за использование. Не хочешь что бы при запуске твоей программы выскакивало окошко с надписью "Это приложение использует незрегистрироваый DynamicSkinForm", либо плати кровные WMZ либо качай сам знаешь что. Зато его большой плюс что ты сам можешь создавать спины при помощи утилиты SkinBuilder. Теперь приступим.

Для начала кинь на форму компонент который называется spSkinData, со вкладки SkinPack. Закинул? Ок теперь добавляй туда spDynamicSkinForm. Зачем это надо. Первый компонент открывает твои шкурки, а второй уже "одевает" шкурку.

Теперь добавь одну spSkinEdit, один spSkinSpeedButton, spOpenSkinDialog со вкладки SkinPackDialogs ну и добавь ещё spSkinButton для наглядности. Теперь создай обработчик события OnCreate для формы и напишу туда всего одну строчку кода.

SpSkinData.LoadFromCompressedFile('YourSkin.skn');

Внимание. Если твой скит находится не в одной директории с исполняемым файлом приложения то ничего и не откроется.

Теперь давай напишем код для смены скинов.

procedure TForm1.spSkinSpeedButton1Click(Sender: TObject);
begin
if spOpenSkinDialog.Execute then
   SpSkinData.LoadFromCompressedFile('YourSkin.skn');
end;

Теперь у spSkinEdit, у spSkinSpeedButton и spSkinButton в параметре SkinData выстави spSkinData.

Вот и всё. Можно запускать, менять радоваться и пускать слюни от счастья. Ведь теперь и ты можешь встроить в свой калькулятор поддержку шкурок.

Оставить комментарий

Комментарий:
можно использовать BB-коды
Максимальная длина комментария - 4000 символов.
 

Комментарии

1.
Аноним
Мне нравитсяМне не нравится
10 марта 2006, 12:50:57
Интересненько, народ, кто знаэт, где взять такую библиотеку бесплатно? Буду очень благодарен!
2.
Аноним
Мне нравитсяМне не нравится
3 декабря 2005, 20:08:15
Огромное спасибо !!!!
очень помогло
3.
Аноним
Мне нравитсяМне не нравится
15 ноября 2005, 00:03:29
Narod,podkinite variant so skinami,no na Builder-e.
Proekt goriiiiit.Zaranee blagodarchik.Pivo s menea.
4.
Аноним
Мне нравитсяМне не нравится
28 октября 2005, 06:25:28
А я например устал пользоваться чужим кодом, по ламерски как-то.
Вот еслиб объяснили как самому такое зделать......
5.
Аноним
Мне нравитсяМне не нравится
15 сентября 2005, 06:56:50
Абалдеть!!! у меня уже потекли слюни и сопли! Вот теперь я действительно крут! Спасибо вам!
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог