unit2.dfm

利用Modem的远程通信功能

object realgrid: Trealgrid
  Left = 164
  Top = 62
  Width = 518
  Height = 492
  Caption = 'realgrid'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 112
    Top = 8
    Width = 261
    Height = 27
    Caption = #24066#27745#27700#30417#27979#23454#26102#25968#25454
    Font.Charset = GB2312_CHARSET
    Font.Color = clPurple
    Font.Height = -27
    Font.Name = #38582#20070
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 56
    Width = 497
    Height = 321
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #27969#37327#35745#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24403#21069#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24403#21069#26102#38388
        Visible = True
      end
      item
        Expanded = False
        FieldName = #27700#20301
        Title.Caption = #27700#20301'(m)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #27969#36895
        Title.Caption = #27969#36895'(m/s)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #30636#26102#27969#37327
        Title.Caption = #30636#26102#27969#37327'(t/h)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32047#35745#27969#37327
        Title.Caption = #32047#31215#27969#37327'(t)'
        Visible = True
      end>
  end
  object DBNavigator1: TDBNavigator
    Left = 24
    Top = 384
    Width = 464
    Height = 25
    DataSource = DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
    TabOrder = 1
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 443
    Width = 510
    Height = 22
    Panels = <
      item
        Text = #24037#25511#20844#21496
        Width = 50
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object BitBtn1: TBitBtn
    Left = 24
    Top = 416
    Width = 113
    Height = 25
    Caption = #26242#20572#26174#31034
    TabOrder = 3
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 144
    Top = 416
    Width = 113
    Height = 25
    Caption = #32487#32493#26174#31034
    TabOrder = 4
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 264
    Top = 416
    Width = 113
    Height = 25
    Caption = #26354#32447#29983#25104
    TabOrder = 5
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 384
    Top = 416
    Width = 105
    Height = 25
    Caption = #25253#34920#25171#21360
    TabOrder = 6
    OnClick = BitBtn4Click
  end
  object Table1: TTable
    DatabaseName = 'tling'
    TableName = 'realtime.db'
    Left = 72
    Top = 16
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 176
    Top = 8
  end
end