unit_frmcinemaset.dfm

影院售票系统完整源码

inherited frmdict: Tfrmdict
  Left = 317
  Top = 135
  Caption = #21442#25968#35774#32622
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    Alignment = taLeftJustify
    Caption = ' '#21442#25968#35774#32622
    Font.Height = -16
    Font.Style = [fsBold]
    ParentFont = False
  end
  inherited Panel2: TPanel
    Top = 46
    Height = 372
    object PageControl1: TPageControl
      Left = 0
      Top = 0
      Width = 688
      Height = 372
      ActivePage = TabSheet1
      Align = alClient
      TabIndex = 0
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = #24433#31080#31867#21035
        object ListView1: TCyberListView
          Left = 0
          Top = 0
          Width = 680
          Height = 345
          Align = alClient
          Columns = <
            item
              Caption = #31080#31867#32534#30721
              Width = 80
            end
            item
              Caption = #24433#31080#31867#21035
              Width = 150
            end>
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object TabSheet2: TTabSheet
        Caption = #24231#20301#31867#21035
        ImageIndex = 1
        object ListView2: TCyberListView
          Left = 0
          Top = 0
          Width = 680
          Height = 345
          Align = alClient
          Columns = <
            item
              Caption = #24231#20301#32534#30721
              Width = 80
            end
            item
              Caption = #24231#20301#31867#21035
              Width = 150
            end
            item
              Alignment = taRightJustify
              Caption = #27599#24231#20154#25968
              Width = 80
            end>
          FillLastColumn = False
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object TabSheet4: TTabSheet
        Caption = #24433#29255#31867#21035
        ImageIndex = 3
        object CyberListView1: TCyberListView
          Left = 0
          Top = 0
          Width = 680
          Height = 345
          Align = alClient
          Columns = <
            item
              Caption = #31867#21035#32534#30721
              Width = 80
            end
            item
              Caption = #31867#21035#21517#31216
              Width = 150
            end
            item
              Caption = #22791#27880
              Width = 200
            end>
          FillLastColumn = False
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
    end
  end
  inherited Panel3: TPanel
    Top = 418
    Height = 35
    Align = alBottom
    object BtnAdd: TBitBtn
      Left = 336
      Top = 8
      Width = 75
      Height = 25
      Caption = #28155#21152
      TabOrder = 0
    end
    object BtnEdit: TBitBtn
      Left = 424
      Top = 8
      Width = 75
      Height = 25
      Caption = #20462#25913
      TabOrder = 1
    end
    object BtnDel: TBitBtn
      Left = 522
      Top = 7
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 2
    end
    object BtnExit: TBitBtn
      Left = 610
      Top = 7
      Width = 75
      Height = 25
      Caption = #20851#38381
      TabOrder = 3
      OnClick = BtnExitClick
    end
  end
end