Delphiには意外と無い。特定のキーが押されたかどうかはGetKeyStateでわかる。戻り値の符号(本当は最上位ビット)を見れば良い。GetKeyState(VK_SHIFT)とか、GetKeyState(ord('D'))とすれば良い。 CTRL+Dが押されたら測定終了にするには、 repeat measure; un…