IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Lazarus Pascal Discussion :

[0.9.31/fpc 2.4.4] Composant : Property Tcolor par défaut


Sujet :

Lazarus Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Invité
    Invité(e)
    Par défaut [0.9.31/fpc 2.4.4] Composant : Property Tcolor par défaut
    Bonjour,

    dans l'inspecteur d'objet d'un composant, je n'arrive à faire apparaître la couleur par défaut d'une propriété Tcolor : l'inspecteur d'objet me renvoie systématiquement clBlack quand je pose mon composant sur la Form alors que dans le code je l'ai déclaré clRed. Un simple F9 me montre par contre que le composant prend bien en compte que la couleur par défaut est rouge.

    Voici l'extrait du code relatif à la propriété en question :

    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
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    interface
     
    uses
      Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Grids,
      FileUtil, StdCtrls,
      LCLIntf {DrawText}, LCLType {DT_CALCRECT or DT_WORDBREAK},
      ExtCtrls;
     
    type
      TmyStringGrid = class(TStringGrid)
      private
        { Private declarations }
        // Properties
        FFocusBrush : TColor;
     
        //Procedures
        procedure SetFocusBrush(Value: TColor);
     
      protected
     
      public
        { Public declarations }
        constructor Create(AOwner: TComponent); override;
        destructor Destroy; override;
     
      published
        { Published declarations }
         property FocusBrush :TColor Read FFocusBrush Write SetFocusBrush default clRed;
    end;
     
    procedure Register;
     
    implementation
     
    constructor TmyStringGrid.Create(AOwner: TComponent);
    var
     iLoc : integer;
    begin
        Inherited Create(AOwner);
     
        FFocusBrush := clRed;
    end;
     
    procedure TmyStringGrid.SetFocusBrush(Value: TColor);
    begin
     if FFocusBrush <> Value then begin
      FFocusBrush:= Value;
      Invalidate;
     end;
    end;
     
    end.
    Où est le problème ?

    Merci. Cordialement. Gilles

  2. #2
    Invité
    Invité(e)
    Par défaut
    Rebonjour,

    J'ai un peu avancé. Ce n'est pas le code qui est en cause mais le réglage des Options de l'IDE. Quelqu'un pourrait-il éclairer ma lanterne ?

    Si je désinstalle le paquet et le réinstalle, il tient compte des modifications de mon code donc ici, l'ajout des "default" dans les properties. Si je n'effectue pas cette manipulation (désinstallation/installation du composant), certaines modifications ne sont pas systématiquement prises en compte; En tous cas, pas l'ajout des default aux properties. Comment oblige-t-on la reconstruction, le build à partir du projet ? Quel est le bon réglage de l'IDE ?

    D'un autre côté, un post sans réponse a déjà fait l'objet d'un commentaire sur une question proche : Lorsque j'utilise des {$i ../rep/fichier.inc} pour factoriser mon code, j'ai le même problème. Là, j'ai une solution (si on peut dire) : détruire le /lib du dit répertoire avant la compilation. Dans ce cas, le /lib est automatiquement reconstruit.

    Donc je résume ma demande : comment règle-t-on les options pour que toutes les modifications soient prises en compte... aussi bien celle d'un composant utilisé par le projet, que celle d'un include défini dans un autre répertoire que celle de l'unit qui fait appel à cet include ? Un Clean and Build Files dans le projet par exemple ne règle rien... Pour l'instant, je patauge...

    Cordialement. Gilles
    Dernière modification par Invité ; 19/10/2011 à 14h44.

Discussions similaires

  1. Composant TREE . Icones par défaut
    Par pleasewait dans le forum ActionScript 1 & ActionScript 2
    Réponses: 2
    Dernier message: 16/03/2008, 19h21
  2. Réponses: 14
    Dernier message: 25/09/2006, 13h03
  3. Réponses: 1
    Dernier message: 13/09/2006, 15h12
  4. Réponses: 5
    Dernier message: 03/02/2006, 12h12
  5. Réponses: 9
    Dernier message: 13/06/2005, 17h56

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo