stringGrid中如何判断输入的值(10分)

  • 主题发起人 主题发起人 zhang_yz6666
  • 开始时间 开始时间
Z

zhang_yz6666

Unregistered / Unconfirmed
GUEST, unregistred user!
在开发过程中。我遇到这样一个问题:
我在一个stringgrid中,必须在前几列几行都输入数值型。在后几列几行都输入字符型。
请问。当在Stringgrid出现输入情况不符合,如何自动弹出提示信息!
 
const LimitCol=XXX{设定限制的列值}
{TStringGrid的onKeyPress事件中添加代码}
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if StringGrid1.Col < 3 then
begin
if not( key in ['0'..'9',#8] )
then
begin
key := #0;
showmessage('Only numeric allowed here!');
end;
end;
end;
{这可以设定在前几列中只能输入数字,至于行限制及其它输入限制,可依此类推}
 
感谢 YYZQ的回答!
但我试了一下,有个问题:
我只能输入整数,不能输入小数和负数了。
比如:(1.1)和(-12.45).
请赐教!
 
把条件改成:
if not( key in ['0'..'9',#8,'.','-'] )then
 
感谢 YYZQ,chuguozhen的回答!
已经ok,马上给分!
另#8代表什么意思!可否告之!
 
两位高手,有stringGrid的个问题。
1。在一个stringgrid中,如何判断在前几列几行都必须输入数值型(即不可以为空值)。
在后几列几行可以不输入值(即可以为空值)。
2。如何使stringgrid的某个单元格得到焦点,切可以编辑。(即程序控制选中某个单元格,
且可以进行编辑(注:不是选中出现蓝色的框))。
摆脱高手了!
 
大家都休息了吗?
 
把StringGrid的Option的goEdit设置为true单元格的内容就可以编辑了,关于焦点的问题参考:
最近的一贴,我记不清了是那一贴,你可以查一查,第一个问题我不明白你的意思
 

Similar threads

后退
顶部