[Lazarus] Creating DLL at Lazarus

[Darmawan Sugiarto]

On Wed, Oct 29, 2008 at 3:53 PM, EarMaster - Bent Olsen
<bent at earmaster.com> wrote:
>> I think it is simillar to
>> http://mantis.freepascal.org/view.php?id=10054 . I don't have 10.5
>> version, but I think there is same option under Keyboard settings. I
>> have not found how to detect this settings so far. But it should not
>> certainly hang.
>>
>> Tom Gregorovic
>
>
> Hi Tom,
>
> I managed to detect this specific keyboard setting by:
>
> var
>  FResult: CFIndex;
>  FValid: Boolean;
>
>  FResult := CFPreferencesGetAppIntegerValue(CFSTR('AppleKeyboardUIMode'),
> kCFPreferencesCurrentApplication, FValid);
>
>
> FResult turn out to be bit flags:
>  Bit 0 is set if feature is on
>  Bit 1 is set if full keyboard access works for any control, not just text
> boxes and lists
>
> And these are of course flipped by:
>  ^F1 flips bit 0
>  ^F7 flips bit 1
>
> Hope you can use this to detect the "Full Keyboard Access".
>

Yes, this would help. I will fix it tomorrow. I want you to be listed
in Lazarus contributors list - what is your full name?

Tom Gregorovic