zfrm_gettechnou.dfm

一个很不错的评标系统

object zfrm_gettechno: Tzfrm_gettechno
  Left = 243
  Top = 243
  BorderStyle = bsDialog
  Caption = '专家评分'
  ClientHeight = 343
  ClientWidth = 532
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 0
    Top = 0
    Width = 532
    Height = 31
    Align = alTop
    Alignment = taCenter
    AutoSize = False
    Caption = 'Label1'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Button2: TButton
    Left = 411
    Top = 310
    Width = 80
    Height = 25
    Cancel = True
    Caption = '取消'
    ModalResult = 2
    TabOrder = 0
  end
  object Button1: TButton
    Left = 312
    Top = 310
    Width = 80
    Height = 25
    Caption = '确定'
    ModalResult = 1
    TabOrder = 1
  end
  object PageControl1: TPageControl
    Left = 11
    Top = 30
    Width = 510
    Height = 273
    ActivePage = TabSheet1
    TabOrder = 2
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = '专家评分'
      object GroupBox1: TGroupBox
        Left = 6
        Top = -1
        Width = 490
        Height = 242
        TabOrder = 0
        object Image1: TImage
          Left = 7
          Top = 13
          Width = 32
          Height = 32
          AutoSize = True
          Picture.Data = {
            055449636F6E0000010001002020100000000000E80200001600000028000000
            2000000040000000010004000000000080020000000000000000000000000000
            0000000000000000000080000080000000808000800000008000800080800000
            80808000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
            FFFFFF00000000000000000000000000000000000008FFF00000000000000000
            0000000000887777000000000000000000000000008800770F00000000000000
            00000000088088F70FFF0000000000000000000008808880FFFFF00000000000
            000000000888000FFF8FFFF0000000000000000007888800F8088FFF00000000
            000000000078888800F0088F8800000000000000000077700FFFF00888880000
            000000000000000FFFFFFFF088800000000000000000000000FFF8880008BBBB
            BB8800000000000000000800BBBBBBBBBBBBB80000000000000000BBBBBBBBBB
            BBBBBBB0000000000000BBBBBBBBB0000BBBBBB00000000000BB87000000000B
            B0BBBB800000000000008B8BBBBBBBBBB00BB80000000000BBBBBBBBBBBBBBBB
            BBB00000000000BBBBBB0000000000BBB0BB0F000000BBBBB0008888888870BB
            0B0B0FF0000BBBB00888BBBBBBB070BB0BB00FF0000BB0088BBBBBBBBBB070BB
            0B700000000B088BBBBBBBBBBB070BB0BB00000000008BBBBBBBBBBBBB070BB0
            BB00000000000BBBBBBBBBBBB070BB0BB7000000000008BBBBBBBBBBB070BB0B
            B00000000000008BBBBBBBBB070BB0BB0000000000000000BBBBBBB070BB0BB0
            0000000000000000088888070BB0B0000000000000000000000000BBBB000000
            00000000000000000000BBBB0000000000000000000000000000000000000000
            00000000E07FFFFFC01FFFFF8007FFFF8003FFFF0000FFFF00007FFF00001FFF
            000007FF800003FFC0000007F0000001FC000000FFC00000FFE00000FFC00000
            FF800000FE000001F8000000F0000000E0000000C0000000C0000009C000000F
            C000000FF000001FF000003FF800007FFC0000FFFF0001FFFF8007FFFFC03FFF
            FFF0FFFF}
        end
        object Label2: TLabel
          Left = 62
          Top = 216
          Width = 66
          Height = 12
          Caption = '技术标总分:'
        end
        object StringGrid1: TStringGrid
          Left = 46
          Top = 22
          Width = 435
          Height = 181
          ColCount = 11
          DefaultColWidth = 40
          DefaultRowHeight = 20
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goTabs]
          TabOrder = 0
          OnKeyPress = StringGrid1KeyPress
          OnSelectCell = StringGrid1SelectCell
          OnSetEditText = StringGrid1SetEditText
        end
        object BitBtn1: TBitBtn
          Left = 390
          Top = 211
          Width = 75
          Height = 22
          Caption = '计算(&A)'
          Enabled = False
          TabOrder = 1
          OnClick = BitBtn1Click
          Style = bsNew
        end
        object StaticText1: TStaticText
          Left = 133
          Top = 214
          Width = 43
          Height = 16
          Alignment = taCenter
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = '0'
          TabOrder = 2
        end
      end
    end
  end
end