object Fgcll: TFgcll
  Left = 160
  Top = 168
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '工程瀏覽'
  ClientHeight = 348
  ClientWidth = 536
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 537
    Height = 305
    DataSource = YDData.DSgcgl
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋體'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'GC_MC'
        Title.Alignment = taCenter
        Title.Caption = '工程名稱'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_LX'
        Title.Alignment = taCenter
        Title.Caption = '工程類型'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_FY'
        Title.Alignment = taCenter
        Title.Caption = '工程費用'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_SGDW'
        Title.Alignment = taCenter
        Title.Caption = '施工單位'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_JGRQ'
        Title.Alignment = taCenter
        Title.Caption = '竣工日期'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_YSR'
        Title.Alignment = taCenter
        Title.Caption = '驗收人'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_YSRQ'
        Title.Alignment = taCenter
        Title.Caption = '驗收日期'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_YSPY'
        Title.Alignment = taCenter
        Title.Caption = '驗收評語'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_SFHG'
        Title.Alignment = taCenter
        Title.Caption = '是否合格'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GC_FYF'
        Title.Alignment = taCenter
        Title.Caption = '復驗費'
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 432
    Top = 312
    Width = 73
    Height = 25
    Caption = '確定'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋體'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = BitBtn1Click
    Kind = bkOK
  end
end