Hallo
Das kannst du allgemein mit GetKeyboardState abfragen (Edit: oder in diesem Fall so wie Matti)
Delphi-Quellcode:
function CtrlPressed : Boolean;
var
KeybdState: TKeyboardState;
begin
GetKeyboardState(KeybdState);
Result := ((KeybdState[VK_CONTROL] and 128) <> 0);
end;