谁能告诉俺delphi中如何表示+ ,-, *, /, <, >, (, =, )

Question

如何表示这些键位呀?

Answer 1

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = '+' then ShowMessage('+');
  case Key of
    '+' :  ShowMessage('+');
    '-':  ShowMessage('-');
    '*':  ShowMessage('*');
    '/':  ShowMessage('/');
    '<':  ShowMessage('<');
    '>':  ShowMessage('>');
    '(':  ShowMessage('(');
    '=':  ShowMessage('=');
    ')':  ShowMessage(')');
  end;
end;

Answer 2

help - Virtual key codes
VK_MULTIPLY Multiply key (numeric keypad)
VK_ADD Add key (numeric keypad)
VK_SEPARATOR Separator key (numeric keypad)
VK_SUBTRACT Subtract key (numeric keypad)
VK_DECIMAL Decimal key (numeric keypad)
VK_DIVIDE Divide key (numeric keypad)