unitdata.~dfm

提取铁路的GPS数据通过串口

object dm: Tdm
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 199
  Top = 123
  Height = 150
  Width = 215
  object dbsMain: TDatabase
    AliasName = 'RailWayData'
    DatabaseName = 'dbsGprsData'
    LoginPrompt = False
    Params.Strings = (
      'USER NAME='#31649#29702#21592
      'PASSWORD=ZXCVBNM')
    SessionName = 'Default'
    Left = 56
    Top = 8
  end
  object tblRailwayGPS: TTable
    DatabaseName = 'dbsGprsData'
    TableName = 'RailwayGPS'
    Left = 112
    Top = 8
    object tblRailwayGPSID: TAutoIncField
      FieldName = 'ID'
    end
    object tblRailwayGPSBDEDesigner: TStringField
      FieldName = #32463#24230
      Size = 50
    end
    object tblRailwayGPSBDEDesigner2: TStringField
      FieldName = #32428#24230
      Size = 50
    end
    object tblRailwayGPSBDEDesigner3: TFloatField
      FieldName = #37324#31243
    end
    object tblRailwayGPSBDEDesigner4: TStringField
      FieldName = #26631#24535
      Size = 50
    end
    object tblRailwayGPSBDEDesigner5: TStringField
      FieldName = #38567#36947
      Size = 50
    end
  end
end