Discussion :

[Revan777]

Bonjour,
je souhaite créer une application graphique pour gérer un parc informatique.

L'ajout de PC sur le réseau local se traduit par la création d'une image (un objet TImage crée en dynamique).
Chaque image de PC pourra être déplacée sur la Form en maintenant le bouton de la souris appuyé.

Mon problème :
Si j'ajoute 2 PCs, lorsque je veux faire glisser l'image, seule la dernière créee bouge (même si j'ai cliqué sur une autre image).
En fait, mon programme garde l'adresse du dernier objet crée et l'utilise lors des appels aux événements.
Les adresses des objets sont empilées dans un composant TList mais je ne sais pas comment rediriger le pointeur sur la bonne adresse lors du clic sur une image...
Il faudrait que lors de la sélection d'une image, le bon objet soit sélectionné.

Ce n'est pas facile à expliquer comme ça.
Je peux toujours vous envoyer mon début d'appli pour que ce soit plus simple...

Voici un bout du code :

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
void __fastcall TForm1::Button2Click(TObject *Sender)
{
// Création d'un nouvel icone et affectation des événements
   MonImage = new TImage(this);
   MonImage->Parent = Form1;
   MonImage->Picture->LoadFromFile(ExtractFilePath(Application->ExeName)+"pc1.ico");
   MonImage->Left = 30;
   MonImage->Top = 10;
   MonImage->OnMouseDown = ImageMouseDown;
   MonImage->OnMouseMove = DeplacementImage;
   MonImage->OnMouseUp = ImageMouseUp;
   MonImage->Height = 33;
   MonImage->Width = 33;
   MonImage->ShowHint = true;
   MonImage->Hint = "IP : 10.33.12.xxx";
   MonImage->PopupMenu = PopupMenu1;
}

J'ajoute ensuite les pointeurs dans un TList.

Code :

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

1
2
// Ajout du pointeur dans la liste
   listeImages->Add((void *)MonImage);

Et voici l'événement appelé lors du déplacement :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
void __fastcall TForm1::DeplacementImage(TObject *Sender, TShiftState Shift,
          int X, int Y)
{
    Actif = (TImage *)listeImages->Items[Edit3->Text.ToInt()];
 
    if(MoveFlag)
    {
    Actif->SetBounds(  Actif->Left + X - Movex,
                        Actif->Top + Y - Movey,
                        Actif->Width,
                        Actif->Height);
 
    }
}

Actif est un pointeur permettant de récupérer l'adresse du bon objet mais je le choisis manuellement (en informant un Edit avec l'indice de ma TList).
C'est de la bidouille tant que je n'aurai pas trouvé comment rendre la sélection automatique.

[KiLVaiDeN]

Salut,

Tu peux toujours extends TImage avec ta propre classe, et ajouté dans cet objet le paramètre "identifiant".

Ainsi, lorsque tu cliqueras sur ton image, tu pourras récupérer l'identifiant, et savoir quelle image bouger ?

C'est une idée.

A+

[Revan777]

J'avais pensé utiliser la donnée Tag de l'objet TImage mais là encore je ne vois pas comment je pourrais faire pour identifier l'image sélectionnée... le clic sur l'image ne faisant qu'appeler un événement...arf

[henderson]

Salut !

Le paramètre TObject *Sender est un pointeur sur l'objet qui a généré l'événement.

Donc :

Code :

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

1
2
TImage *Cible = (TImage*)Sender;
Cible->SetBounds(...);

Ou bien :

Code :

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

((TImage*)Sender)->SetBounds(...);

A plus !

[Revan777]

Oh ça marche !
C'était simple, il fallait y penser Merci henderson.

Maintenant il va falloir que j'associe mon objet avec une adresse IP et un nom d'hote, et conserver tout ça en mémoire... (une BDD ? un fichier ?) Idem pour la position des images sur l'écran qui doit etre conservée...

[henderson]

Salut !

On peut très bien dériver de TImage pour ajouter les propriétés necessaires à l'objet.
On peut utiliser une classe regroupant ces propriétés, en évitant les AnsiString :

Code :

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

1
2
3
4
5
6
class jDonnees
{
public :
char ID[20]; //ici c'est un exemple
//...
};

Ensuite on dérive de TImage :

Code :

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

1
2
3
4
5
6
7
class jImage : public TImage
{
public :
jDonnees Donnees;
    __fastcall jImage(TComponent *Owner);
    __fastcall ~jImage();
};

Depuis une instance jImage on aura donc sous la main toutes les données :

Code :

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

1
2
jImage *Cible;
Cible->Donnees.ID ...

Pour le traitement avec un fichier, on sait que l'on aura à manipuler sizeof(jDonnees) octets donc probablement que les fonctions élémentaires pourraient suffire (fopen etc...)!

C'est juste une idée !

A plus !