urdmeasydcom.dfm

来自「delphi多层应用系统 delphi多层应用系统」· DFM 代码 · 共 33 行

object EasyDCOMServer: TEasyDCOMServer
  OldCreateOrder = False
  Left = 326
  Top = 262
  Height = 272
  Width = 418
  object Database1: TDatabase
    AliasName = 'DBDEMOS'
    Connected = True
    DatabaseName = 'aEasyDCOMDB'
    HandleShared = True
    SessionName = 'Default'
    Left = 40
    Top = 40
  end
  object Query1: TQuery
    DatabaseName = 'aEasyDCOMDB'
    SQL.Strings = (
      
        'SELECT Biolife."Species No", Category, Common_Name, Biolife."Spe' +
        'cies Name", Biolife."Length (cm)", Length_In, Notes, Graphic'
      'FROM "biolife.db" Biolife')
    Left = 112
    Top = 40
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = Query1
    Constraints = True
    Left = 40
    Top = 112
  end
end