Poweredby/fr

=Composant TPoweredBy=

par minesadorada@charcodelvalle.com

Graphique Windows graphic

Graphique Linux/macOS

Autres logos et bannières

• Logos and Banners

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)

Téléchargez

Téléchargez depuis le Lazarus-CCR ici.

Installation

1. Créez un nouveau dossier 'poweredby'
2. Dézippez l'archive dans le dossier
3. Dans l'EDI Lazarus ouvrez le paquet poweredby.lpk.
4. Répondez 'Oui' à la question 'Ouvrir comme un projet ?'
5. Compilez
6. Cliquez sur Installer
7. Répondez 'Oui' à la question 'Voulez-vous compiler Lazarus ?'
8. Après que Lazarus ait redémarré, contrôlez le nouveau composant 'Poweredby' dans la palette 'Additional'.

Utilisation

• Commencez un nouveau projet d'application
• Posez un composant 'Poweredby' sur la fiche.
• Double-cliquez sur la fiche vide pour accéder à l'évenement TForm1.Create
• Ajoutez l'appel poweredby1.showpoweredbyform
• Exécutez l'appication

C'est tout !!

Autres utilisations

Le composant PoweredBy se prête bien à l'ajout comme sous-composant à un composant personnalisé existant :

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';

Licence

Licence LGPL.

Plate-forme

Windows

• PoweredBy s'estompera dans un graphique de forme spécifiée (shaped graphic)

Linux

• PoweredBy s'affichera dans un carré graphique (cela est dû à l'impossibilité pour GTK de traiter avec les écrans à forme spécifiée)

macOS

• PoweredBy s'affiche dans un carré graphique, comme dans la version pour Linux.

Testé sur

• 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

Adresser un courrier à l'auteur pour toute requête.

Voir aussi

• Logos and Banners
• Standalone Scrolling Text component
• Components and code examples

From the Free Pascal wiki, page "Poweredby/fr", as it stood on 2020-02-23 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.