NOTERA:
Låter något liknande som du behöver det faktiska nyckel- kodifierar konstanten som föreställs i din TShiftstate variabel. Using heltalet (ssShift), heltalet (ssAlt), Etc. ska inte arbete, som det ska retur ordinalen, värderar av det fastställda objektet. dvs. förskjutningen ska retur 0, alt ska retur 1, förmiddag för Etc. I som nätt säkert detta inte är vad du önskar.
om du behöver det faktiska nyckel-, värdera, använd något något liknande detta:
var kc: heltal;
…,
kc: = 0;
om ssShift i AShiftState därefter kc: = kc ELLER VK_SHIFT;
om ssCtrl i AShiftState därefter kc: = kc ELLER VK_CONTROL;
om ssALT i AShiftState därefter kc: = kc ELLER VK_MENU;
om du behöver att använda den för musmeddelanden, bruk något något liknande detta:
om ssShift i AShiftState därefter kc: = kc ELLER MK_SHIFT;
om ssCtrl i AShiftState därefter kc: = kc ELLER MK_CONTROL;
//alt som inte stöttades i musmeddelandet, du skulle måste att använda något lika GetKeyState att bestämma den