Discussion :

[Djang0]

Cette tâche en soit est très simple mais j'obtiens l'erreur suivante.

Dans ma dll, j'ai les pages suivantes :
ImageG.cpp
et
ListeImagesrapport.cpp

Lors du clic sur une image de ma liste je veux pouvoir l'afficher en grand dans une nouvelle fenêtre
J'ai donc crée la page ImageGrand.cpp, et l'ai ajouté au projet
puis j'ai ajouté dans le code TFListeImagesRapport

Code :

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

1
2
3
4
5
6
7
8
#include "ImageG.h"
 
...
 
void __fastcall ::liste_imageDblClick(TObject *Sender)
{
ImageGrand->Show();
}

et donc quand je double clic sur mon image, j'ai l'erreur suivante :
Access Violation at address 400EE72E in module 'vcl60.bpl'. Read of address 000002EC.

La page ImageGrand contient juste un label pour le moment.

Merci d'avance si vous voyez d'ou cela vient

[DjmSoftware]

bonjour
l'appel à

Code :

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

1
2
 
ImageGrand->Show();

nécessite qu'une instance de <imageGrand> a été créeé au préalable

d'autre part dans le code ci-dessous qui a il avant les ::

Code :

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

1
2
 
void __fastcall ::liste_imageDblClick(TObject *Sender)

cdlt

[androz]

Si j'ai suivi à peu près..... un truc comme ça devrait être ta solution :

Code :

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

1
2
3
4
5
6
7
8
9
10
#include "ImageG.h"
 
...
 
void __fastcall TFListeImagesRapport::liste_imageDblClick(TObject *Sender)
{
    TImageG *ImageGrand = new TImageG(NULL);
    ImageGrand->Show();
}

En d'autres mots, il faut que ta fonction liste_imageDblClick soit membre de ta classe (fiche) TFListeImageRapport, et ensuite avant de pouvoir afficher ta seconde fiche, il faut l'instancier, sinon c'est comme si tu demandais à ton prog d'afficher qqch qui n'existe pas.

Voilou

[DjmSoftware]

bonjour
le code suivant

Code :

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

1
2
3
 
TImageG *ImageGrand = new TImageG(NULL);
    ImageGrand->Show();

crée une nouvelle instance de la fenêtre

si on veut utiliser l'instance crée statiquement
et en admettant que <ImageGrand> soit le nom de la fiche exportée

Code :

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

1
2
3
4
5
 
// dans le .h de la fiche <ImageGrand>
extern PACKAGE TImageGrand *ImageGrand;
// pour l'affichage
ImageGrand->Show();

la fiche étant contenue dans une DLL il est nécessaire qu'une instance de cette fiche soit construite au préalable

Code :

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

1
2
 
ImageGrand =TImageGrand(NULL)

cdlt

[androz]

je ne crois pas que l'affichage de la fiche se fasse via un dll, les deux fiches sont dans un dll qui sera utilisé ultérieurement c'est pas ça ?
Bref ça change pas grand chose.

En effet, dans mon "code" je crée dynamiquement la fiche, j'avais écrit aussi la possibilité de la créer statiquement, mais je me suis retenu, je suis dans une passe dynamique en ce moment

[Djang0]

J'ai trouvé une solution !

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
void __fastcall TFListeImagesRapport::liste_imageDblClick(TObject *Sender)
{       TListItem *ListItem;
 
        if (liste_image->SelCount != 0)
        {       liste_image->Visible = false;
                int j = liste_image->Selected->Index;
 
                // Si l'image est déjà affectée: on efface
                if (img != NULL)
                        delete img;
 
                // Attribution de l'image
                Image1->Parent = this->Parent;
                Image1->Top = 0;
                Image1->Left = 0;
                img =image(j);
                Image1->Picture->Bitmap = img;
                Image1->Height = 800;
                Image1->Width = 800;
                // Affichage
                Image1->Visible = true;
                // On affecte la fonction de double clic retour (réaffichage de la liste / on cache la grande image) à Image 1
                Image1->OnDblClick = Image1DblClick;
 
                DragImgBtn->Parent = Parent;
                DragImgBtn->Visible = true;
                DragImgBtn->Left = Parent->Width -  DragImgBtn->Width;
                DragImgBtn->Tag = j;
        }
 
        TVisualisationGdeImg * tmp = new TVisualisationGdeImg(this);
        img->Height = 800;
        img->Width = 800;
        tmp->ChargerImage(img);
        tmp->ShowModal();
        tmp->Release();
}

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
void __fastcall TVisualisationGdeImg::ChargerImage(Graphics::TBitmap* img)
{       if (img)
        {       // Chargement de l'image
                Image->Picture->Bitmap = img;
 
                // Resize de la fenêtre en fonction de l'image, dans la limite de 70% de la hauteur de l'écran et 70% de la largeur
                if ( Image->Picture->Bitmap->Width < (int)(Screen->Width*0.7))
                        Width = Image->Picture->Bitmap->Width+ 20 ;
                else
                        Width = (int)(Screen->Width*0.7);
 
                if ( Image->Picture->Bitmap->Height < (int)(Screen->Height*0.7))
                        Height = Image->Picture->Bitmap->Height + 40;
                else
                        Height = (int)(Screen->Height*0.7);
                Image->Visible = true;
        }
}

