home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 August / Chip_2001-08_cd2.bin / kancelar / busicard / BCDP2000.EXE / bcdp.exe / 0 / RCDATA / TPDBIMPORTFORM / TPDBIMPORTFORM.txt
Encoding:
Text File  |  2000-10-20  |  5.9 KB  |  222 lines

  1. object PDBImportForm: TPDBImportForm
  2.   Left = 231
  3.   Top = 148
  4.   HelpContext = 118
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = 'Import'
  8.   ClientHeight = 395
  9.   ClientWidth = 436
  10.   Color = clBtnFace
  11.   Font.Charset = DEFAULT_CHARSET
  12.   Font.Color = clWindowText
  13.   Font.Height = -11
  14.   Font.Name = 'MS Sans Serif'
  15.   Font.Style = []
  16.   OldCreateOrder = False
  17.   Position = poOwnerFormCenter
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Label1: TLabel
  21.     Left = 8
  22.     Top = 36
  23.     Width = 74
  24.     Height = 13
  25.     Caption = 'Import Filename'
  26.   end
  27.   object Label3: TLabel
  28.     Left = 8
  29.     Top = 8
  30.     Width = 198
  31.     Height = 13
  32.     Caption = 'STEP 1:  Choose the file to import.'
  33.     Font.Charset = DEFAULT_CHARSET
  34.     Font.Color = clRed
  35.     Font.Height = -11
  36.     Font.Name = 'MS Sans Serif'
  37.     Font.Style = [fsBold]
  38.     ParentFont = False
  39.   end
  40.   object OKBtn: TBitBtn
  41.     Left = 88
  42.     Top = 364
  43.     Width = 75
  44.     Height = 25
  45.     Caption = '&Import'
  46.     Default = True
  47.     Enabled = False
  48.     ModalResult = 1
  49.     TabOrder = 3
  50.     OnClick = OKBtnClick
  51.   end
  52.   object CancelBtn: TBitBtn
  53.     Left = 176
  54.     Top = 364
  55.     Width = 75
  56.     Height = 25
  57.     Caption = '&Cancel'
  58.     TabOrder = 4
  59.     Kind = bkCancel
  60.   end
  61.   object FileNameEdit: TEdit
  62.     Left = 96
  63.     Top = 33
  64.     Width = 241
  65.     Height = 21
  66.     Color = clBtnFace
  67.     ReadOnly = True
  68.     TabOrder = 0
  69.   end
  70.   object ChooseFileBtn: TBitBtn
  71.     Left = 348
  72.     Top = 32
  73.     Width = 29
  74.     Height = 25
  75.     TabOrder = 1
  76.     OnClick = ChooseFileBtnClick
  77.     Glyph.Data = {
  78.       66010000424D6601000000000000760000002800000014000000140000000100
  79.       040000000000F000000000000000000000001000000000000000000000000000
  80.       80000080000000808000800000008000800080800000C0C0C000808080000000
  81.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  82.       7777777700007777777777777777777700007777777777777777777700007700
  83.       00000000077777770000770033333333307777770000770B0333333333077777
  84.       0000770FBF333333333077770000770BFB033333333307770000770FBFB00000
  85.       000000770000770BFBFBFBFB077777770000770FBFBFBFBF077777770000770B
  86.       FB00000007777777000077700077777777000777000077777777777777700777
  87.       0000777777777707770707770000777777777770007777770000777777777777
  88.       7777777700007777777777777777777700007777777777777777777700007777
  89.       77777777777777770000}
  90.   end
  91.   object HelpBtn: TBitBtn
  92.     Left = 276
  93.     Top = 364
  94.     Width = 75
  95.     Height = 25
  96.     TabOrder = 5
  97.     Kind = bkHelp
  98.   end
  99.   object FieldPanel: TPanel
  100.     Left = 4
  101.     Top = 68
  102.     Width = 429
  103.     Height = 285
  104.     BevelInner = bvRaised
  105.     BevelOuter = bvLowered
  106.     TabOrder = 2
  107.     Visible = False
  108.     object Label4: TLabel
  109.       Left = 4
  110.       Top = 8
  111.       Width = 204
  112.       Height = 13
  113.       Caption = 'STEP 2:  Match the fields to import.'
  114.       Font.Charset = DEFAULT_CHARSET
  115.       Font.Color = clRed
  116.       Font.Height = -11
  117.       Font.Name = 'MS Sans Serif'
  118.       Font.Style = [fsBold]
  119.       ParentFont = False
  120.     end
  121.     object Groupbox1: TPanel
  122.       Left = 4
  123.       Top = 28
  124.       Width = 421
  125.       Height = 245
  126.       BevelInner = bvRaised
  127.       BevelOuter = bvLowered
  128.       TabOrder = 0
  129.       object Label2: TLabel
  130.         Left = 12
  131.         Top = 8
  132.         Width = 393
  133.         Height = 26
  134.         Caption = 
  135.           'Select matching fields from the two lists below and click the Ad' +
  136.           'd button to mark the fields for importing.'
  137.         WordWrap = True
  138.       end
  139.       object FieldList: TListBox
  140.         Left = 120
  141.         Top = 44
  142.         Width = 113
  143.         Height = 185
  144.         ItemHeight = 13
  145.         TabOrder = 1
  146.         OnMouseDown = FieldListMouseDown
  147.       end
  148.       object FixedFieldList: TListBox
  149.         Left = 12
  150.         Top = 44
  151.         Width = 101
  152.         Height = 185
  153.         ItemHeight = 13
  154.         Items.Strings = (
  155.           'First Name'
  156.           'Last Name'
  157.           'Company'
  158.           'Title'
  159.           'Address'
  160.           'Return Address'
  161.           'Phone'
  162.           'Fax'
  163.           'Email'
  164.           'User1'
  165.           'User2'
  166.           'User3'
  167.           'User4')
  168.         TabOrder = 0
  169.         OnMouseDown = FieldListMouseDown
  170.       end
  171.       object ResultList: TListBox
  172.         Left = 276
  173.         Top = 44
  174.         Width = 133
  175.         Height = 185
  176.         ItemHeight = 13
  177.         TabOrder = 4
  178.         OnMouseDown = FieldListMouseDown
  179.       end
  180.       object AddBtn: TBitBtn
  181.         Left = 240
  182.         Top = 100
  183.         Width = 29
  184.         Height = 25
  185.         TabOrder = 2
  186.         OnClick = AddBtnClick
  187.         Glyph.Data = {
  188.           F6000000424DF600000000000000760000002800000010000000100000000100
  189.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  190.           8000008000000080800080000000800080008080000080808000C0C0C0000000
  191.           FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00888888888888
  192.           88888888888088888888888888800888888888888880C088888888888880CC08
  193.           888800000000CCC088880CCCCCCCCCCC08880CCCCCCCCCCCC0880CCCCCCCCCCC
  194.           CC080CCCCCCCCCCCC0880CCCCCCCCCCC088800000000CCC0888888888880CC08
  195.           888888888880C088888888888880088888888888888088888888}
  196.       end
  197.       object RemoveBtn: TBitBtn
  198.         Left = 240
  199.         Top = 140
  200.         Width = 29
  201.         Height = 25
  202.         TabOrder = 3
  203.         OnClick = RemoveBtnClick
  204.         Glyph.Data = {
  205.           F6000000424DF600000000000000760000002800000010000000100000000100
  206.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  207.           8000008000000080800080000000800080008080000080808000C0C0C0000000
  208.           FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00888888880888
  209.           888888888880088888888888880C08888888888880CC0888888888880CCC0000
  210.           00008880CCCCCCCCCCC0880CCCCCCCCCCCC080CCCCCCCCCCCCC0880CCCCCCCCC
  211.           CCC08880CCCCCCCCCCC088880CCC00000000888880CC088888888888880C0888
  212.           8888888888800888888888888888088888888888888888888888}
  213.       end
  214.     end
  215.   end
  216.   object ImportDialog: TOpenDialog
  217.     Filter = 'Text Files (*.txt)|*.txt|Comma Seperated Values (*.csv)|*.csv'
  218.     Left = 389
  219.     Top = 32
  220.   end
  221. end
  222.