Poweredby
From Lazarus wiki
Jump to navigationJump to searchThe printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.
│
English (en) │
français (fr) │
русский (ru) │
TPoweredBy component
by minesadorada@charcodelvalle.com
Windows graphic
Linux/macOS graphic
Other logos and banners
Summary
- A visual component (installed on the 'Additional' tab) that fades in above shaped graphic image for 1 second (or in Linux/MacOS displays it for 1 second)
- Drop into your form.create() event
Download
Download from the lazarus CCR here
Install
- Make a new folder 'poweredby'
- Unzip the archive into the folder
- In the Lazarus IDE choose 'Open' poweredby.lpk
- When asked 'Open as a project' answer 'yes'
- Click Compile
- Click Use/Install
- When asked 'would you like to compile Lazarus?'m answer 'yes'
- After Lazarus has restarted, check the 'Additional' component tab/palette for the new 'poweredby' component
Use
- Start a new project application
- Drop a 'poweredby' component onto the form
- Double-click the empty form to show the TForm1.Create method
- Add poweredby1.showpoweredbyform
- Run the application
That's it!
Other uses
The PoweredBy component lends itself well to adding as a subcomponent to an existing custom component:
Uses uPoweredBy, Propedits, ..other units
Type
TMyComponent = Class(TComponent)
private
fPoweredBy:TPoweredBy;
..other stuff
public
procedure ShowPoweredByLogo; // Call fPoweredBy.ShowPoweredByForm method in this proc.
..other stuff
published
property PoweredBy:TPoweredBy read fPoweredBy write fPoweredBy;
..other stuff
end;
procedure Register;
RegisterPropertyEditor(TypeInfo(TPoweredBy),
TMyComponent, 'PoweredBy', TClassPropertyEditor);
Constructor TMyComponent.Create()
// Use tPoweredBy as a subcomponent
// Register a TClassPropertyEditor in order to display it correctly
fPoweredBy := TPoweredBy.Create(Self);
fPoweredBy.SetSubComponent(true); // Tell the IDE to store the modified properties
fPoweredBy.Name:='PoweredBy';
License
LGPL license
Platform
Windows
- PoweredBy will fade-in a shaped graphic
Linux
- PoweredBy will display a square graphic
- This is due to the inability of GTK widgetset to deal with transparent shaped screens
macOS
- PoweredBy displays a square graphic, similar to the Linux version.
Tested
Windows 7 32/64-bit Laz v1.x fpc 2.6.x Linux 32-bit Laz v0.9.x fpc 2.2.x
Version
V1.0.1.2
Support
Email the author with any queries