Modifier Startup Key detection

Sat Mar 1 00:20:34 UTC 2025

Hi Mike,

I have a function I wrote called $BothMouseDown which I use in development
to start up with a special configuration.  You sort of have to ensure the
cursor is in an Omnis window while you press both mouse buttons but it
works OK:

$BothMouseDown
-------------------------

Test if running in background

If flag false

If mousedn()&rmousedn()

Quit method kTrue

End If

End If

Quit method kFalse

Regards,
Reg

On Fri, Feb 28, 2025 at 9:45 PM Mike Matthews - Omnis via omnisdev-en <
omnisdev-en at lists.omnis-dev.com> wrote:

> Hello All,
>
> Well now, if you pay attention, you can learn something new everyday, you
> would learn even more by going to www.EurOmnis.com<http://www.EurOmnis.com>
> 2025 of course.
>
> I didn’t know about the shift() function, so thank you Stefan and others
> who have responded.
>
> If shift()|#ALT|#SHIFT|#CTRL|#COMMAND
> OK message Test (Icon) {Shift : [#SHIFT]// //Function : [shift()]// //CMND
> : [#COMMAND]// //CTRL : [#CTRL]}
> End If
>
> This is on line 2 of the Startup_Task.$construct method.  The only key
> that is tested and is trapped is the SHIFT key, and only by using the
> shift() function.
>
> The #ALT key stops it all, it just opens the lib. The other modifiers are
> not detected on a development version on OSX it seems.
>
> Mike
>
> Lineal Software Solutions
> Commercial House, The Strand<x-apple-data-detectors://1/1> Barnstaple,
> Devon, EX31 1EU<x-apple-data-detectors://1/1>
>
> omnis at lineal.co.uk<mailto:mike.matthews at lineal.co.uk>
>
> www.lineal.co.uk<http://www.lineal.co.uk/>
>
> www.sqlworks.co.uk<http://www.sqlworks.co/>
>
>
>
> On 28 Feb 2025, at 10:03, Stefan Csomor <csomor at advancedconcepts.ch
> <mailto:csomor at advancedconcepts.ch>> wrote:
>
> Warning: Unusual sender <csomor at advancedconcepts.ch<mailto:
> csomor at advancedconcepts.ch>>
>
> You don't usually receive emails from this address.
> Make sure you trust this sender before taking any actions.
>
> Hi Mike
>
> To be precise, the way I’m testing is using the shift() function
>
> HTH,
>
> Stefan
>
> Von: omnisdev-en <omnisdev-en-bounces at lists.omnis-dev.com<mailto:
> omnisdev-en-bounces at lists.omnis-dev.com>> im Auftrag von Stefan Csomor <
> csomor at advancedconcepts.ch<mailto:csomor at advancedconcepts.ch>>
> Datum: Freitag, 28. Februar 2025 um 09:54
> An: OmnisDev List - English <omnisdev-en at lists.omnis-dev.com<mailto:
> omnisdev-en at lists.omnis-dev.com>>
> Betreff: AW: Modifier Startup Key detection
>
> Hi Mike
>
> I’m using the SHIFT key when starting up to do go into a special
> configuration mode, this works for me on Windows and macOS
>
> HTH,
>
> Stefan
>
> Von: omnisdev-en <omnisdev-en-bounces at lists.omnis-dev.com<mailto:
> omnisdev-en-bounces at lists.omnis-dev.com>> im Auftrag von Mike Matthews -
> Omnis via omnisdev-en <omnisdev-en at lists.omnis-dev.com<mailto:
> omnisdev-en at lists.omnis-dev.com>>
> Datum: Donnerstag, 27. Februar 2025 um 20:54
> An: OmnisDev List - English <omnisdev-en at lists.omnis-dev.com<mailto:
> omnisdev-en at lists.omnis-dev.com>>
> Cc: Mike Matthews - Omnis <omnis at lineal.co.uk<mailto:omnis at lineal.co.uk>>
> Betreff: Modifier Startup Key detection
>
> Hello All,
>
> When you startup Omnis, with the ALT/OPTION key pressed, the startup
> folder libs do open, but the STARTUPTASK does not run.
>
> Is there a way of trapping another key press by a user that we can trap
> and then decide what to do, but still runs the code as usual? The very old
> Omnis 3 had a key combo that reset the Byte Range Record Locking on a multi
> user DF1 many moons ago, and this is the sort of thing I need now.
>
> A key combo that if pressed, we could reset our system, etc.
>
> Thanks
>
> Mike Matthews
>
> Lineal Software Solutions
> Commercial House, The Strand<x-apple-data-detectors://1/1> Barnstaple,
> Devon, EX31 1EU<x-apple-data-detectors://1/1>
>
> omnis at lineal.co.uk<mailto:omnis at lineal.co.uk><mailto:
> mike.matthews at lineal.co.uk <mailto:mike.matthews at lineal.co.uk <mailto:
> mike.matthews at lineal.co.uk>>>
>
>
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2fwww.lineal.co.uk&c=E,1,g32_nSBBRCHClrtuu1tDhp_dAeIkFgz5Tqtl9_fZAWGut8eqhg4SWu3lEoFu5BqMFYjpwuM8KLgx8DyTAYPVaq3-9EB1DLU-sdrvLRyajVsPArzpYteyNg,,&typo=1
> <
> http://linkprotect.cudasvc.com/url?a=https%3a%2f%2fwww.lineal.co.uk&c=E,1,g32_nSBBRCHClrtuu1tDhp_dAeIkFgz5Tqtl9_fZAWGut8eqhg4SWu3lEoFu5BqMFYjpwuM8KLgx8DyTAYPVaq3-9EB1DLU-sdrvLRyajVsPArzpYteyNg,,&typo=1
> ><
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.lineal.co.uk%2f&c=E,1,E6WxOrKsuzLwCyLuW6a5UCiCNja9ICSxZK2MO9zwkJFODkstGm_yNYfkJX72WTHO8N1nbcZlKyCTD6WSdpmjzANDX0iVpdha4-5pKoHaAvgQExK-kSbF1g,,&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.lineal.co.uk%2f&c=E,1,qDxtSLN4Q4DkmqrRs6pSSEKjMUQ9G55DqeUE1A3o2mwt9lZh2imWV8RWjUvUnldBol70kldXXXRtjLL5i2OcuArzFU9IFSL0Kx95Lbaq98lF&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.lineal.co.uk%2f&c=E,1,WpaQ4QMPiO1nmIVKcmbCKM0cq_ZrOp3sNpoAzMMvH7Kb3vRjCqXPbxG-SDONTMV6hEICfzUSW6PQggKgS-CAj1-gYpuogbhXd438E07V&typo=1
> >>>
>
>
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2fwww.sqlworks.co.uk&c=E,1,CSYiCe_nchSZgj_K39yh8WpIVktIDtaBSyux3EjW7k1FF3TCLrMo0khaCcL2CWHn_JFDjy6A4urafYAQBsemyrOaAkdqvZF9dxVwUHqJ2A,,&typo=1
> <
> http://linkprotect.cudasvc.com/url?a=https%3a%2f%2fwww.sqlworks.co.uk&c=E,1,CSYiCe_nchSZgj_K39yh8WpIVktIDtaBSyux3EjW7k1FF3TCLrMo0khaCcL2CWHn_JFDjy6A4urafYAQBsemyrOaAkdqvZF9dxVwUHqJ2A,,&typo=1
> ><
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.sqlworks.co%2f&c=E,1,1c8Et6mpvXETUSiU0jH1DYBWPXreTB8IpqbRqGEpUTd6oA-Sbyh8fJysU1hCzrbYrQ2lQ9CO6WFUuBt9HltdMo6L1MYUmEWATCxIyEvoQLXgBcx5EjC0tDkMtpM,&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.sqlworks.co%2f&c=E,1,BBt171RnAGFM0bXGW0PnTnzosUY0bUKI111XOncP4Jg_dEgPOiuVuPLXLJSesRx0sOYH_sqMYh24DbR54jN4gGChXiazeVWXKoZ_yzja3MhRwA,,&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=http%3a%2f%2fwww.sqlworks.co%2f&c=E,1,mBNqh9mqGwt3VgjjmfdPHz5UnEvkmqJSVDEul-ecmeFqfEvwUtkv_1y-y9B0QgrAFRsv-5YngOOQthze2lDLPruYSJBJ9ycjBdvD-v1oMc0G1_EMtUTty8uT&typo=1
> >>>
>
>
>
> _____________________________________________________________
> Manage your list subscriptions at
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.omnis-dev.com&c=E,1,l1oaUzcn7pdJ1W4KwHlV6IaxVKRVwtglEjUhdpOWt-9vws2nlvgLQcvs8wIiS-g7z_E7ewx023lRPdpl6-cu_bSx6rG_Z750rs3A5rSn81iWCcGL6erG2qTT&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.omnis-dev.com&c=E,1,sYNLfcz-C58yeSpS-ZNXZKkkh55XK6PVOQ2fQGJRvUn9EKxKi8D61sKVsA9DtmV-8ZL-LgUUCoLQPNYYJh3fKWvYFjTJPF11wAFFn8VHsC8,&typo=1>
> <
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.omnis-dev.com&c=E,1,G88nqkfCkDMqUkdAPMptOgHG8Uu7mL9vaAnLPVVPUTknfCofTkdEQBFcj9aTGDEQrGOVbJe2A5mnEOPfBfXmeys_iyzNHICZDJfRoZki&typo=1
> <
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.omnis-dev.com&c=E,1,d8QAc5072qiVLFA5hWF1wbNqx7K3hBuR4wgLyqxS_mlqed6sibyV9dbcn6Okx1-j2wD9tcBqsFkVd8OH2oI7kRcEco-ku4cjMkSzsye_wOPnYBH4u-YeCg,,&typo=1
> >>
> Start a new message -> mailto:omnisdev-en at lists.omnis-dev.com <mailto:
> omnisdev-en at lists.omnis-dev.com> <mailto:omnisdev-en at lists.omnis-dev.com
> <mailto:omnisdev-en at lists.omnis-dev.com>>
>
>
>
>
>
>
>
>
>
>
> _____________________________________________________________
> Manage your list subscriptions at
> https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.omnis-dev.com&c=E,1,VE_XYH8o_hv8UeuJJttJjS5-rq-mBCmpzjdnSJ2heIEqu7V4kAQVhmz7Awtp03jE5ykg79NsSvcxL5JhWp1bbngVSGaynoLT14hRF82xaKS-s4-FXM8YsmY,&typo=1
> Start a new message -> mailto:omnisdev-en at lists.omnis-dev.com
>
> _____________________________________________________________
> Manage your list subscriptions at https://lists.omnis-dev.com
> Start a new message -> mailto:omnisdev-en at lists.omnis-dev.com
>