Problème de fonctionnement du Canvas

Version imprimable

24/07/2006, 22h49
Julien_C++

Problème de fonctionnement du Canvas
Bonsoir à tous,
Depuis 2 jours, le canvas n'affiche rien. Exemple tout simplement :
Code:

1 2 3 4 5 6 __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { Form1->Canvas->Brush->Color=clWhite; Form1->Canvas->Rectangle(0,0,15,15); }
Resultat : La Form ne bronche pas.
Si je pouvais avoir une solution à ce problème :roll: merci...
24/07/2006, 23h13
winow
Essai sans mettre "Form1->"
Code:

1 2 Canvas->Brush->Color = clRed;
+A

Est ce que ce n'est pas ce que tu cherche.

Code:

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
 
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// mise en couleur de la forme fond blanc
Form1->Color = clWhite;
 
// dimensionner la forme en haut a gauche
// longeur 105 hauteur 105
Form1->Top = 0;
Form1->Left = 0;
Form1->Height = 105;
Form1->Width = 105;
}
//---------------------------------------------------------------------------

No Blondelle
ce que je voulais c'était juste faire un carré sur la Form pour vérifier que mon Canvas marchait
D'ailleurs ca ne marche toujours pas.
Je ne vois pas d'où celà peut provenir... Peut-être des options du projet.

PS : Le canvas ne marche ni sur la form ni sur la PaintBox... .
Voici la fonction en question...

Code:

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
 
void Redraw(TForm1 *Form)
{
int i,j,k;
TPaintBox *pBox;
        for (i=0; i<3; i++){
                for (j=0; j<3; j++){
                        for (k=0; k<6; k++){
                                switch (k)
                                {
                                case 0 : pBox=Form->Front; break;
                                case 1 : pBox=Form->Left; break;
                                case 2 : pBox=Form->Right; break;
                                case 3 : pBox=Form->Up; break;
                                case 4 : pBox=Form->Down; break;
                                case 5 : pBox=Form->Back; break;
                                }
                                switch (Cube[k][j][i])
                                {
                                case 1 : pBox->Canvas->Brush->Color=clWhite;                     break;
                                case 2 : pBox->Canvas->Brush->Color=clBlue; break;
                                case 3 : pBox->Canvas->Brush->Color=clRed; break;
                                case 4 : pBox->Canvas->Brush->Color=clGreen; break;
                                case 5 : pBox->Canvas->Brush->Color=clYellow; break;
                                case 6 : pBox->Canvas->Brush->Color=clPurple; break;
                                }
                        pBox->Canvas->Rectangle(i*40,j*40,i*40+40, j*40+40);
                        }
                }
        }
}

voila quelque chose qui marche.

Code:

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
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// mise en couleur fond blanc
//Form1->Color = clWhite;
 
// dimensionner la forme en haut a gauche
// longeur 105 hauteur 105
Form1->Top = 0;
Form1->Left = 0;
Form1->Height = 400;
Form1->Width = 400;
Image1->Canvas->Brush->Color = clWhite;
Image1->Canvas->Rectangle(0, 0, 100, 100);
 
}
//---------------------------------------------------------------------------

Est tu sur que tous les Canvas sont visible il est possible que le Canvas de certains composant soient invisible

24/07/2006, 23h40
henderson

Salut !

Celà vient du fait que le dessin par le canvas est temporaire.
Il faut solliciter la méthode qui dessine dans les événements OnPaint et OnResize de la Form.

Ca reste vrai pour un TPaintBox pour ce qui est de l'événement OnPaint.

A plus !

Voici un exemple de Canvas qui marchait :
Code:

