call a MENUITEM "from Function" ?

[AUGE_OHR]

hi,

i do have a CONTEXT MENU and 3 MENUITEM with ACTION
is it possible to activate MENUITEM from a Function

Code: Select all

   // i want to activate 2nd MENUITEM
   DoMethod("Form_1", "MYMENU", 2, "ACTION" )

[andyglezl]

Y porque no directamente...
*-------------------------------------
And why not directly ...

DEFINE CONTROL CONTEXT MENU LB_ColFillArea OF Win_Ctrls
MENUITEM "item 1" ACTION Action1fromMyMenu()
MENUITEM "item 2" ACTION Action2fromMyMenu()

// i want to activate 2nd MENUITEM
Action2fromMyMenu()

[AUGE_OHR]

hi,

to call MENUITEM direct was just a Idea.

i have to paas some Parameter but i can not use Parameter at

Code: Select all

   CREATE EVENT PROCNAME ImageWheelEvent(Parameter ...)

while MENUITEM have those Parameter i thought ...

[Rathinagiri]

Why not this?

Code: Select all

Create Event ProcName ImageWheelEvent1()

Function ImageWheelEvent1()
   ImageWheelEvent( Parameter ... )

[AUGE_OHR]

hi,

Code: Select all

Create Event ProcName ImageWheelEvent1()

Function ImageWheelEvent1()
   ImageWheelEvent( Parameter ... )

hm ... where do i get "Parameter" from

[Rathinagiri]

Can't you use the same parameter from the menuitem?

I don't understand the context. Please post a small working sample. Let me try.

[AUGE_OHR]

hi,

Can't you use the same parameter from the menuitem?

I don't understand the context. Please post a small working sample. Let me try.

Code: Select all

LOCAL a,b,c,d

Create Event ProcName ImageWheelEvent(a,b,c,d)

Function ImageWheelEvent(a,b,c,d)

Error BASE/1003 Variable does not exist a

[andyglezl]

PUBLIC a,b,c,d

Create Event ProcName ImageWheelEvent( a,b,c,d) HWND ImageEdit.HANDLE STOREINDEX nIndex

work...

[AUGE_OHR]

hi,,

thx for help

PUBLIC a,b,c,d

YES it work that Way ...

Create Event ProcName ImageWheelEvent( a,b,c,d) HWND ImageEdit.HANDLE STOREINDEX nIndex
work...

but if i use PUBLIC i do not need Parameter

---

i try to avoid PUBLIC if possible as i have use "too much" when start with Cl*pper where i got LOCAL

i found a Tool called "Summer 93" which does make FUNCTION of each PUBLIC.

Code: Select all

FUNCTION ABC(xValue)
STATIC MyValue := 0
   IF PCOUNT() > 0
      MyValue := xValue
   ENDIF
RETURN MyValue

this Way i got rid of PUBLIC (which need limited DGROUP Space)

[franco]

You could use PRIVATE which I think gets released when calling function is released.
PRIVATE a,b,c,d