0
$\begingroup$

I want to put G-1 CRD and G-2 CRD inside Fac.Pharmacy something like this: enter image description here

I I have this to start:

Module[{}, 
 With[{
       g1 = Import[FileNameJoin[{Directory[], 
       "Mi proyecto/Registros/Farmacia CRD/2do Año", "grupo1.txt"}], 
     "List", CharacterEncoding -> "UTF8"]}, 
  ActionMenu[
   "Import Groups", {Item["Fac.Pharmacy"], "G-1 CRD" :> g1, 
    "G-2 CRD" :> Print["action2"], Delimiter, Delimiter, 
    Item["Fac.Foods"], "G-1 CPE" :> "action1", 
    "G-2 CPE" :> "action2"}]]]
Improve this question
$\endgroup$
  • $\begingroup$ Is this what you need? mathematica.stackexchange.com/q/102586/5478 unfortunately the answer does not seem to work in most recent mma version, will try to take a look at that. $\endgroup$ – Kuba♦ Dec 5 '18 at 7:40
  • $\begingroup$ @Kuba.Yes, it's really what I need.The code doesn't work in MMA v11.3.I will wait for your answer. Thanks. $\endgroup$ – Andres Dec 7 '18 at 3:49

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Browse other questions tagged or ask your own question.