1 2 3 4 5 6 7 8 switch (Recover[q][f]) { case 1 : pBox->Canvas->Brush->Bitmap=Form->_1->Picture->Bitmap; break; case 2 : pBox->Canvas->Brush->Bitmap=Form->_2->Picture->Bitmap; break; case 3 : pBox->Canvas->Brush->Bitmap=Form->_3->Picture->Bitmap; break; // etc... } pBox->Canvas->Rectangle(r*20,s*20,r*20+20,s*20+20);
Aucune différence hors mis le fait que cet exemple se sert de bitmap...
Le canvas est ici utilisé sur la PaintBox...
J'ai beau crée un rectangle par défaut sur ma Form rien ne se fait rien ne se crée... Et je n'avais pas besoin d'un évènement OnPaint ou OnResize pour dessiner à ma guise les rectangles ou les TBitmap...

Bonsoir,

J'essaie de résoudre ce problème, est je suis tombé sur un os moi aussi. Je profite donc de ce post afin d'exposer mon problème.

Voici mon .h :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//---------------------------------------------------------------------------
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Composants gérés par l'EDI
        void __fastcall FormCreate(TObject *Sender);
private:	// Déclarations utilisateur
                Graphics::TBitmap *Bitmap = new Graphics::TBitmap;
public:		// Déclarations utilisateur
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Et voici mon .cpp :

Code:

1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  image->Canvas->Brush->Color=clWhite;
  image->Canvas->Rectangle(0,0,15,15);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormPaint(TObject *Sender)
{
  Canvas->Draw(0,0,image);
}

Et l'erreur généré par BCB :

Code:

[C++ Erreur] Unit1.h(17): E2233 Impossible d'initialiser un membre de classe ici

Je ne comprends pas trop comment faire pour le déclarer en global.

Sinon, j'ai un bout de code qui est tiré de BCB est qui pourrait être intéressant pour Julien_C++ :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void __fastcall TForm1::Button1Click(TObject *Sender)
 
{
  Graphics::TBitmap *pBitmap = new Graphics::TBitmap();
  try
  {
    pBitmap->LoadFromFile("C:\\Program Files\\Common Files\\Borland Shared\\Images\\Splash\\256color\\factory.bmp ");
    pBitmap->Transparent = true;
    pBitmap->TransparentColor = pBitmap->Canvas->Pixels[50,50];
    Form1->Canvas->Draw(0,0,pBitmap);
    pBitmap->TransparentMode = tmAuto;  
    Form1->Canvas->Draw(50,50,pBitmap);
  }
  catch (...)
 
  {
    ShowMessage("Ne peut charger ni afficher le bitmap");
  }
  delete pBitmap;
}

Merci ;)

25/07/2006, 07h22
Captain_JS

@ero-sennin : ton erreur vient du fait que tu instancie un Graphic::TBitmap dans ton header.
Essaye de l'instancier dans ton constructeur ou dans ton FormCreate et tu ne devrais plus avoir d'erreur.

Euh

Le Canvas ne sert que pour les méthodes Paint et Repaint de ta Form.
Donc pour voir ton carré s'afficher il faut en fait que tu définisses la fonction OnPaint de cette Form (Inspecteur d'objets - Evènements - OnPaint), ca te crée la fonction FormPaint où tu places ton bout de code concernant le Canvas :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 //------------------------------------------------------------ #include <vcl.h> #pragma hdrstop #include "Unit1.h" //------------------------------------------------------------ #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //------------------------------------------------------------ __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //------------------------------------------------------------ void __fastcall TForm1::FormPaint(TObject *Sender) { Form1->Canvas->Brush->Color=clWhite; Form1->Canvas->Rectangle(0,0,15,15); } //------------------------------------------------------------
Et la ton carré s'affiche.

Pour la paintbox c'est pareil, il faut redéfinir la fonction OnPaint de la même manière

25/07/2006, 11h07
Julien_C++

Bonjour !
Je vous jure que l'évènement OnPaint ne m'était pas nécessaire il y a 3 jours. Je pouvais utiliser le Canvas aussi bien sur la form que sur la paintbox et aussi bien sur des fonctions Event que sur des fonctions 'crées manuellement...'

Mais j'avoue que pour l'évènement OnPaint vous aviez raison
Ceci signifie que je dois séparer chaque découpe de cube sur chaque évènement PaintBox.
Si il y a d'autres problèmes de Canvas je laisse le post ouvert.

Merci à vous tous

PS : L'inconvénient : EN utilissant OnPaint pour chaque PaintBox, mon programme contient 6 fois à quelque chose près la même chose...

Citation:

Envoyé par Captain_JS

@ero-sennin : ton erreur vient du fait que tu instancie un Graphic::TBitmap dans ton header.
Essaye de l'instancier dans ton constructeur ou dans ton FormCreate et tu ne devrais plus avoir d'erreur.

Je voulais déclarer le Bitmap en global afin de pouvoir utiliser ma "variable" image de type Bitmap dans différents événements.

