Delphi→ Компонент QuickSlide

Окт 17, 2010

Ранее я уже говорил о шаблоне выезжающей панели. На этот раз шаблон был полностью переработан и переделан в отдельный компонент, подключаемый к любому проекту в одну строчку. О том как им пользоваться узнаете далее…

Поместите модуль qslide.pas и файл ресурсов qslib.dll в папку проекта, после необходимо прописать в раздел uses проекта(!) модуль QSlide. Для того, чтобы перейти в файл проекта, нажмите правой кнопкой по имени проекта в Project Manager и выберите View Source.


Поместите строку QuickSlide.Install до Application.Run.
Теперь можно запускать проект.

program NewProject;

uses
  Forms,
  QSlide, {подключаем qslide.pas}
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  QuickSlide.Install; {запуск модуля}
  Application.Run;
end.

Компонент поддерживает свойства Speed и Resource.
QuickSlide.Speed задает скорость открытия панели (по умолчанию стоит 20).
QuickSlide.Resource имя файла с ресурсами для скинирования (по умолчанию qslib.dll).

Похожие статьи:

  1. омпонент Antigate для Delphi
  2. Создаем компонент TCP на Winsock (Часть 1)
  3. Создаем компонент TCP на Winsock (Часть 2)
  4. Заготовка выезжающей панели
  5. Функции кодирования Base64

Добавить комментарий

Ваш адрес email не будет опубликован.