XProfan

English

Detlef
Jagolski

Moin,

i'd gladly the Context menu (rights Mouse button) Edit, means Entries distinguished or rausnehmen.

How do I do the?

Greeting

Detlef

XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11

05/28/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Nico
Madysa

so:
Compile Mark Separation

proc Mausmenu

    parameters x% , y%
    CreateMenu
    AppendMenu 110 , "Ausschneiden"
    SubPopup "Kopieren nach..."
    AppendMenu 121 , "C:Nurntest.txt"
    AppendMenu 122 , "Mülleimer"
    EndSub
    hier n´dann noch eventuelle CheckMenus, EnableMenus, etc.
    TrackMenu x% , y%

endproc

cls

while 1

    if IsKey(2)

        Mausmenu %MouseX , %MouseY

    endif

wend

hope, there are no Error drin.

Nico Madysa

05/29/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Detlef
Jagolski

thanks for your Help,

but I meant the Kontextmenus of Controls.

Greeting

Detlef

XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11

06/02/06 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Nico
Madysa

Hmmm...Perhaps... keep times the procedure, but nehm these Hauptschleife here: Compile Mark Separation While 1 waitinput If Iskey(2) and GetFocus(DeinButton&) Mausmenu %Mousex , %Mousey Endif
Nico Madysa	06/02/06 ▲ Vollständiges Quote Absatzweise Quote Zeilenweise Quote