En delphi, j'y arrive, mais ce n'est pas du tout la même chose avec C++ Builder.
Moi qui pensais que ca serait aussi simple qu'en delphi, je me rends compte que non :(

Captain_JS (ou quelqu'un d'autre) peut-il m'expliquer comment déclarer ma "variable" image de type Bitmap pour que je puisse y accéder partout ?

Je donne mon code modifié :

le .h :
Code:

1 2 3 4 5 6 7 8 9 10 class TForm1 : public TForm { __published: // Composants gérés par l'EDI void __fastcall FormCreate(TObject *Sender); void __fastcall FormPaint(TObject *Sender); private: // Déclarations utilisateur public: // Déclarations utilisateur __fastcall TForm1(TComponent* Owner); }; Graphics::TBitmap *image = new Graphics::TBitmap;
et le .cpp:
Code:

1 2 3 4 5 6 7 8 9 10 11 void __fastcall TForm1::FormCreate(TObject *Sender) { image->Canvas->Brush->Color=clWhite; image->Canvas->Rectangle(0,0,150,150); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormPaint(TObject *Sender) { Form1->Canvas->Draw(0,0,image); }
Le problème, c'est que je n'ai rien à l'écran et que je n'ai plus d'erreur !
Merci

25/07/2006, 12h14
Julien_C++
Tu es sur que l'espace Graphics soit nécessaire?
Code:

1 2 TBitmap *image;
Tout simplement non?
25/07/2006, 12h58
ero-sennin

Je pense que c'est nécessaire car sinon j'obtiens une erreur :

Code:

[C++ Erreur] Unit1.h(17): E2015 Ambiguïté entre 'TBitmap' et 'Windows::TBitmap'

Je comprends vraiment pas :(

Tien : Essaye ca
Ca doit marcher :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Composants gérés par l'EDI
        TBitmap *image;
private:	// Déclarations de l'utilisateur
public:		// Déclarations de l'utilisateur
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

25/07/2006, 13h37
ero-sennin

Cela ne fonctionne pas !
Erreur, erreur, erreur 8O

Je commence à désespérer :(

Tiens essaye ça, ça fonctionne.
ça dessine une bitmap en niveaux de gris sur la TForm, remplace par le tien:

Code:

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
 
//-------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//-------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//-------------------------------------------------------------------------
 
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//-------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  BYTE* pPx;
 
  m_pBmp = new Graphics::TBitmap();
  m_pBmp->Width = 255;
  m_pBmp->Height = 255;
  m_pBmp->PixelFormat = 24;
 
  for (int nRow=0; nRow<m_pBmp->Height; nRow++) {
    pPx = (BYTE*)m_pBmp->ScanLine[nRow];
    for (int nCol=0; nCol<m_pBmp->Width; nCol++) {
      memset(pPx, nCol, 3);
      pPx+=3;
    }
  }
}
//-------------------------------------------------------------------------
 
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
  delete m_pBmp;
}
//-------------------------------------------------------------------------
 
void __fastcall TForm1::FormPaint(TObject *Sender)
{
  Form1->Canvas->Draw(0,0,m_pBmp);
}
//-------------------------------------------------------------------------

Code:

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
 
#ifndef Unit1H
#define Unit1H
//-------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//-------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Composants gérés par l'EDI
  void __fastcall FormPaint(TObject *Sender);
  void __fastcall FormCreate(TObject *Sender);
  void __fastcall FormDestroy(TObject *Sender);
private:	// Déclarations utilisateur
protected:
  Graphics::TBitmap* m_pBmp;
public:		// Déclarations utilisateur
  __fastcall TForm1(TComponent* Owner);
};
//-------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//-------------------------------------------------------------------------
#endif

Tu as sans doute un problème d'instanciation, mais pour dessiner sur la form il faut passer par le OnPaint ou un composant TPaintBox. Tu peux aussi faire du subclassing mais le principe restera le même : override du OnPaint.

Yarp
www.senosoft.com

25/07/2006, 15h44
ero-sennin

Merci Yarp pour ce code,
Tout fonctionne nikel désormais !

Si ce n'est déjà fait et si Julien C++ à eu réponse à ca question, ce topic peut être considéré comme résolu ;)

Merci et @ +
27/07/2006, 10h06
dragonjoker59

JulienC++

Si tes paintbox dessinent toutes la même chose, il suffit que tu leur attribues la même fonction Paint non?