Difference between revisions of "Poweredby/ru"
From Lazarus wiki
Jump to navigationJump to searchLine 28: | Line 28: | ||
Загрузить можно из lazarus CCR [https://sourceforge.net/p/lazarus-ccr/svn/HEAD/tree/components/ отсюда] | Загрузить можно из lazarus CCR [https://sourceforge.net/p/lazarus-ccr/svn/HEAD/tree/components/ отсюда] | ||
− | === | + | ===Установка=== |
− | # | + | #Создайте новую папку 'poweredby' |
− | # | + | #Распакуйте туда архив |
− | # | + | #В IDE Lazarus выберите пнкт меню 'Package' (Пакеты) --> 'Open Package File (*.lpk) (Открыть файл пакета) и откройте poweredby.lpk |
− | # | + | #На вопрос 'Open as a project' (Открыть как проект) ответьте 'yes' |
− | # | + | #Нажмите пункт Compile (Компилировать) |
− | # | + | #Нажмите пункт Use/Install (Использовать/Установить) |
− | # | + | #На вопрос 'would you like to compile Lazarus?' (Хотите пересобрать Lazarus?) ответьте 'yes' |
− | # | + | #После перезагрузки Lazarus'а нажмите на вкладку компонентов 'Additional', чтобы найти вновь установленный компонент 'poweredby' |
− | === | + | ===Использование=== |
− | * | + | *Создайте проект нового приложения |
− | * | + | *Бросьте компонент 'poweredby' на форму |
− | * | + | *Дважды щелкните по форме, чтобы показать метод TForm1.Create |
− | * | + | *Добавьте в код <code>poweredby1.showpoweredbyform</code> |
− | * | + | *Запустите приложение |
− | + | Вот и все! | |
− | ==== | + | ====Использование по-другому==== |
− | + | Компонент PoweredBy хорошо подходит для добавления в качестве субкомпонента к существующему настраиваемому компоненту: | |
<syntaxhighlight lang=pascal> | <syntaxhighlight lang=pascal> | ||
− | Uses uPoweredBy, Propedits, .. | + | Uses uPoweredBy, Propedits, ..//другие модули |
Type | Type | ||
Line 60: | Line 60: | ||
private | private | ||
fPoweredBy:TPoweredBy; | fPoweredBy:TPoweredBy; | ||
− | .. | + | //.... что-то подобное |
public | public | ||
− | procedure ShowPoweredByLogo; // | + | procedure ShowPoweredByLogo; // вызываем метод fPoweredBy.ShowPoweredByForm в этой процедуре |
− | .. | + | //.... что-то подобное |
published | published | ||
property PoweredBy:TPoweredBy read fPoweredBy write fPoweredBy; | property PoweredBy:TPoweredBy read fPoweredBy write fPoweredBy; | ||
− | .. | + | //.... что-то подобное |
end; | end; | ||
Line 74: | Line 74: | ||
Constructor TMyComponent.Create() | Constructor TMyComponent.Create() | ||
− | // | + | // Используем tPoweredBy акк субкомпонент |
− | // | + | // Регистрируем TClassPropertyEditor для его правильного отображения |
fPoweredBy := TPoweredBy.Create(Self); | fPoweredBy := TPoweredBy.Create(Self); | ||
− | fPoweredBy.SetSubComponent(true); // | + | fPoweredBy.SetSubComponent(true); // велим IDE сохранить измененные свойства |
fPoweredBy.Name:='PoweredBy'; | fPoweredBy.Name:='PoweredBy'; | ||
</syntaxhighlight> | </syntaxhighlight> | ||
− | === | + | ===Лицензия=== |
− | LGPL | + | Лицензия LGPL |
− | === | + | ===Платформа=== |
====Windows==== | ====Windows==== | ||
− | *PoweredBy | + | *PoweredBy появится в виде таящего изображения |
====Linux==== | ====Linux==== | ||
− | *PoweredBy | + | *PoweredBy отобразиться квадратного изображения |
− | ** | + | **Это связано с неспособностью набора виджетов GTK работать с экранами прозрачной формы. |
====macOS==== | ====macOS==== | ||
− | *PoweredBy | + | *PoweredBy отображает квадратный рисунок, аналогичный версии для Linux. |
− | === | + | ===Проверено=== |
Windows 7 32/64-bit Laz v1.x fpc 2.6.x | Windows 7 32/64-bit Laz v1.x fpc 2.6.x | ||
Linux 32-bit Laz v0.9.x fpc 2.2.x | Linux 32-bit Laz v0.9.x fpc 2.2.x | ||
− | === | + | ===Версия=== |
V1.0.1.2 | V1.0.1.2 | ||
− | ==== | + | ==== Поддержка ==== |
− | [mailto:minesadorada@charcodelvalle.com Email | + | [mailto:minesadorada@charcodelvalle.com Email автора] для любых вопросов |
− | === | + | ===См.также=== |
* [[Logos_and_Banners]] | * [[Logos_and_Banners]] | ||
* [[ScrollText|Standalone Scrolling Text component]] | * [[ScrollText|Standalone Scrolling Text component]] | ||
* [[Components_and_Code_examples|Components and code examples]] | * [[Components_and_Code_examples|Components and code examples]] |
Latest revision as of 14:40, 15 September 2020
│
English (en) │
français (fr) │
русский (ru) │
Компнент TPoweredBy
by minesadorada@charcodelvalle.com
Графика Windows
Графика Linux/macOS
Другие логотипы и баннеры
Описание
- Это визуальный компонент (устанавливается на вкладку 'Additional'), который отображается в виде значка на форме и выветает через 1 секунду (или в Linux/MacOS отображается на 1 секунду).
- Перетащите в событие
form.create()
Загрузка
Загрузить можно из lazarus CCR отсюда
Установка
- Создайте новую папку 'poweredby'
- Распакуйте туда архив
- В IDE Lazarus выберите пнкт меню 'Package' (Пакеты) --> 'Open Package File (*.lpk) (Открыть файл пакета) и откройте poweredby.lpk
- На вопрос 'Open as a project' (Открыть как проект) ответьте 'yes'
- Нажмите пункт Compile (Компилировать)
- Нажмите пункт Use/Install (Использовать/Установить)
- На вопрос 'would you like to compile Lazarus?' (Хотите пересобрать Lazarus?) ответьте 'yes'
- После перезагрузки Lazarus'а нажмите на вкладку компонентов 'Additional', чтобы найти вновь установленный компонент 'poweredby'
Использование
- Создайте проект нового приложения
- Бросьте компонент 'poweredby' на форму
- Дважды щелкните по форме, чтобы показать метод TForm1.Create
- Добавьте в код
poweredby1.showpoweredbyform
- Запустите приложение
Вот и все!
Использование по-другому
Компонент PoweredBy хорошо подходит для добавления в качестве субкомпонента к существующему настраиваемому компоненту:
Uses uPoweredBy, Propedits, ..//другие модули
Type
TMyComponent = Class(TComponent)
private
fPoweredBy:TPoweredBy;
//.... что-то подобное
public
procedure ShowPoweredByLogo; // вызываем метод fPoweredBy.ShowPoweredByForm в этой процедуре
//.... что-то подобное
published
property PoweredBy:TPoweredBy read fPoweredBy write fPoweredBy;
//.... что-то подобное
end;
procedure Register;
RegisterPropertyEditor(TypeInfo(TPoweredBy),
TMyComponent, 'PoweredBy', TClassPropertyEditor);
Constructor TMyComponent.Create()
// Используем tPoweredBy акк субкомпонент
// Регистрируем TClassPropertyEditor для его правильного отображения
fPoweredBy := TPoweredBy.Create(Self);
fPoweredBy.SetSubComponent(true); // велим IDE сохранить измененные свойства
fPoweredBy.Name:='PoweredBy';
Лицензия
Лицензия LGPL
Платформа
Windows
- PoweredBy появится в виде таящего изображения
Linux
- PoweredBy отобразиться квадратного изображения
- Это связано с неспособностью набора виджетов GTK работать с экранами прозрачной формы.
macOS
- PoweredBy отображает квадратный рисунок, аналогичный версии для Linux.
Проверено
Windows 7 32/64-bit Laz v1.x fpc 2.6.x Linux 32-bit Laz v0.9.x fpc 2.2.x
Версия
V1.0.1.2
Поддержка
Email автора для любых вопросов