Discussion :

[gandf]

Bonjour,

J'ai divers controls dans un TDBCtrlGrid et j'utilise XPMenu pour modifier l'affichage.

Seulement, pour les ComboBox, seul ceux étant dans la ligne en cours d'édition sont pris en compte par XPMenu. Une petite illustration :



J'ai essayé ce bout de code mais cela ne change rien :

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
//---------------------------------------------------------------------------
void __fastcall TForm7::DBComboBox1DrawItem(TWinControl *Control, int Index,
      TRect &Rect, TOwnerDrawState State)
{
Form1->XPMenu1->InitComponent(Control);
}
//---------------------------------------------------------------------------
void __fastcall TForm7::DBCtrlGrid1PaintPanel(TDBCtrlGrid *DBCtrlGrid,
      int Index)
{
for (int i = 0; i < DBCtrlGrid->ComponentCount; i++)
    {
    Form1->XPMenu1->InitComponent(DBCtrlGrid->Components[i]);
    Form1->XPMenu1->InsertComponent(DBCtrlGrid->Components[i]);
    }
}

Avez-vous une idée de la cause du problème ?

[gandf]

Bon, non seulement je n'ai pas pu corriger ce problème mais en plus, j'en ai plein d'autres.

Tout d'abord, ma requète IBUpdateSQL->Modify ne fonctionne pas :

Code :

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

UPDATE Ligne_Devis SET Quantite = :Quantite WHERE Numero_ligne_devis= :old_Numero_ligne_devis

Que je modifie la quantité ou un autre champs, cette requète ne fonctionne pas.

Ensuite, quand on change une valeur d'un champs, ce n'est pas le onchange du composant en cause qui se lance mais le onchange d'autres champs.

Je pense que le IBUpdateSQL->Modify se lance et provoque les onchange des différents champs par une sorte de refresh.

Une idée?

Existe-t-il un tutoriel sur les TDBCtrlGrid?

Merci

[gandf]

En fait, la requète ne s'exécute quand donnant le focus à un élément ne faisant pas partie du DBCtrlGrid. Même en changeant de ligne la requète ne s'exécute pas.

Comme je ne trouve pas comment récupérer le pointeur des TDBCtrlPanel autre que celui en cours de dessin, je suppose qu'il y a un lien.

Comme je gère le changement de focus d'un composant à un autre par l'appuie de la touche entrée, il me faut aussi trouver la liste des TDBCtrlPanel.

Personne n'a d'idée ou de piste ?

Merci

[gandf]

En fait, je viens de m'apercevoir d'une chose. Si 3 ligne sont affiché dans le TDBCtrlPanel, DBCtrlGrid1->PanelCount est égal à 3. La valeur du DBCtrlGrid1->PanelIndex est également correct.
Mais je ne trouve pas où trouver cette liste. Les propriétés DBCtrlGrid1->Controls et DBCtrlGrid1->Components ne peuvent pas être utilisées pour ça. Ils ne donnent qu'un accès à la ligne actuellement sélectionnée.

Personne ne sait comment récupérer la liste des TDBCtrlPanel?

[gandf]

J'ai trouvé la solution.
Il n'y a qu'un seul TDBCtrlPanel qui se dessine partout ou il faut et qui reste actif sur la ligne qu'il faut en fonction du panelindex du parent.

Je n'ai pas trouvé comment faire pour donner la main au XPMenu avant que le TDBCtrlPanel ne passe à la ligne suivante.

Du coup, les hint des composants enfants ne fonctionne pas, seul ceux de la ligne en cours fonctionne.

Et pour parcourir les composants manuellement comme avec la touche tab, il faut utiliser panelindex.

J'espère que ce monologue aidera un jour quelqu'un.