Problème d'affichage de la scrollbar dans DBgrid
Salut,
J'ai une procedure qui fait une recheche dans une base de donnée access et qui affiche seulement les résultats de la recheche dans le Dbgrid,
Voici ma procédure de recherche :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| procedure TProgCNS.FindClick(Sender: TObject);
begin
if Recherche.text <> '' then
begin
Sqlsearch := 'SELECT * FROM '+ Ter +' WHERE (Villes LIKE :Search)';
Adoquery.Close;
with ADOQuery.SQL do begin
Clear;
Add(SqlSearch);
end;
Adoquery.Parameters.ParamByName('Search').value :='%'+Recherche.Text+'%';
Adoquery.Open;
end;
end; |
Mon problème survient quand le résultat de la recheche ne donne aucun ou seulement 1 résultat. dans ce cas la scrollbar vertical du Dbgrid disparait complètement. Si j'ai plus de 2 résultat je n'ai aucun problème.
Est-ce possible que même si j'ai 0 ou 1 résultat la scrollbar reste apparente même si elle n'est pas utile ?
Merci
