VFP 9: Function Keys

I have a function key setup that I use in development. Some of
the keys I do not use that much. It would be handy to be able to
press, say , and get a listing of the function key assignments.

I can not see anything for doing this. It appears that the only
way to get this is to parse the output of list status. This is less
than optimal.

Am I overlooking something?

In searching, I see what appears to be a bug with fkmax(). It
appears to return a value that is too high by one. The labelling
starts with (which is fklabel(1)). fklabel(fkmax()) returns an
empty string. This is the case with both settings of set compatible.

Sincerely,

Gene Wirchenko

Computerese Irregular Verb Conjugation:
I have preferences.
You have biases.
He/She has prejudices.

Gene,

It's not a bug but documented behavior. According to VFP help for
FKLABEL() function, "The value of nFunctionKeyNumber should be from 0
through the number of function keys minus 1"

Would following work for you?

FOR i=1 TO FKMAX()
? FKLABEL(i-1), ON("Key", FKLABEL(i-1))
ENDFOR


--
--sb--

VFP MVP

Wirchenko wrote:
> I have a function key setup that I use in development. Some of
> the keys I do not use that much. It would be handy to be able to
> press, say , and get a listing of the function key assignments.
>
> I can not see anything for doing this. It appears that the only
> way to get this is to parse the output of list status. This is less
> than optimal.
>
> Am I overlooking something?
>
> In searching, I see what appears to be a bug with fkmax(). It
> appears to return a value that is too high by one. The labelling
> starts with (which is fklabel(1)). fklabel(fkmax()) returns an
> empty string. This is the case with both settings of set compatible.
>
> Sincerely,
>
> Gene Wirchenko
>
> Computerese Irregular Verb Conjugation:
> I have preferences.
> You have biases.
> He/She has prejudices.

Hi Gene,

> get a listing of the function key assignments.

The first question here would be what kind of key assignment are you talking
about. In VFP you can use function keys with ON KEY LABEL and with macros.

--
Christof

"Christof Wollenhaupt"
wrote:

>> get a listing of the function key assignments.
>
>The first question here would be what kind of key assignment are you talking
>about. In VFP you can use function keys with ON KEY LABEL and with macros.

OKL.

Sincerely,

Gene Wirchenko

Computerese Irregular Verb Conjugation:
I have preferences.
You have biases.
He/She has prejudices.

Sergey Berezniker wrote:

>It's not a bug but documented behavior. According to VFP help for
>FKLABEL() function, "The value of nFunctionKeyNumber should be from 0
>through the number of function keys minus 1"

I see that NOW. I went by the example code which loops from 1 to
fkmax()!

[snip]

Sincerelky,

Gene Wirchenko

Computerese Irregular Verb Conjugation:
I have preferences.
You have biases.
He/She has prejudices.

Hi Gene,

for OKL you can fill an array with all function key labels (F1-F12) in
combination with all qualifiers (Shift, Ctrl, Alt) and then loop through
this list. If ON("Key",qualifier+"+F"+TRANS(n)) returns anything, the key
has an assignment. The return value is your code.

There is no function that would return a list with just assigned ON KEY
LABEL, you need to query VFP for every possible combination.

--
Christof

"Christof Wollenhaupt"
wrote:

>for OKL you can fill an array with all function key labels (F1-F12) in
>combination with all qualifiers (Shift, Ctrl, Alt) and then loop through
>this list. If ON("Key",qualifier+"+F"+TRANS(n)) returns anything, the key
>has an assignment. The return value is your code.

I forgot that there is an on(). Thank you.

[snip]

Sincerely,

Gene Wirchenko

Computerese Irregular Verb Conjugation:
I have preferences.
You have biases.
He/She has prejudices.