Version imprimable
Hello :!:
J'ai vu qu'il était possible avec une DBGrid de faire apparaître un ComboBox lorsqu'on clique dans une case, pour faire apparaître une liste de choix. Est-ce possible également avec une StringGrid ?
En fait, les choix qui apparaîtront dans ce ComboBox provienne d'une table d'une base de donnée (SGBD : Interbase), est-ce que j'ai meilleur temps d'utiliser une DBGrid ... ?
Cette table étant très basique : 3 champs, j'en affiche qu'un et je lis les 2 autre par rapport à celui affiché ...
Voilà ce que j'ai trouvé :
tu crées ta combo quelque part sur ta form et tu la rends invisible.
Tu mémorises la cellule sélectionnée :
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
If gdSelected in State Then
CurrentRect := Rect;
end;
(tu as déclaré CurrentRect quelque part avant)
Ensuite, sur l'évènement qui t'intéresse (j'ai pris DoubleClick), tu fais apparaitre ta combo.
procedure TForm1.StringGrid1DblClick(Sender: TObject);
begin
With ComboBox1 do
Begin
Top := StringGrid1.Top + CurrentRect.Top + 2;
Left := StringGrid1.Left + CurrentRect.Left + 2;
Width := StringGrid1.Left + (CurrentRect.Right - CurrentRect.Left) - 30;
Visible := True;
SetFocus;
End;
end;
Les +2 servent à ne pas écraser le relief
Le -30 sert à faire rentrer le bouton de la combo, qui n'est pas compté par défaut je crois.
Et à la sortie de la combo :
procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
ComboBox1.Visible := False;
StringGrid1.Cells[StringGrid1.Selection.Left,StringGrid1.Selection.Top] := ComboBox1.Text;
end;
Tu peux mettre goEditing := False (options de la StringGrid)
Voilà.
Si tu veux faire vraiment propre, tu crées un composant qui fait ça (tu dois alors créer ta combo à la main).
Bonjour,
Si les chaînes à afficher dans la grille représentent les valeurs de champs des enregistrements d'un ensemble de données,utilisez TDBGrid.
Ok merci beaucoup Remy_delphi pour ton code :!: Je garde précieusement ça !
Pour ce qui est du choix entre le StringGrid et le DBGrid, je pense pour l'instant m'orienter vers le DBGrid effectivement ... Mais je trouve ça quand même assez compliquer aux premiers abords !
J'ai plus l'habitude de travailler avec simplement une connexion à la base, l'envoie d'une requête et la récupération des résultats dans un tableau.
J'avoue être pas mal perdu avec tous les composants à disposition dans Delphi. D'autant plus que mon application doit pouvoir attaquer toute sorte de base de données ! Ce qui me fait hésiter dans chacun de mes choix pour les composants entre ADO, ... !
Merci à vous deux :!: