Discussion :

[o_live]

Bonjour et Meilleurs Vœux

J'essaye d'accéder a une propriété protégée du composant DbGrid
en écriture RowHeights afin de pouvoir modifier la hauteur d'un linge dans une colomne,afin d'afficher correctement une image dans un DBGrid.
Dans le cas contraire l'image est écrasée

Je me suis inspiré de la faq Delphi Comment modifier la hauteur d'une ligne dans un TDBGrid ?

J'ai effectue ceci sans grand sucés (partie 1)
dans le h de mon formulaire j'ai mis ceci

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
 
#ifndef FormAnnuaire2H
#define FormAnnuaire2H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <ToolWin.hpp>
#include "CGiButton.h"
#include <DBCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFrmAnnu : public TForm{
__published:	// Composants gérés par l'EDI
TDBGrid *DBGTel // composant ou je souhaite modifier la hauteur de ligne via RowsHeight
// bla bla
 
};
//---------------------------------------------------------------------------
// classe ajouté
class TPublicCustomGrid :TCustomGrid  {
public:
 
  void __fastcall SetRowHeight(TDBGrid *pGrid,int numligne,int hauteur){
     //this->RowHeights[10]=4;   ok
   TPublicCustomGrid *pPublicCustomGrid=dynamic_cast<TPublicCustomGrid*>(pGrid);
 
 // acces a rowHeight par la suite...
  }
};
//---------------------------------------------------------------------------
extern PACKAGE TFrmAnnu *FrmAnnu;
//---------------------------------------------------------------------------
#endif

J'ai un erreur de compilation :

[C++ Erreur] FormAnnuaire2.h(60): E2031 Impossible de transtyper de 'TDBGrid *' en 'TPublicCustomGrid *'

-Comment transtyper mon objet afin qu'il puisse accéder la propriété via la la faq Delphi partie 1 ?

Comment convertir ce code delphi en C++Builder

Code delphi :

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

 TPublicCustomGrid(DBGrid1).RowHeights[10]:=50;

-Comment utiliser ceci dans un procédure autre ?

-Est ce possible de faire ceci de cette manière en C++Builder 6 ?



merci d'avance de votre aide

[ShaiLeTroll]

dynamic_cast effectue un contrôle, essaye un cast basique
Je n'ai pas testé !

Après, En delphi, le fait de déclarer une classe dans une unité permet d'accèder au propriété protégée directement, un peu comme un friend protected sur tout le fichier !
En C++, tu es obligé soit de refaire un accesseur explicite !
Faudrait tester ces deux variantes !

Variante 1 : Ajout d'un Accesseur

Code :

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

((THackProtectedCustomGrid*)DBGrid1)->SetRowHeight(10, 50);

Code :

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

1
2
3
4
5
6
//---------------------------------------------------------------------------
class THackProtectedCustomGrid :TCustomGrid
{
public: 
  void __fastcall SetRowHeight(int numligne,int hauteur){this->RowHeights[numligne]= hauteur;}
};

Variante 2 : classes Amies

Code :

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

((THackPrivateCustomGrid*)DBGrid1)->RowHeight[10] = 50;

Code :

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

1
2
3
4
5
//---------------------------------------------------------------------------
class THackPrivateCustomGrid :TCustomGrid
{
  friend class TFrmAnnu;
};

[blondelle]

Salut o_live
Ceci fonctionne pour une StringGrid

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
class TPublicStringGrid: public TCustomGrid
{
    public:
        using TCustomGrid::RowHeights;
};
 
((TPublicStringGrid*)StringGrid1)->RowHeights[2] = 50;
}

[ShaiLeTroll]

Très interessant ce using !

Mais, RowHeights est accessible depuis une TStringGrid, ce n'est pas un très bon exemple !

on doit avoir le même résultat avec

Code :

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

1
2
3
4
5
class THackProtectedCustomGrid: public TCustomGrid
{
    public:
        __property RowHeights;
};

Après tout c'est la méthode standard d'augmentation de visibilité des propriétés VCL !

[blondelle]

Suite a l'intervention de ShaiLeTroll j'ai teste sur une DBGrid juste posee sur la Form donc une seule ligne

Code :

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

1
2
3
4
5
6
7
8
9
10
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
class TPublicCustomGrid: public TCustomGrid
{
    public:
          __property RowHeights;
};
((TPublicCustomGrid*)DBGrid1)->RowHeights[0] = 50;
}

[o_live]

Merci a vous deux
J'ai utilise le code de blondelle

Je pense que des choses comme cela pourrait être dans la Faq BCB

[o_live]

Encore merci a vous deux, le code fonctionne très bien

Je voudrais avoir une petite explication afin de progresser,
pour transtyper les objets, le guide du développeur BCB6
recommande souvent d'utiliser l'opérateur dynamic_cast
pour plus de sécurité

Je voudrais savoir pourquoi quand je fais :

Code :

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

1
2
 
TPublicCustomGrid* p=dynamic_cast< TPublicCustomGrid*>(DBGTel);

J'obtiens cette erreur de compilation ? :

[C++ Erreur] E2031 Impossible de transtyper de 'TDBGrid *' en 'TPublicCustomGrid *'

Cela viens t-il que les classes soit abstraites ?

merci de vos precisions

[ShaiLeTroll]

recommande souvent d'utiliser l'opérateur dynamic_cast pour plus de sécurité

C'est la réponse à ta question

TDBGrid hérite hérite de TCustomGrid (via TCustomDBGrid)
TPublicCustomGrid hérite de TCustomGrid

il forme tous les deux une branche différente d'héritage de TCustomGrid, l'un n'héritant pas de l'autre, ils sont d'un point de vue objet incompatible d'où l'utilisation d'un cast non protégé pour passer outre la sécurité de vérification d'héritage, voir InheritsFrom() pour la VCL

Je ne connais pas encore assez bien le C++, je n'ai pas encore compris quelle était l'équivalent sous la forme "type_cast<Type*>(Obj)" de "((Type*)Obj)", le plus ressemblant serait "static_cast"

TDBGrid n'est pas abstraite
TCustomGrid (ou TPublicCustomGrid) effectivement ne doit pas être instancié à cause de DrawCell qui n'est implementé qu'à partir de TCustomDrawGrid ou TCustomDBGrid
Mais cela ne pertube pas le cast, c'est juste une question d'arbre d'héritage différent

Perso, l'aide est aussi lipide que de la boue, tu as un chariabia de classe de base polymorphe héritée qui entre dans la hiérarchie des sous-classes ... c'est un défi de comprendre quand ça fonctionne ou pas !