Fiche de l'article
| Categorie Delphi - Trucs et astuces - Objet Public Internaute Mise a jour 13/02/2002 Visualisation Vu 620 fois |
Articles similaires
Afficher une note de l'auteur dans vos composants
Constructor YourComponentCreate(AOwner:TComponent);
Begin
Inherited Create(AOwner);
{...}
if (csDesigning in componentstate) and not (csloading in componentstate) then
MessageDlg('Composant crée par Fobec ', mtInformation, [mbOK], 0);
End;
Begin
Inherited Create(AOwner);
{...}
if (csDesigning in componentstate) and not (csloading in componentstate) then
MessageDlg('Composant crée par Fobec ', mtInformation, [mbOK], 0);
End;
Commenter l'article
Ajouter un commentaire
Auteur
|
Totsios Dimitrios |
| |ARTCOUNT| | |
| L'auteur n'a pas de page membre | |
| |LASTCONNECT| | |
Boite a outils
Du meme auteur