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

  1. object PDBForm: TPDBForm
  2.   Left = 250
  3.   Top = 173
  4.   HelpContext = 117
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = 'Personal Database'
  8.   ClientHeight = 375
  9.   ClientWidth = 293
  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 = poMainFormCenter
  18.   ShowHint = True
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object DBNavigator1: TDBNavigator
  23.     Left = 8
  24.     Top = 8
  25.     Width = 184
  26.     Height = 25
  27.     DataSource = DataSource
  28.     VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel]
  29.     TabOrder = 0
  30.   end
  31.   object OkBtn: TBitBtn
  32.     Left = 23
  33.     Top = 338
  34.     Width = 75
  35.     Height = 25
  36.     Caption = '&OK'
  37.     Default = True
  38.     ModalResult = 1
  39.     TabOrder = 1
  40.     OnClick = OkBtnClick
  41.     Glyph.Data = {
  42.       DE010000424DDE01000000000000760000002800000024000000120000000100
  43.       0400000000006801000000000000000000001000000000000000000000000000
  44.       80000080000000808000800000008000800080800000C0C0C000808080000000
  45.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  46.       3333333333333333333333330000333333333333333333333333F33333333333
  47.       00003333344333333333333333388F3333333333000033334224333333333333
  48.       338338F3333333330000333422224333333333333833338F3333333300003342
  49.       222224333333333383333338F3333333000034222A22224333333338F338F333
  50.       8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
  51.       33333338F83338F338F33333000033A33333A222433333338333338F338F3333
  52.       0000333333333A222433333333333338F338F33300003333333333A222433333
  53.       333333338F338F33000033333333333A222433333333333338F338F300003333
  54.       33333333A222433333333333338F338F00003333333333333A22433333333333
  55.       3338F38F000033333333333333A223333333333333338F830000333333333333
  56.       333A333333333333333338330000333333333333333333333333333333333333
  57.       0000}
  58.     NumGlyphs = 2
  59.   end
  60.   object CancelBtn: TBitBtn
  61.     Left = 107
  62.     Top = 338
  63.     Width = 75
  64.     Height = 25
  65.     Caption = '&Cancel'
  66.     TabOrder = 2
  67.     Kind = bkCancel
  68.   end
  69.   object HelpBtn: TBitBtn
  70.     Left = 191
  71.     Top = 338
  72.     Width = 75
  73.     Height = 25
  74.     TabOrder = 3
  75.     Kind = bkHelp
  76.   end
  77.   object ScrollBox1: TScrollBox
  78.     Left = 12
  79.     Top = 40
  80.     Width = 269
  81.     Height = 289
  82.     BorderStyle = bsNone
  83.     TabOrder = 4
  84.     object Label1: TLabel
  85.       Left = 0
  86.       Top = 328
  87.       Width = 34
  88.       Height = 13
  89.       Caption = 'User 1:'
  90.     end
  91.     object Label2: TLabel
  92.       Left = 0
  93.       Top = 19
  94.       Width = 53
  95.       Height = 13
  96.       Caption = 'First Name:'
  97.     end
  98.     object Label3: TLabel
  99.       Left = 0
  100.       Top = 72
  101.       Width = 47
  102.       Height = 13
  103.       Caption = 'Company:'
  104.     end
  105.     object Label4: TLabel
  106.       Left = 0
  107.       Top = 96
  108.       Width = 23
  109.       Height = 13
  110.       Caption = 'Title:'
  111.     end
  112.     object Label5: TLabel
  113.       Left = 0
  114.       Top = 120
  115.       Width = 41
  116.       Height = 13
  117.       Caption = 'Address:'
  118.     end
  119.     object Label6: TLabel
  120.       Left = 0
  121.       Top = 168
  122.       Width = 61
  123.       Height = 13
  124.       Caption = 'Ret Address:'
  125.     end
  126.     object Label7: TLabel
  127.       Left = 0
  128.       Top = 224
  129.       Width = 34
  130.       Height = 13
  131.       Caption = 'Phone:'
  132.     end
  133.     object Label8: TLabel
  134.       Left = 0
  135.       Top = 248
  136.       Width = 23
  137.       Height = 13
  138.       Caption = 'FAX:'
  139.     end
  140.     object Label9: TLabel
  141.       Left = 0
  142.       Top = 272
  143.       Width = 28
  144.       Height = 13
  145.       Caption = 'Email:'
  146.     end
  147.     object Label10: TLabel
  148.       Left = 0
  149.       Top = 392
  150.       Width = 34
  151.       Height = 13
  152.       Caption = 'User 2:'
  153.     end
  154.     object Label11: TLabel
  155.       Left = 0
  156.       Top = 456
  157.       Width = 34
  158.       Height = 13
  159.       Caption = 'User 3:'
  160.     end
  161.     object Label12: TLabel
  162.       Left = 0
  163.       Top = 528
  164.       Width = 34
  165.       Height = 13
  166.       Caption = 'User 4:'
  167.     end
  168.     object Label13: TLabel
  169.       Left = 0
  170.       Top = 43
  171.       Width = 54
  172.       Height = 13
  173.       Caption = 'Last Name:'
  174.     end
  175.     object DBEdit1: TDBEdit
  176.       Left = 64
  177.       Top = 16
  178.       Width = 177
  179.       Height = 21
  180.       DataField = 'FNAME'
  181.       DataSource = DataSource
  182.       TabOrder = 0
  183.     end
  184.     object DBEdit2: TDBEdit
  185.       Left = 64
  186.       Top = 64
  187.       Width = 177
  188.       Height = 21
  189.       DataField = 'COMPANY'
  190.       DataSource = DataSource
  191.       TabOrder = 2
  192.     end
  193.     object DBEdit3: TDBEdit
  194.       Left = 64
  195.       Top = 88
  196.       Width = 177
  197.       Height = 21
  198.       DataField = 'TITLE'
  199.       DataSource = DataSource
  200.       TabOrder = 3
  201.     end
  202.     object DBMemo1: TDBMemo
  203.       Left = 64
  204.       Top = 112
  205.       Width = 177
  206.       Height = 49
  207.       DataField = 'ADDRESS'
  208.       DataSource = DataSource
  209.       ScrollBars = ssBoth
  210.       TabOrder = 4
  211.     end
  212.     object DBMemo2: TDBMemo
  213.       Left = 64
  214.       Top = 164
  215.       Width = 177
  216.       Height = 49
  217.       DataField = 'RETADDRESS'
  218.       DataSource = DataSource
  219.       ScrollBars = ssBoth
  220.       TabOrder = 5
  221.     end
  222.     object DBEdit4: TDBEdit
  223.       Left = 64
  224.       Top = 216
  225.       Width = 177
  226.       Height = 21
  227.       DataField = 'PHONE'
  228.       DataSource = DataSource
  229.       TabOrder = 6
  230.     end
  231.     object DBEdit5: TDBEdit
  232.       Left = 64
  233.       Top = 240
  234.       Width = 177
  235.       Height = 21
  236.       DataField = 'FAX'
  237.       DataSource = DataSource
  238.       TabOrder = 7
  239.     end
  240.     object DBEdit6: TDBEdit
  241.       Left = 64
  242.       Top = 264
  243.       Width = 177
  244.       Height = 21
  245.       DataField = 'EMAIL'
  246.       DataSource = DataSource
  247.       TabOrder = 8
  248.     end
  249.     object DBMemo3: TDBMemo
  250.       Left = 64
  251.       Top = 328
  252.       Width = 177
  253.       Height = 57
  254.       DataField = 'USER1'
  255.       DataSource = DataSource
  256.       ScrollBars = ssBoth
  257.       TabOrder = 9
  258.     end
  259.     object DBMemo4: TDBMemo
  260.       Left = 64
  261.       Top = 392
  262.       Width = 177
  263.       Height = 57
  264.       DataField = 'USER2'
  265.       DataSource = DataSource
  266.       ScrollBars = ssBoth
  267.       TabOrder = 10
  268.     end
  269.     object DBMemo5: TDBMemo
  270.       Left = 64
  271.       Top = 456
  272.       Width = 177
  273.       Height = 57
  274.       DataField = 'USER3'
  275.       DataSource = DataSource
  276.       ScrollBars = ssBoth
  277.       TabOrder = 11
  278.     end
  279.     object DBMemo6: TDBMemo
  280.       Left = 64
  281.       Top = 520
  282.       Width = 177
  283.       Height = 57
  284.       DataField = 'USER4'
  285.       DataSource = DataSource
  286.       ScrollBars = ssBoth
  287.       TabOrder = 12
  288.     end
  289.     object DBEdit7: TDBEdit
  290.       Left = 64
  291.       Top = 40
  292.       Width = 177
  293.       Height = 21
  294.       DataField = 'LNAME'
  295.       DataSource = DataSource
  296.       TabOrder = 1
  297.     end
  298.   end
  299.   object ImportBtn: TBitBtn
  300.     Left = 200
  301.     Top = 8
  302.     Width = 25
  303.     Height = 25
  304.     Hint = 'Import'
  305.     TabOrder = 5
  306.     OnClick = ImportBtnClick
  307.     Glyph.Data = {
  308.       F6000000424DF600000000000000760000002800000010000000100000000100
  309.       04000000000080000000CE0E0000D80E00001000000000000000000000000000
  310.       80000080000000808000800000008000800080800000C0C0C000808080000000
  311.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  312.       77777777777777777777777777770777777777777770077777777777770E0777
  313.       7777777770EE0000000077770EEEEEEEEEE00000EEEEEEEEEEE00FFF0EEEEEEE
  314.       EEE00F8880EE000000000FFFFF0E077777770F888880077777770FFFFFFF0777
  315.       7777444444444777777744444444477777777777777777777777}
  316.   end
  317.   object ExportBtn: TBitBtn
  318.     Left = 225
  319.     Top = 8
  320.     Width = 25
  321.     Height = 25
  322.     Hint = 'Export'
  323.     TabOrder = 6
  324.     OnClick = ExportBtnClick
  325.     Glyph.Data = {
  326.       F6000000424DF600000000000000760000002800000010000000100000000100
  327.       04000000000080000000CE0E0000D80E00001000000000000000000000000000
  328.       80000080000000808000800000008000800080800000C0C0C000808080000000
  329.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  330.       777777777777777777777777777777077777777777777700777777777777770E
  331.       077777770000000EE07777770EEEEEEEEE0700000EEEEEEEEEE00FFF0EEEEEEE
  332.       EE070F880000000EE0770FFFFFFF070E07770F88888F070077770FFFFFFF0707
  333.       7777444444444777777744444444477777777777777777777777}
  334.   end
  335.   object DataSource: TDataSource
  336.     DataSet = DataSet
  337.     Left = 160
  338.     Top = 64
  339.   end
  340.   object ExportDialog: TSaveDialog
  341.     DefaultExt = 'txt'
  342.     Filter = 'Text Files|*.txt'
  343.     Options = [ofOverwritePrompt, ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
  344.     Left = 216
  345.     Top = 64
  346.   end
  347.   object DataSet: TBinaryDataSet
  348.     Left = 188
  349.     Top = 64
  350.     object DataSetFNAME: TStringField
  351.       FieldName = 'FNAME'
  352.       Size = 50
  353.     end
  354.     object DataSetLNAME: TStringField
  355.       FieldName = 'LNAME'
  356.       Size = 50
  357.     end
  358.     object DataSetCOMPANY: TStringField
  359.       FieldName = 'COMPANY'
  360.       Size = 50
  361.     end
  362.     object DataSetTITLE: TStringField
  363.       FieldName = 'TITLE'
  364.       Size = 50
  365.     end
  366.     object DataSetADDRESS: TStringField
  367.       FieldName = 'ADDRESS'
  368.       Size = 100
  369.     end
  370.     object DataSetRETADDRESS: TStringField
  371.       FieldName = 'RETADDRESS'
  372.       Size = 100
  373.     end
  374.     object DataSetPHONE: TStringField
  375.       FieldName = 'PHONE'
  376.     end
  377.     object DataSetFAX: TStringField
  378.       FieldName = 'FAX'
  379.     end
  380.     object DataSetEMAIL: TStringField
  381.       FieldName = 'EMAIL'
  382.       Size = 100
  383.     end
  384.     object DataSetUSER1: TStringField
  385.       FieldName = 'USER1'
  386.       Size = 100
  387.     end
  388.     object DataSetUSER2: TStringField
  389.       FieldName = 'USER2'
  390.       Size = 100
  391.     end
  392.     object DataSetUSER3: TStringField
  393.       FieldName = 'USER3'
  394.       Size = 100
  395.     end
  396.     object DataSetUSER4: TStringField
  397.       FieldName = 'USER4'
  398.       Size = 100
  399.     end
  400.   end
  401. end
  402.