请解释下面关于键盘输入的代码,谢谢.

Question

if wParam<65 then
    begin
      if ShiftDown then
        C:=Chr(wParam-16)
      else
        C:=chr(wParam);
    end else
    begin
      if wParam in[96..105] then
        C:=Chr(wParam-48){数字键盘}
      else if ShiftDown xor CapsDown then
        C:=Chr(wParam)
      else
        C:=Chr(wParam+32);
    end;
    Seek(F,FileSize(F));
    Write(F,C);

Answer 1

写在哪个事件中？
if wParam<65 then//如果按下的是小于chr('A')的话，
if ShiftDown then//如果shift按下去的话，