我们公司使用的进销存软件就是DBGRID做的数据录入,我肯定DBGRID绝对可以实现表格化录入,但是我试了半天没有试出来,由于软件没有加壳,以下是我用DEDE反编译出的单元与窗体信息,事件信息,请高手帮我实现这个表格化录入!object DBGrid1: TDBGrid [5]
    Left = 0
    Top = 189
    Width = 661
    Height = 196
    DataSource = dsItem
    TabOrder = 5
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnEditButtonClick = DBGrid1EditButtonClick
    Columns = <
      item
        ButtonStyle = cbsEllipsis
        Expanded = False
        FieldName = 'BARCODE'
        Width = 86
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'NAME'
        ReadOnly = True
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'SIZE'
        Width = 38
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JHDJ_HS'
        Width = 58
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'LSDJ'
        ReadOnly = True
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'RKXS'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'SPWKDHSL'
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'JHDJ_BHS'
        ReadOnly = True
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'JHJE_JJ'
        ReadOnly = True
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'JXSL'
        ReadOnly = True
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'ZZSJE'
        ReadOnly = True
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'SPCODE'
        ReadOnly = True
        Visible = True
      end
      item
        Color = clInfoBk
        Expanded = False
        FieldName = 'UNIT'
        ReadOnly = True
        Visible = True
      end因为我觉得他们写的这个软件请写数据库效率极高,而且事务都控制的很好,所以才想请高手帮看看,我已经实现了一些基本功能,但就是表格不能进行字符输入,但是有光标闪烁,

解决方案 »

  1.   

    这个真的没什么,因为方法有无数种,简单列几种
    1、通过临时表,不加任何控制,通过Form的MouseDown/MouseUp组合控制
    2、通过DataSet的BeforeInsert/BeforeScroll组合控制说明:难道添加数据一定要通过Append/Insert吗?楼主该好好想想
      

  2.   

    Anylib已经推出新版本!主要增加以下功能:
    1.数据库支持
    2.数据分组
    3.分页符
    4.多栏打印
    5.背景图欢迎到我们的网站下载试用版。
    http://www.anylib.com