Question

如何让cxgrid的某列输入只能是数字

Answer 1

与 Grid 组件不同，由于 dbGrid 是与数据源直接相联接的。
通常情况下，如果设置好了数据库组件中字段列表，比如，将指定列的字段设置为数字型，当在 dbgrid 中输入时，delphi 会自动限制只能输入数字和小数点。
其他场合，如果需要对输入进行限制，比如，限制某列（字符类型）只能输入整数或小数，可以考虑编写在与 dbGrid 相联的 DataSource 组件的 OnDataChange 事件中编写校验代码。
参考代码如下：
var
s:string;
n:Integer;
r:Double;
begin
if Field<>nil then
if Field.FieldName='编号' then
begin
s := Field.AsString;
if not (TryStrToInt(s,n) or TryStrToFloat(s,r)) then
begin
ShowMessage('当前输入内容不是整数或是小数，请重新输入!');
tbl1.Cancel;
end;
end;
end;