Difference between revisions of "Poweredby/fr"
From Free Pascal wiki
Jump to navigationJump to search (Created page with "{{Poweredby}} <br/> =Composant TPoweredBy= ==par minesadorada@charcodelvalle.com== ==Graphique Windows graphic=== File:powered_by_graphic.png ==Graphique Linux/MacOS== F...") |
m (→Summary) |
||
Line 12: | Line 12: | ||
---- | ---- | ||
− | == | + | ==Résumé== |
− | * | + | *Un composant visuel (placé dans l'onglet 'Additional') qui s'efface dans l'image graphique au-dessus de la forme après 1 seconde (ou l'affiche pendant 1 seconde dans Linux / MacOS) |
− | *Drop into your form.create() event | + | *Plongez dans votre événement Form.create() (''Drop into your form.create() event'') |
==Download== | ==Download== |
Revision as of 15:00, 7 March 2017
│
English (en) │
français (fr) │
русский (ru) │
Composant TPoweredBy
par minesadorada@charcodelvalle.com
Graphique Windows graphic=
Graphique Linux/MacOS
Autres logos et bannières
Résumé
- Un composant visuel (placé dans l'onglet 'Additional') qui s'efface dans l'image graphique au-dessus de la forme après 1 seconde (ou l'affiche pendant 1 seconde dans Linux / MacOS)
- Plongez dans votre événement Form.create() (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
Mac OS X
- 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