Discussion :

[The Jos]

Bonjour à tous,

Bon voila mon pb, je voudrais modifier le source d'un TDBGrid. Non pas faire un nouveau compo en héritant du dbgrid, mais directement modifier le source. En fait j'ai une propriété en private que je ne peux pas récupérer en héritage donc je veux modifier le source natif. Quand je met un point d'arrêt sur une ligne du TDBGrid celui-ci est marqué d'un petite croix verte. Et aucune modif n'est prise en compte. Comment faire?

Merci....

[ShaiLeTroll]

Déjà, pour modifier un composant de la VCL à la sauvage, il faut recopier l'unité dans le dossier de son projet et l'ajouter dans le DPR (il prendra la copie à la place de l'original, ne surtout pas modifier l'original)

Tu peux aussi l'hériter avec deux belles tricheries

Code :

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

1
2
3
4
5
 
type
  TDBGrid = class(DBGrids.TDBGrid)
  ...
  end;

Fait croire que la TDBGrid en cours dans la forme, est toujours la TDBGrid de la VCL mais en fait on fait une honteuse surcharge, comme ICI avec le TButton

Voir la FAQ - Comment accéder aux variables privées d'une classe ?

Code :

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

1
2
3
4
5
6
7
8
9
 
type
  TDBGridHackPrivate = class(DBGrids.TDBGrid)
  public
    FIndicators: TImageList;
    FTitleFont: TFont;
    FReadOnly: Boolean;
    ...
  end;

[chaplin]

Je fairais un nouveau décendant de TCustomDBGrid afin d'assurer la comptabilité avec les autres composants. Ensuite, il faut dupliquer le code de TDBGrid et faire les modifications souhaités sur ce code, c'est beaucoup plus propre et comme TDBGrid n'est pas un niveau intermédiaire mais le dernier dans la hierarchie, ça ne pose aucun problème d'agir de cette façon.

Ne pas oublier de recenser le composant dans la palette des outils.

[chaplin]

Déjà, pour modifier un composant de la VCL à la sauvage, il faut recopier l'unité dans le dossier de son projet et l'ajouter dans le DPR (il prendra la copie à la place de l'original, ne surtout pas modifier l'original)

J'arrive pas à le faire dans Delphi 2009.

[ShaiLeTroll]

Ah, moi, je n'ai qu'une Trial, je n'ai que les Headers .H, donc je ne peux pas te dire ...

Mais, les astuces que l'on t'a donné ne suffise pas ?

[chaplin]

Avec delphi 7 sûr et delphi 2006 me semble-t-il, je rajoutais l'unité du composant VCL dans le projet et je pouvais faire du débogage pas à pas (F8) dans l'unité bien entendu sans toucher au code source.

Dans Delphi 2009, quand j'ajoute l'unité dans le projet, il y a des bizaries "[blabla]" dans les unités qui font que le compilateur refuse de s'executer. Si je les mets en commentaire, il essaye de régénéré des .DCU mais là impossible. Je me demande si c'est pas Vista qui fout la merde parce que Delphi 2009 est dans le répertoire "programmes" alias "Program Files".

[chaplin]

il faut recopier l'unité dans le dossier de son projet et l'ajouter dans le DPR

En opérant de cette manière, ça fonctionne, il fallait juste dégager les crochets.