Bonjour,
 
J'ai un problème, je souhaiterais faire une interface Gtk Ada générique contenant un UI_Manager.
 
Actuellement, le fait que j'utilise l'expression "'access" pour passer l'accès à la procédure créate de Action_Group m'interdit de la faire à cause de ce message d'erreur :
 

 
Voici un bout de code :
 
[code=ada]
    24  procedure Ultrason is
    25      
    26      
    27     package Main is new Ultra.Son.X.Gtk_Ada.Main;
[code]
 
En voilà un autre :
 
[code=ada]
   191        Main_Entries : constant Action_Entry_Array :=
   192       (1 => Create (Name => "FileMenu",        Label => "_File" ),
   193        2 => Create (Name => "Open",
   194                     Stock_Id    => Stock_Open,
   195                     Label       => "_Open",
   196                     Accelerator => "<control>O",
   197                     Tooltip     => "Open",
   198                     Callback    => Quit'access),
[code]
 
 
Si vous avez la connaissance de la solution merci de faire passer la solution.    
 
Merci.

Re-
 
Comme j'ai posté un probème ben je me suis remis à chercher une solution...
J'ai cru que j'avais trouvé une soluce en rajoutant ".all'access après le Quit'access ce qui ne levvais plus d'erreur à la compilation.
 
Par contre je tombe sur un bug de gnat.
Donc toujour le même problème.
 
Je suis curieux de trouver.