[Sidney] StringGrid et RowCount

Version imprimable

17/12/2020, 08h54
der§en

[Sidney] StringGrid et RowCount

Bonjour,

Dans une APP, j'ai un TStringGrid (sans ligne fixe) et pour lequel dans certain cas, je ne dois pas avoir la moindre ligne.

Sauf que si je fait ".RowCount := 0", il est remis systématiquement la valeur "1".

C'est un bug ou bien, je n'utilise pas le TStringGrid comme il faut ?

De Mémoire, il y a toujours au moins une cellule dans la TStringGrid,

Code:

1
2
3
4
5
6
7
8
9
procedure TCustomGrid.SetRowCount(Value: Longint);
begin
  if FRowCount <> Value then
  begin
    if Value < 1 then Value := 1;
    if Value <= FixedRows then FixedRows := Value - 1;
    ChangeSize(ColCount, Value);
  end;
end;

17/12/2020, 21h18
sergio_is_back

Citation:

Envoyé par der§en

Bonjour,

Dans une APP, j'ai un TStringGrid (sans ligne fixe) et pour lequel dans certain cas, je ne dois pas avoir la moindre ligne.

Sauf que si je fait ".RowCount := 0", il est remis systématiquement la valeur "1".

C'est un bug ou bien, je n'utilise pas le TStringGrid comme il faut ?

La solution que j'utilise (aussi bien pour des datagrids d'ailleurs), c'est de les mettre dans un TPanel avec une caption "Aucune information disponible" (Avec Align= alClient pour la grid)
Si la Grid comporte 1 ou plusieurs lignes, je met sa propriété visible à True et la caption du panel est masquée par la grid
Si la Grid est vide je met sa propriété visible à false et la caption du panel apparaît alors...