delphi cxgrid 限制字符

Question

我们正在 Delphi 2006 中与 devexpress 合作。

我们有一个 cxGrid。我们想要限制数字列的值输入，即 0 到 999 之间的整数。如果我将属性类型设置为 SpinEdit，则初始值始终为 0，这是不需要的。

因此，我将列上的属性值保留为 null，并将列数据绑定(bind)上的数据类型设置为 Smallint。这在大多数情况下都有效，但“e”和“.”除外。并且'+'和'-'仍然可以输入到导致异常的列中。

有一些简单的方法可以排除“e”和“.”以及“+”和“-”是否被输入到该列中？

Answer 1

可以通过将 UseNullString 设置为 true 来防止初始 0 值。

输入不需要的字符可以通过

处理

procedure TForm1.ViewEditKeyPress(Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem;
  AEdit: TcxCustomEdit; var Key: Char);
begin
   if AItem = TheColumnWithSpinEdit then
     if (not (Key in ['0'..'9',#8])) then Key := #0;
end;