Discussion :

[Paounet]

Bonjour à tous..

Sous Delphi 10.3.2 comment intégrer dans un nouveau composant une propriété About qui :
- devient un titre du style 'CopyRight 2019' en lecture
- devient en écriture en cliquant sur la chaîne ci-dessus une exécution d'une Forme contenant
différents éléments…

Avec String je ne trouve pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
   private
    { Déclarations privées }
    FAbout:String;                             // About - CopyRight
    …..
    ….
   published
    { Déclarations publiées }
    property About: String read FAbout write FAbout;
    …..
    ….
   constructor Status.Create(AOwner:TComponent);
    Begin
    inherited Create(AOwner);
  // Création du Panel avec ses Proprietés changées - // Police de la Form1 Parente
   FAbout:='® CopyRight 2019';

D'avance Merci à tous qui me répondront.

[pprem]

Bonjour

La solution dans les experts de l'IDE tu trouveras

[Paul TOTH]

avec RegisterPropertyEditor

et j'ajouterais un "stored false" sur la propriété pour qu'elle ne pollue pas le DFM

[Paounet]

??????????????????

[tourlourou]

Le besoin se situe-t-il à la conception (dans l'IDE) ou à l'exécution, de déclencher un dialogue pour changer la valeur de la propriété suite à un clic ?

[blonde]

??????????????????

Il y a 17 points d'interrogation en trop.

Ma question est la suivante : c'est à la conception ou à l'exécution que tu cherche à avoir le comportement que tu as décrit ?

[Paounet]

lorsque mon composant est terminé..
Sur une forme nouvelle après avoir posé mon composant sur la forme..
en cliquant sur la propriété About qui contient le texte '® Copyright 2019'
je veux faire apparaître une boîte de dialogue type forme plus explicite sur
ce Copyright.
Donc si j'ai bien compris.. c'est à l'exécution puisque mon composant est
terminé.. mais en conception lors de son utilisation.

Merci de votre sollicitude.

[Paul TOTH]

c'est donc avec un PropertyEditor que tu peux transformer la propriété String en un texte avec un bouton [...] qui affichera la boite de dialogue. Comme l'éditeur des propriétés TStrings (Memo.Lines, ListBox.Items...)

si tu n'as pas les sources de la VCL (l'éditeur de TStrings est fourni), tu peux utiliser celui ci.

je n'ai plus en tête comment ça fonctionne, mais il doit aussi être possible d'ajouter la propriété alors qu'elle n'existe pas dans l'objet, c'est ce que fait LiveBindings