unit2.dfm

铁路道口管理系统 开发源码 大家随便看看 呵呵

object Form2: TForm2
  Left = 22
  Top = 28
  Width = 778
  Height = 542
  Caption = 'Form2'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 770
    Height = 33
    Align = alTop
    TabOrder = 1
    DesignSize = (
      770
      33)
    object SpeedButton1: TSpeedButton
      Left = 5
      Top = 8
      Width = 37
      Height = 22
      Caption = #28155#21152
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 45
      Top = 8
      Width = 37
      Height = 22
      Caption = #20462#25913
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 85
      Top = 8
      Width = 37
      Height = 22
      Caption = #21024#38500
      OnClick = SpeedButton3Click
    end
    object BitBtn1: TBitBtn
      Left = 127
      Top = 8
      Width = 41
      Height = 22
      Anchors = [akLeft]
      Caption = #36864#20986
      TabOrder = 0
      OnClick = BitBtn1Click
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 33
    Width = 770
    Height = 475
    ActivePage = TabSheet1
    Align = alClient
    Style = tsButtons
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #22522#26412#20449#24687
      object Splitter1: TSplitter
        Left = 320
        Top = 0
        Width = 9
        Height = 444
        Beveled = True
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 320
        Height = 444
        Align = alLeft
        Ctl3D = False
        DataSource = DModule1.DS_Brow
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
      end
      object Panel1: TPanel
        Left = 329
        Top = 0
        Width = 433
        Height = 444
        Align = alClient
        TabOrder = 1
        object Label1: TLabel
          Left = 32
          Top = 216
          Width = 60
          Height = 13
          Caption = #36947#21475#21517#31216#65306
        end
        object Label2: TLabel
          Left = 20
          Top = 248
          Width = 72
          Height = 13
          Caption = #36947#21475#36127#36131#20154#65306
        end
        object Label3: TLabel
          Left = 32
          Top = 280
          Width = 60
          Height = 13
          Caption = #36947#21475#25551#36848#65306
        end
        object Label4: TLabel
          Left = 32
          Top = 20
          Width = 60
          Height = 13
          Caption = #36947#21475#22270#29255#65306
        end
        object Image1: TImage
          Left = 98
          Top = 19
          Width = 279
          Height = 188
          Stretch = True
          OnDblClick = Image1DblClick
        end
        object Label5: TLabel
          Left = 29
          Top = 501
          Width = 60
          Height = 13
          Caption = #24405#20687#36164#26009#65306
        end
        object Edit1: TEdit
          Left = 96
          Top = 212
          Width = 285
          Height = 21
          TabOrder = 0
          Text = 'Edit1'
        end
        object Edit2: TEdit
          Left = 96
          Top = 244
          Width = 285
          Height = 21
          TabOrder = 1
          Text = 'Edit2'
        end
        object Memo1: TMemo
          Left = 96
          Top = 280
          Width = 281
          Height = 207
          Lines.Strings = (
            'Memo1')
          ScrollBars = ssBoth
          TabOrder = 2
        end
        object Button1: TButton
          Left = 360
          Top = 496
          Width = 41
          Height = 20
          Caption = #24405#20687
          TabOrder = 3
          OnClick = Button1Click
        end
        object Edit3: TEdit
          Left = 96
          Top = 496
          Width = 257
          Height = 21
          TabOrder = 4
          Text = 'Edit3'
        end
      end
    end
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Filter = 'JPEG Image File (*.jpg)|*.jpg|JPEG Image File (*.jpeg)|*.jpeg'
    Left = 269
    Top = 12
  end
end