• Registered: 2015-10-12
  • Posts: 84

Topic: Script to change keyboard language

Hi,

I have some forms that I fill in with english and greek text. Each time I need to change the input language I must press Alt+Shift on my keyboard which is time consuming.

What script can I use so that it:

1. Automatically changes the input language when entering a particular field while inputing data

or

2. Makes a button on the form change the input language on my keaboard


Thank you
George

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

Hello,


1.

procedure Form1_Edit1_OnEnter (Sender: string);
begin
    ChangeKeyboardLayout(LANG_GREEK);  
end;

2.

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
    ChangeKeyboardLayout(LANG_GREEK);
end;
Dmitry.
  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

Thank you.
I will try it and post back.

  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

Unfortunately it does not work.
To change the keyboard I must press Alt+Shift simultaneously. How can I automate this?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

geochrist wrote:

Unfortunately it does not work.
To change the keyboard I must press Alt+Shift simultaneously. How can I automate this?

Please attach your project, I will test it.

Dmitry.
  • Registered: 2016-01-17
  • Posts: 142

Re: Script to change keyboard language

hi
I have the same problem
is this script can be used for version 1.45?
I used this script and it said undeclared identifier "ChangeKeyboardLayout":(
what can I do?
thanks

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

identity wrote:

hi
I have the same problem
is this script can be used for version 1.45?
I used this script and it said undeclared identifier "ChangeKeyboardLayout":(
what can I do?
thanks

Version 1.45 don't have this function.

Dmitry.
  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

Please email me at geochrist@gmail.com so that I can send you more info. My app has confidential data and I do not want to post it on the forum.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

geochrist wrote:

Please email me at geochrist@gmail.com so that I can send you more info. My app has confidential data and I do not want to post it on the forum.

Please send to support@drive-software.com with link on this topic.

Dmitry.
  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

Hi
Do we have an update on this issue?

Thank you

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

geochrist wrote:

Hi
Do we have an update on this issue?

Thank you

Hello,


Unfortunately I did not received email from you.

Dmitry.
  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

Dmitry,

Please check your mailbox. I have sent my project twice. I did not receive any negative reply from my email program.

Thank you again for your time.

George

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script to change keyboard language

I checked your project but can't find the code to change keyboard language in your project.
Please let me know where and how you want to change language in your project.

Dmitry.
  • Registered: 2015-10-12
  • Posts: 84

Re: Script to change keyboard language

I tried it after some years and it works.
Thank you