Nouvelles commandes pour LIST, COMBO et MEMO

J'aimerais disposer d'une commande
ITEM_SELECT N,L

Cette commande sélectionnerait la ligne L de l'objet N (N représentant un objet LIST, COMBO ou MEMO). Elle agirait exactement comme un clic sur la ligne correspondante, en déclenchant notamment l'évènement ON_CLICK.

Ceci permettrait, entre autres, de s'affranchir de petites routines dans KGF.dll qui font spécifiquement cela. C'est particulièrement utile au démarrage d'un programme pour sélectionner les éléments par défaut, dans une liste ou une combo.

Dans KGF.dll, je fais cela de la manière suivante, pour LIST et COMBO (hnd est le handle de l'objet):

Code:

function SelectListBoxItem(hnd, item: integer):integer; stdcall; export;    
begin
    SendMessage(hnd, LB_SETCURSEL, item-1, 0); // Sélectionner l'élément
    result := 0;
end;

function SelectComboBoxItem(hnd, item: integer):integer; stdcall; export;    
begin
  SendMessage(hnd, CB_SETCURSEL, item-1, 0);
    result := 0;
end;

C'est similaire pour un memo.

+1 
Surtout que si l' on fasse " item_index N" cela renvoi le numéro de ligne.