untbd2.dfm

本软件是我公司开发的具有实际用途即核磁共振含油率测试分析的源代码。

            Height = 65
            Caption = #26631#26679#36755#20837#23436#21518#24320#22987#26631#23450
            TabOrder = 5
            object BitBtn3: TBitBtn
              Left = 96
              Top = 24
              Width = 97
              Height = 28
              Caption = #26631#23450
              TabOrder = 0
              OnClick = BitBtn3Click
              Glyph.Data = {
                36040000424D3604000000000000360000002800000010000000100000000100
                2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
                FF00FFFFFF00FFFFFF000E0E0E000E0E0E000E0E0E000E0E0E00FFFFFF00FFFF
                FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                FF000E0E0E000E0E0E0000DC00003DB9000031960000319600000E0E0E000E0E
                0E00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000E0E
                0E0000B9000055FF000025FF250000DC000000B9000031960000257300000073
                00000E0E0E00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000E0E
                0E000096000000DC000055FF000000DC00003DB9000025730000257300001950
                00000E0E0E00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                FF000E0E0E0000B9000055FF000025FF25003196000031960000319600000E0E
                0E0026262600262626002626260026262600FFFFFF00FFFFFF00FFFFFF00FFFF
                FF000E0E0E000096000000DC000025FF25003DB9000025730000195000000E0E
                0E000000DC003D00B900310096003100960026262600FFFFFF00323232003232
                3200323232000E0E0E0000DC000000DC00003DB90000319600000E0E0E000000
                FF000000FF000000DC003D00B9003D00B9003100960026262600323232007373
                0000737300000E0E0E000096000000DC000031960000195000000E0E0E004848
                FF004848FF000000FF000000DC003D00B900310096002626260032323200DC92
                0000DC920000737300000E0E0E0000DC0000319600000E0E0E002525FF006B6B
                FF006B6BFF002557FF000000FF000000DC003D00B9002626260032323200DC92
                0000DC920000DC9200000E0E0E0000B9000000B900000E0E0E002525FF008F6B
                FF00B1B1FF006B6BFF004848FF000000FF000000DC002626260032323200FFAA
                0000FFAA0000FFAA0000969600000E0E0E000E0E0E000E0E0E002525FF00D4D4
                FF008F6BFF006B6BFF004848FF000000FF000000DC002626260032323200FFB8
                4800FFB84800FFB84800FFAA0000DC92000096960000969600001A1A1A000000
                FF000000FF000000FF000000FF000000FF0026262600FFFFFF0032323200FFB8
                4800DCDC0000FFB84800FFAA0000DC92000096960000FFAA0000323232001A1A
                1A0026262600262626002626260026262600FFFFFF00FFFFFF0032323200FFAA
                0000FFB84800FFB84800FFAA0000DC92000096960000FFAA000032323200FFFF
                FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00323232003232
                320032323200323232003232320032323200323232003232320032323200FFFF
                FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
            end
          end
          object Edit3: TEdit
            Left = 122
            Top = 43
            Width = 175
            Height = 21
            Hint = #35831#36755#20837#26631#23450#20154#21592#22995#21517
            ParentShowHint = False
            ShowHint = True
            TabOrder = 6
          end
        end
      end
    end
  end
  object Panel2: TPanel
    Left = 353
    Top = 0
    Width = 514
    Height = 613
    Align = alClient
    BevelInner = bvLowered
    TabOrder = 1
    object GroupBox2: TGroupBox
      Left = 2
      Top = 2
      Width = 510
      Height = 609
      Align = alClient
      Caption = #26354#32447#22270
      TabOrder = 0
      object Panel4: TPanel
        Left = 2
        Top = 15
        Width = 506
        Height = 592
        Align = alClient
        BevelInner = bvLowered
        TabOrder = 0
        object PageControl1: TPageControl
          Left = 2
          Top = 2
          Width = 502
          Height = 588
          ActivePage = TabSheet2
          Align = alClient
          TabIndex = 1
          TabOrder = 0
          object TabSheet1: TTabSheet
            Caption = #37319#26679#32467#26524#30340#26102#22495#22270'('#27169#30340#22270')'
            object Label4: TLabel
              Left = 160
              Top = 64
              Width = 161
              Height = 13
              AutoSize = False
            end
            object sampling: TChart
              Left = 24
              Top = 48
              Width = 425
              Height = 433
              AllowPanning = pmNone
              BackWall.Brush.Color = clWhite
              BackWall.Brush.Style = bsClear
              MarginBottom = 0
              MarginLeft = 0
              MarginRight = 0
              MarginTop = 0
              Title.Text.Strings = (
                'TChart')
              Title.Visible = False
              BottomAxis.AxisValuesFormat = '###'
              BottomAxis.ExactDateTime = False
              BottomAxis.Increment = 100
              BottomAxis.Title.Caption = 'ms'
              LeftAxis.ExactDateTime = False
              LeftAxis.Increment = 500
              LeftAxis.LabelsSeparation = 0
              LeftAxis.MinorTickCount = 5
              LeftAxis.MinorTickLength = 4
              LeftAxis.EndPosition = 99
              LeftAxis.TickLength = 7
              View3D = False
              BevelOuter = bvNone
              TabOrder = 0
              object Series1: TLineSeries
                Marks.Callout.Brush.Color = clBlack
                Marks.Visible = False
                ShowInLegend = False
                Pointer.Dark3D = False
                Pointer.Draw3D = False
                Pointer.InflateMargins = True
                Pointer.Style = psSmallDot
                Pointer.Visible = True
                XValues.Name = 'X'
                XValues.Order = loAscending
                YValues.Name = 'Y'
                YValues.Order = loNone
              end
            end
          end
          object TabSheet2: TTabSheet
            Caption = #25311#21512#30452#32447#22270
            ImageIndex = 1
            object Label10: TLabel
              Left = 56
              Top = 14
              Width = 177
              Height = 13
              AutoSize = False
              Caption = #26012#29575#65306
            end
            object Label11: TLabel
              Left = 280
              Top = 16
              Width = 193
              Height = 13
              AutoSize = False
              Caption = #25130#36317#65306
            end
            object Chart2: TChart
              Left = 40
              Top = 48
              Width = 442
              Height = 401
              Cursor = crCross
              BackWall.Brush.Color = clWhite
              BackWall.Brush.Style = bsClear
              Legend.Visible = False
              MarginBottom = 0
              MarginLeft = 0
              MarginRight = 0
              MarginTop = 0
              Title.Text.Strings = (
                'TChart')
              Title.Visible = False
              BottomAxis.Automatic = False
              BottomAxis.AutomaticMinimum = False
              BottomAxis.AxisValuesFormat = '###'
              BottomAxis.ExactDateTime = False
              BottomAxis.GridCentered = True
              BottomAxis.Increment = 1
              BottomAxis.Title.Caption = #27833#21547#37327
              BottomAxis.Title.Font.Height = -13
              BottomAxis.Title.Font.Gradient.Balance = 74
              BottomAxis.Title.Font.Gradient.Direction = gdBottomTop
              BottomAxis.Title.Font.Gradient.EndColor = clBlack
              BottomAxis.Title.Font.Gradient.MidColor = 16744576
              BottomAxis.Title.Font.Gradient.StartColor = clBlack
              BottomAxis.Title.Font.Gradient.Outline = True
              BottomAxis.Title.Font.InterCharSize = 8
              BottomAxis.Title.Font.OutLine.Color = clRed
              LeftAxis.Automatic = False
              LeftAxis.AutomaticMinimum = False
              LeftAxis.ExactDateTime = False
              LeftAxis.Increment = 1
              LeftAxis.Title.Caption = #20449#21495#26368#22823#20540#19982#36136#37327#20043#27604
              LeftAxis.Title.Font.Height = -13
              LeftAxis.Title.Font.InterCharSize = 3
              View3D = False
              View3DOptions.ZoomText = False
              View3DWalls = False
              Zoom.Animated = True
              Zoom.UpLeftZooms = True
              BevelOuter = bvNone
              ParentShowHint = False
              ShowHint = True
              TabOrder = 0
              OnMouseMove = Chart2MouseMove
              PrintMargins = (
                15
                6
                15
                6)
              object LineSeries1: TLineSeries
                Marks.Callout.Brush.Color = clBlack
                Marks.Visible = False
                ShowInLegend = False
                AfterDrawValues = LineSeries1AfterDrawValues
                LinePen.Visible = False
                Pointer.Brush.Color = 16744448
                Pointer.HorizSize = 6
                Pointer.InflateMargins = True
                Pointer.Style = psCircle
                Pointer.VertSize = 6
                Pointer.Visible = True
                XValues.Name = 'X'
                XValues.Order = loAscending
                YValues.Name = 'Y'
                YValues.Order = loNone
              end
              object ChartTool1: TCursorTool
              end
            end
            object StatusBar1: TStatusBar
              Left = 0
              Top = 541
              Width = 494
              Height = 19
              Panels = <>
              SimplePanel = False
            end
          end
          object TabSheet3: TTabSheet
            Caption = 'FID'#25968#25454
            ImageIndex = 2
            object Memo1: TMemo
              Left = 16
              Top = 16
              Width = 457
              Height = 521
              ScrollBars = ssBoth
              TabOrder = 0
            end
          end
          object TabSheet4: TTabSheet
            Caption = #37319#26679#32467#26524#26102#22495#22270'2('#21407#22987#22270')'
            ImageIndex = 3
            object Chart1: TChart
              Left = 16
              Top = 48
              Width = 416
              Height = 393
              BackWall.Brush.Color = clWhite
              BackWall.Brush.Style = bsClear
              Legend.Visible = False
              Title.Text.Strings = (
                'TChart')
              View3D = False
              BevelOuter = bvNone
              TabOrder = 0
              object Series2: TLineSeries
                Marks.Callout.Brush.Color = clBlack
                Marks.Visible = False
                Pointer.InflateMargins = True
                Pointer.Style = psRectangle
                Pointer.Visible = False
                XValues.Name = 'X'
                XValues.Order = loAscending
                YValues.Name = 'Y'
                YValues.Order = loNone
              end
            end
          end
        end
      end
    end
  end
  object ADOQuery2by: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 184
    Top = 496
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 64
    Top = 496
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 272
    Top = 528
  end
  object ADOQuery4: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 320
    Top = 496
  end
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 104
    Top = 512
  end
  object ADOQuery1jb: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 32
    Top = 528
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1jb
    Left = 184
    Top = 528
  end
  object OD1: TOpenDialog
    Filter = 'FID'#25991#20214'|*.fid|'#25152#26377#25991#20214'|*.*'
    Left = 120
    Top = 480
  end
  object PopupMenu1: TPopupMenu
    Left = 160
    Top = 424
    object N2: TMenuItem
      Caption = #21024#38500#24403#21069#25152#22312#34892#35760#24405
      OnClick = N2Click
    end
    object N1: TMenuItem
      Caption = #21024#38500#35813#26631#23450#32534#21495#30340#25152#26377#35760#24405
      OnClick = N1Click
    end
  end
end