http://delphi-hlp.ru/index.php/windows/shrifty-yazyki-kodirovki-regionarnye-standarty/mnogoyazychie-lokalizatsiya-i-perekodirovka/uznat-tekushchuyu-raskladku-klaviatury-v-lyubom-aktivnom-okne.html