right mouseclick

Re: right mouseclick

Postby plantenkennis » Tue Jun 12, 2018 8:02 pm

Hello Manuel,

Thank you very much for the new libs :D

The popup menu does exactly what I wants.
Also the WindowVisibleHeigth function is very good. Now the outline of all controls are perfect on all screens.

I also checked the Enable() and DisAble() for BtnBmp. When I use it in the same function as where the button is defined it works well. However if I want to disable a BtnBmp from another function I get an error. How can I enable and disable a button from another function?
Code: Select all  Expand view

@ nScreenHeight-60, nRowPaint BTNBMP oBtnAll OF oWndMain FILENAME cResFilesPad+'FilterLinks.png' ;
    ACTION (nBrowseOrder := 2, RK_SetBrowseArray(2)) SIZE 35, 35 STYLE 4 TOOLTIP 'Toon alle planten'
    oBtnAll:Disable()  && this works fine
 

Code: Select all  Expand view

FUNCTION RK_SetBrowseArray()

oBtnAll:Enable()      &&here I get an error? I have defined oBtbAll as PUBLIC in Main function
 
Kind regards,

René Koot
User avatar
plantenkennis
 
Posts: 166
Joined: Wed Nov 25, 2015 7:13 pm
Location: the Netherlands

Re: right mouseclick

Postby plantenkennis » Tue Jun 12, 2018 8:26 pm

Hello Manuel,

Sorry, already found the solution:
Code: Select all  Expand view

@ nScreenHeight-60, nRowPaint BTNBMP oBtnSelectie OF oWndMain FILENAME cResFilesPad+'FilterRechts.png' ;
    ACTION (nBrowseOrder := 4, RK_SetBrowseArray(2)) SIZE 35, 35 STYLE 4 TOOLTIP 'Toon laatste selectie nogmaals'
    oBtnSelectie:bAction := {|| oBtnAll:Enable(), oBtnSelectie:Disable(), nBrowseOrder := 4, RK_SetBrowseArray(2)}
    nRowPaint := nRowPaint + nShift
@ nScreenHeight-60, nRowPaint BTNBMP oBtnAll OF oWndMain FILENAME cResFilesPad+'FilterLinks.png' ;
    ACTION (nBrowseOrder := 2, RK_SetBrowseArray(2)) SIZE 35, 35 STYLE 4 TOOLTIP 'Toon alle planten'
    oBtnAll:bAction := {|| oBtnAll:Disable(), oBtnSelectie:Enable(), nBrowseOrder := 2, RK_SetBrowseArray(2)}   &&this way I can enable and diable the buttons
    nRowPaint := nRowPaint + nShift + 10
 


this works perfectly :D
Kind regards,

René Koot
User avatar
plantenkennis
 
Posts: 166
Joined: Wed Nov 25, 2015 7:13 pm
Location: the Netherlands

Previous

Return to FiveMac / FivePhone (iPhone, iPad)

Who is online

Users browsing this forum: No registered users and 12 guests