u_frmlist.dfm

sqllite3数据库基本应用(打开,关闭表,及更新数据表)

object Frmlist: TFrmlist
  Left = 271
  Top = 123
  Width = 696
  Height = 480
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Frmlist'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000000040000000000000000000000010000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C000C0DC
    C000F0CAA600D4F0FF00B1E2FF008ED4FF006BC6FF0048B8FF0025AAFF0000AA
    FF000092DC00007AB90000629600004A730000325000D4E3FF00B1C7FF008EAB
    FF006B8FFF004873FF002557FF000055FF000049DC00003DB900003196000025
    730000195000D4D4FF00B1B1FF008E8EFF006B6BFF004848FF002525FF000000
    FE000000DC000000B900000096000000730000005000E3D4FF00C7B1FF00AB8E
    FF008F6BFF007348FF005725FF005500FF004900DC003D00B900310096002500
    730019005000F0D4FF00E2B1FF00D48EFF00C66BFF00B848FF00AA25FF00AA00
    FF009200DC007A00B900620096004A00730032005000FFD4FF00FFB1FF00FF8E
    FF00FF6BFF00FF48FF00FF25FF00FE00FE00DC00DC00B900B900960096007300
    730050005000FFD4F000FFB1E200FF8ED400FF6BC600FF48B800FF25AA00FF00
    AA00DC009200B9007A009600620073004A0050003200FFD4E300FFB1C700FF8E
    AB00FF6B8F00FF487300FF255700FF005500DC004900B9003D00960031007300
    250050001900FFD4D400FFB1B100FF8E8E00FF6B6B00FF484800FF252500FE00
    0000DC000000B9000000960000007300000050000000FFE3D400FFC7B100FFAB
    8E00FF8F6B00FF734800FF572500FF550000DC490000B93D0000963100007325
    000050190000FFF0D400FFE2B100FFD48E00FFC66B00FFB84800FFAA2500FFAA
    0000DC920000B97A000096620000734A000050320000FFFFD400FFFFB100FFFF
    8E00FFFF6B00FFFF4800FFFF2500FEFE0000DCDC0000B9B90000969600007373
    000050500000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF4800AAFF2500AAFF
    000092DC00007AB90000629600004A73000032500000E3FFD400C7FFB100ABFF
    8E008FFF6B0073FF480057FF250055FF000049DC00003DB90000319600002573
    000019500000D4FFD400B1FFB1008EFF8E006BFF6B0048FF480025FF250000FE
    000000DC000000B90000009600000073000000500000D4FFE300B1FFC7008EFF
    AB006BFF8F0048FF730025FF570000FF550000DC490000B93D00009631000073
    250000501900D4FFF000B1FFE2008EFFD4006BFFC60048FFB80025FFAA0000FF
    AA0000DC920000B97A000096620000734A0000503200D4FFFF00B1FFFF008EFF
    FF006BFFFF0048FFFF0025FFFF0000FEFE0000DCDC0000B9B900009696000073
    730000505000F2F2F200E6E6E600DADADA00CECECE00C2C2C200B6B6B600AAAA
    AA009E9E9E0092929200868686007A7A7A006E6E6E0062626200565656004A4A
    4A003E3E3E0032323200262626001A1A1A000E0E0E00F0FBFF00A4A0A0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000100000000000000000000000000000000000
    0000000000000000000000000000100000000000000000000000000000000000
    0000000000000000000000000000100000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000000000000000010130000E307E300000000000000000000000000000000
    000000000000000000130007E3E3EAE3E3E30000000000000000000000000000
    00000000000000000000EF070707EFE3E3E3E300000000000000000000000000
    00000000000000000000EF070707EF0707E3E300000000000000000000000000
    000000000000000000EFEF0707EF00EF07E3E3E3000000000000000000000010
    131300000000000000EFF1F1EF00FF000707E3E3000000000000000000000000
    000000000000000000EFEFEF07EF00EF0707E3E3000000000000000000000000
    00000000000000000000EFEFEF070707EF07E300000000000000000000000000
    00000000000000000000EFEFEFEFEF0707EAE300000000000000000000000000
    0000000000000000001300EFEFEFEFEF07E30000000000000000000000000000
    00000000000000000010130000EFEFEF00000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000010130000000000
    0000000000000000000000000000000000000000000000000000101300000000
    0000000000000000000000000000000000000000000000000000001013000000
    000000000000000000000000000000000000000000000000000000000000FFFE
    3FFFFFFE3FFFFFFE3FFFFFFE3FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF
    7FFFFFFF7FFFFFE03FFFFFC00FFFFFC007FFFFC003FFFFC003FF0FC001FF0000
    01FF0FC001FFFFC003FFFFC003FFFFC007FFFFC003FFFFE039FFFFFFFCFFFFFF
    FE7FFFFFFF3FFFFFFF9FFFFFFFC7FFFFFFC3FFFFFFE1FFFFFFF0FFFFFFF9}
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 56
    Top = 20
    Width = 26
    Height = 13
    Caption = #22270#21495
  end
  object Label2: TLabel
    Left = 296
    Top = 20
    Width = 26
    Height = 13
    Caption = #25968#37327
  end
  object Label3: TLabel
    Left = 48
    Top = 68
    Width = 52
    Height = 13
    Caption = #24322#24120#21407#22240
  end
  object codeedit: TEdit
    Left = 112
    Top = 16
    Width = 121
    Height = 21
    TabOrder = 1
    OnChange = codeeditChange
    OnEnter = codeeditEnter
    OnKeyDown = codeeditKeyDown
  end
  object numEdit: TEdit
    Left = 400
    Top = 16
    Width = 121
    Height = 21
    TabOrder = 2
    OnKeyPress = numEditKeyPress
  end
  object whyEdit: TEdit
    Left = 112
    Top = 64
    Width = 249
    Height = 21
    TabOrder = 3
    OnKeyPress = whyEditKeyPress
  end
  object DBGrid2: TDBGrid
    Left = 16
    Top = 96
    Width = 657
    Height = 273
    DataSource = Data.Datalist
    TabOrder = 4
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'picnum'
        Title.Caption = #22270#21495
        Width = 124
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'name'
        Title.Caption = #21517#31216
        Width = 129
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'isfixed'
        Title.Caption = #26159#21542#22266#37197
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fixednum'
        Title.Caption = #22266#37197#25968#37327
        Width = 55
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'chargeperson'
        Title.Caption = #36127#36131#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'requestnum'
        Title.Caption = #30003#35831#25968#37327
        Width = 57
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'unusualreason'
        Title.Caption = #24322#24120#21407#22240
        Width = 124
        Visible = True
      end>
  end
  object DBGrid1: TDBGrid
    Left = 112
    Top = 40
    Width = 433
    Height = 161
    DataSource = Data.datamain
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    OnKeyPress = DBGrid1KeyPress
    Columns = <
      item
        Expanded = False
        FieldName = 'picnum'
        Title.Caption = #22270#21495
        Width = 106
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'name'
        Title.Caption = #21517#31216
        Width = 103
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'isfixed'
        Title.Caption = #26159#21542#22266#37197
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fixednum'
        Title.Caption = #22266#37197#25968#37327
        Width = 75
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'chargeperson'
        Title.Caption = #36127#36131#20154
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 32
    Top = 400
    Width = 153
    Height = 25
    Caption = #28165#38500#25968#25454'( '#31243#24207#21592#27979#35797')'
    TabOrder = 5
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 272
    Top = 400
    Width = 89
    Height = 25
    Caption = #29983#25104#19978#25253#25991#20214
    TabOrder = 6
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 552
    Top = 400
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 7
    OnClick = Button3Click
  end
  object SaveDialog1: TSaveDialog
    Filter = '(*.csv)|*.csv'
    Left = 400
    Top = 400
  end
end