[m1sclick]

StatusBar1.SimpleText:= inttostr(GetKeyBoardLayout(0));