Unité GEM : Fonction objc_find

Déclaration

Description

Paramètres

1. ob_ftree Adresse de l'arborescence des objets
2. ob_fstartob Objet de départ à partir duquel rechercher. (généralement 0, c'est-à-dire l'objet racine, est passé)
3. ob_fdepth Nombre de niveaux à rechercher.
4. ob_fmx Coordonnée X
5. ob_fmy Coordonnée Y

Résultat

Références croisées AESOBJECT

Exemple

{ traiter le clic de souris dans une boîte de dialogue }
if (event and MU_BUTTON) <> 0 then
begin
  obj := objc_find( dialogTree, 0, MAX_DEPTH, mx, my );
  if obj = -1 then
    Ping            { L'utilisateur a cliqué à côté }
  else
    cont := form_button( dialogTree, obj, clicks, cont );
end;