Il me reste juste à dimensionner l'image pour qu'elle fasse 800 par 800 et s'affiche entièrement dans la fenêtre...

Merci pour votre aide

[Djang0]

Enfin la je voudrais qu'elle conserve ses proportions d'origine mais qu'elles soient aux alentours de 800 par 600
Je cherche
Merci encore

[Djang0]

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
void __fastcall TFListeImagesRapport::liste_imageDblClick(TObject *Sender)
{       TListItem *ListItem;
 
        if (liste_image->SelCount != 0)
        {       liste_image->Visible = false;
                int j = liste_image->Selected->Index;
 
                // Si l'image est déjà affectée: on efface
                if (img != NULL)
                        delete img;
 
                // Attribution de l'image
                Image1->Parent = this->Parent;
                Image1->Top = 0;
                Image1->Left = 0;
 
                Image1->Proportional = true;
                Image1->Center = true;
                Image1->Stretch = true;
 
                img =image(j);
                Image1->Picture->Bitmap = img;
                Image1->Picture->Bitmap->Width = 500;
                Image1->Picture->Bitmap->Height = 400;
                // Affichage
                Image1->Visible = true;
                // On affecte la fonction de double clic retour (réaffichage de la liste / on cache la grande image) à Image 1
                Image1->OnDblClick = Image1DblClick;
 
                DragImgBtn->Parent = Parent;
                DragImgBtn->Visible = true;
                DragImgBtn->Left = Parent->Width -  DragImgBtn->Width;
                DragImgBtn->Tag = j;
        }
 
        TVisualisationGdeImg * tmp = new TVisualisationGdeImg(this);
        tmp->ChargerImage(Image1->Picture->Bitmap);
        tmp->ShowModal();
        tmp->Release();
}

Image1->Proportional = true;
Image1->Center = true;
Image1->Stretch = true;

Image1->Picture->Bitmap->Width = 500;
Image1->Picture->Bitmap->Height = 400;

J'ai esssayé avec ca mais j'ai des bandes blanches autour.
Quelqu'un sait comment élargir l'image ?

[Djang0]

Je suis sur la bonne voie avec le code suivant :

Mais le problème c'est que l'image est déformé donc si j'ai une image disproportionné (plus haute que large ou beaucoup plus large que haute), j'aurai une image qui ne ressemble pas à grand chose.
Je pensais que la propriété strecth conserverait les dimensions d'origine.

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
    if (liste_image->SelCount != 0)
        {       //liste_image->Visible = false;
                int j = liste_image->Selected->Index;
 
                // Si l'image est déjà affectée: on efface
                if (img != NULL)
                        delete img;
 
        img =image(j);
 
        Image1->Picture->Bitmap = img;
 
        Image1->Parent = this->Parent;
        Image1->Proportional = true;
        Image1->Stretch = true;
        Image1->AutoSize = false;
        Image1->Height = 500;
        Image1->Width = 600;
        Image1->Picture->Bitmap->Height = 500;
        Image1->Picture->Bitmap->Width = 600;
        Image1->Canvas->StretchDraw(TRect(0,0,600,500),GdesImages.at(j)->GetTampon());
        TVisualisationGdeImg * tmp = new TVisualisationGdeImg(this);
        tmp->ChargerImage(Image1->Picture->Bitmap);
      //  tmp->Height = 500;
     //   tmp->Width = 600;
        tmp->ShowModal();
        tmp->Release();             }