Bonjour à tous.

Le code suivant fonctionne parfaitement bien sous 2000, (ie, comportement normal d'un ComboBox, on clique sur la flèche et la liste s'affiche) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.FormCreate(Sender: TObject);
var
  i : integer;
begin
  for i := 7 to 22 do
  begin
    cbb.Items.Add(Format('%2.2d', [i]) + '.00');
    cbb.Items.Add(Format('%2.2d', [i]) + '.15');
    cbb.Items.Add(Format('%2.2d', [i]) + '.30');
    cbb.Items.Add(Format('%2.2d', [i]) + '.45');
    cbb.DropDownCount := cbb.Items.Count;
  end;
end;
mais sous XP la liste s'affiche et se referme aussitôt !
Faut garder le clic appuyé sur la flèche pour pouvoir choisir une valeur, et une fois la valeur choisie, la flèche garde le look « enfoncé »...
Testé sur 2 machines différentes...

Une idée, quelqu'un ?
Merci d'avance,
--
jp