http://bugs.winehq.org/show_bug.cgi?id=11639 --- Comment #4 from petrescs <petrescs(a)yahoo.com> 2008-02-20 06:10:10 --- Additional info from programmer: they are using Windows API GetAsyncKeyState(), see below: procedure TSDIAppForm.Button1Click(Sender: TObject); var v : integer; begin v := GetAsyncKeyState(VK_LSHIFT); rez_lshift.Caption := inttostr(v); v := GetAsyncKeyState(VK_RSHIFT); rez_rshift.Caption := inttostr(v); v := GetAsyncKeyState(VK_LCONTROL); rez_lcontrol.Caption := inttostr(v); v := GetAsyncKeyState(VK_RCONTROL); rez_rcontrol.Caption := inttostr(v); end; GetAsyncKeyState() is documented at http://msdn2.microsoft.com/en-us/library/ms646293(VS.85).aspx Hope this helps. Thanks, Silviu -- Configure bugmail: http://bugs.winehq.org/userprefs.cgi?tab=email Do not reply to this email, post in Bugzilla using the above URL to reply. ------- You are receiving this mail because: ------- You are watching all bug changes.