temp_unit2.dfm

Msaccess 転換成 Bcon, 使用Delphi 編寫COM Msaccess 転換成 Bcon, 使用Delphi 編寫COM

object Form2: TForm2
  Left = 250
  Top = 103
  Width = 696
  Height = 480
  Caption = 'Form2'
  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 ADOTable1: TADOTable
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\JK Documents\My ' +
      'Delphi Projects\Marble\MDB2BCON\db2.mdb;Persist Security Info=Fa' +
      'lse'
    CursorType = ctStatic
    TableName = 'SMTP'
    Left = 80
    Top = 72
    object ADOTable1DSDesigner: TAutoIncField
      FieldName = #35672#21029#30908
      ReadOnly = True
    end
    object ADOTable1ServerName: TWideStringField
      FieldName = 'ServerName'
      Size = 50
    end
    object ADOTable1ServerPort: TIntegerField
      FieldName = 'ServerPort'
    end
    object ADOTable1ServerUser: TWideStringField
      FieldName = 'ServerUser'
      Size = 50
    end
    object ADOTable1ServerPassword: TWideStringField
      FieldName = 'ServerPassword'
      Size = 50
    end
    object ADOTable1SMTPAuthenticationType: TIntegerField
      FieldName = 'SMTPAuthenticationType'
    end
    object ADOTable1EmailAccount: TWideStringField
      FieldName = 'EmailAccount'
      Size = 128
    end
    object ADOTable1CONNECT_STRING: TWideStringField
      FieldName = 'CONNECT_STRING'
      Size = 255
    end
    object ADOTable1TestMailAddress: TWideStringField
      FieldName = 'TestMailAddress'
      Size = 255
    end
  end
  object ClientDataSet1: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    Left = 192
    Top = 80
    Data = {
      B80200009619E0BD0100000018000000090001000000030000006B0106C3D1A7
      4FBD58040001000200010007535542545950450200490008004175746F696E63
      000A5365727665724E616D6501004A0000000100055749445448020002006400
      0A536572766572506F727404000100000000000A536572766572557365720100
      4A00000001000557494454480200020064000E53657276657250617373776F72
      6401004A000000010005574944544802000200640016534D545041757468656E
      7469636174696F6E5479706504000100000000000C456D61696C4163636F756E
      7402004A00000001000557494454480200020000010E434F4E4E4543545F5354
      52494E4702004A000000010005574944544802000200FE010F546573744D6169
      6C4164647265737302004A000000010005574944544802000200FE0102000D44
      454641554C545F4F524445520400820001000000010000000A554E495155455F
      4B45590400820001000000010000000000000001000000206D00610069006C00
      2E0066006C006F0077002E0063006F006D002E0074007700190000000C6A0061
      0063006B00690065000834003000330035000100000024006A00610063006B00
      69006500400066006C006F0077002E0063006F006D002E0074007700B8005000
      72006F00760069006400650072003D004D006900630072006F0073006F006600
      74002E004A00650074002E004F004C004500440042002E0034002E0030003B00
      4400610074006100200053006F0075007200630065003D002E005C004E006F00
      740069006600790043006F006E00740072006F006C002E006D00640062003B00
      5000650072007300690073007400200053006500630075007200690074007900
      200049006E0066006F003D00460061006C007300650024006A00610063006B00
      69006500400066006C006F0077002E0063006F006D002E0074007700}
    object ClientDataSet1CDSDesigner: TAutoIncField
      FieldName = #35672#21029#30908
      ReadOnly = True
    end
    object ClientDataSet1ServerName: TWideStringField
      FieldName = 'ServerName'
      Size = 50
    end
    object ClientDataSet1ServerPort: TIntegerField
      FieldName = 'ServerPort'
    end
    object ClientDataSet1ServerUser: TWideStringField
      FieldName = 'ServerUser'
      Size = 50
    end
    object ClientDataSet1ServerPassword: TWideStringField
      FieldName = 'ServerPassword'
      Size = 50
    end
    object ClientDataSet1SMTPAuthenticationType: TIntegerField
      FieldName = 'SMTPAuthenticationType'
    end
    object ClientDataSet1EmailAccount: TWideStringField
      FieldName = 'EmailAccount'
      Size = 128
    end
    object ClientDataSet1CONNECT_STRING: TWideStringField
      FieldName = 'CONNECT_STRING'
      Size = 255
    end
    object ClientDataSet1TestMailAddress: TWideStringField
      FieldName = 'TestMailAddress'
      Size = 255
    end
  end
end