unitrecords.dfm

此代码是关于mapgis的在

object Frame_Records: TFrame_Records
  Left = 0
  Top = 0
  Width = 526
  Height = 147
  TabOrder = 0
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 526
    Height = 28
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 11
      Width = 36
      Height = 13
      Caption = #22270#23618#65306
    end
    object Label2: TLabel
      Left = 152
      Top = 11
      Width = 60
      Height = 13
      Caption = #23545#35937#24635#25968#65306
    end
    object Label3: TLabel
      Left = 312
      Top = 11
      Width = 60
      Height = 13
      Caption = #23383#27573#24635#25968#65306
    end
    object LayerNameEdit: TEdit
      Left = 40
      Top = 3
      Width = 97
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 0
    end
    object RecordCountEdit: TEdit
      Left = 208
      Top = 3
      Width = 73
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 1
    end
    object ColumnCountEdit: TEdit
      Left = 368
      Top = 3
      Width = 73
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 2
    end
  end
  object Grid_Data: TYHBStringGrid
    Left = 0
    Top = 28
    Width = 526
    Height = 119
    Align = alClient
    Color = clBtnFace
    DefaultRowHeight = 18
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
    TabOrder = 1
    OnDblClick = Grid_DataDblClick
    Columns = <
      item
        HeaderFont.Charset = DEFAULT_CHARSET
        HeaderFont.Color = clWindowText
        HeaderFont.Height = -11
        HeaderFont.Name = 'MS Sans Serif'
        HeaderFont.Style = []
        Color = clBtnFace
        Width = 14
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        EditorInheritsCellProps = False
        ReadOnly = False
        WordBreak = False
        DataType = ftUnknown
        AutoIncValue = False
        SortedOnTitleClick = False
        ControlType = ctTextEdit
        RecordObjectIsOwner = False
        RecordObjectType = lotNone
      end
      item
        HeaderFont.Charset = DEFAULT_CHARSET
        HeaderFont.Color = clWindowText
        HeaderFont.Height = -11
        HeaderFont.Name = 'MS Sans Serif'
        HeaderFont.Style = []
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        EditorInheritsCellProps = False
        ReadOnly = False
        WordBreak = False
        DataType = ftString
        AutoIncValue = False
        SortedOnTitleClick = False
        ControlType = ctTextEdit
        RecordObjectIsOwner = False
        RecordObjectType = lotNone
      end
      item
        HeaderFont.Charset = DEFAULT_CHARSET
        HeaderFont.Color = clWindowText
        HeaderFont.Height = -11
        HeaderFont.Name = 'MS Sans Serif'
        HeaderFont.Style = []
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        EditorInheritsCellProps = False
        ReadOnly = False
        WordBreak = False
        DataType = ftString
        AutoIncValue = False
        SortedOnTitleClick = False
        ControlType = ctTextEdit
        RecordObjectIsOwner = False
        RecordObjectType = lotNone
      end
      item
        HeaderFont.Charset = DEFAULT_CHARSET
        HeaderFont.Color = clWindowText
        HeaderFont.Height = -11
        HeaderFont.Name = 'MS Sans Serif'
        HeaderFont.Style = []
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        EditorInheritsCellProps = False
        ReadOnly = False
        WordBreak = False
        DataType = ftString
        AutoIncValue = False
        SortedOnTitleClick = False
        ControlType = ctTextEdit
        RecordObjectIsOwner = False
        RecordObjectType = lotNone
      end
      item
        HeaderFont.Charset = DEFAULT_CHARSET
        HeaderFont.Color = clWindowText
        HeaderFont.Height = -11
        HeaderFont.Name = 'MS Sans Serif'
        HeaderFont.Style = []
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        EditorInheritsCellProps = False
        ReadOnly = False
        WordBreak = False
        DataType = ftString
        AutoIncValue = False
        SortedOnTitleClick = False
        ControlType = ctTextEdit
        RecordObjectIsOwner = False
        RecordObjectType = lotNone
      end>
    ColumnCount = 5
    SortOnClickTitle = True
    FixedLineColor = clBlack
    GridLineColor = clBlack
    ImmediateEditMode = False
    MultiLine = False
    SelectFrameColor = clSkyBlue
    SelectTextColor = clWhite
    ColSelect = False
    HighlightSortCol = False
    HasMatrix = False
    HMatrixSpace = 5
    VMatrixSpace = 5
    HasHLine = False
    hasVLine = False
    MatrixColor = clYellow
    TitleHeight = 18
    DataHeight = 18
    ColWidths = (
      14
      64
      64
      64
      64)
    RowHeights = (
      18
      18
      18
      18
      18)
  end
end