回 帖 发 新 帖 刷新版面

主题:请教

当我在数量这一列输入123 或123.12没问题  当我输入123。12  就会出现英文错误
我只知道delphi是这样判断的
 if not (key in['0'..'9','.']) then
   key:=#0 ;
  end ;
请问在PB中应怎么解决呢?
还有那位知道或有做报表的资料能不能告诉我下呢  谢了

回复列表 (共2个回复)

沙发

在数据窗的itemerror事件中判断
If dwo.type = 'column' Then
   Choose Case Left(Lower(dwo.coltype),3)
       Case 'dec'
         If Not IsNumber(data) Then
            MessageBox('系统提示','数据格式不对,请重新输入')
            Return 1
         End If
        Case .....
    End Choose
End If

做报表就是用数据窗来做,资料到处都是

板凳


谢了 是可以了 但是为什么要按两下回车才能关闭提示窗口呢

我来回复

您尚未登录,请登录后再回复。点此登录或注册