home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 March / Chip_2002-03_cd1.bin / tema / thebat / download / update / thebat.exe / 0 / RCDATA / TADDRESSSELECTOR / TADDRESSSELECTOR.txt
Text File  |  2001-09-09  |  11KB  |  489 lines

  1. object AddressSelector: TAddressSelector
  2.   Left = 219
  3.   Top = 121
  4.   BorderIcons = [biSystemMenu, biMaximize]
  5.   AutoScroll = False
  6.   Caption = 'Pick e-mail addresses'
  7.   ClientHeight = 336
  8.   ClientWidth = 492
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   OnClose = FormClose
  15.   OnCloseQuery = FormCloseQuery
  16.   OnCreate = FormCreate
  17.   OnDestroy = FormDestroy
  18.   OnShow = FormShow
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object pnClient: TPanel
  22.     Left = 0
  23.     Top = 0
  24.     Width = 492
  25.     Height = 295
  26.     Align = alClient
  27.     TabOrder = 0
  28.     object pnSeparator: TSplitter
  29.       Left = 250
  30.       Top = 1
  31.       Width = 3
  32.       Height = 293
  33.       Cursor = crHSplit
  34.       MinSize = 150
  35.     end
  36.     object pnBook: TPanel
  37.       Left = 1
  38.       Top = 1
  39.       Width = 249
  40.       Height = 293
  41.       Align = alLeft
  42.       BevelOuter = bvNone
  43.       TabOrder = 0
  44.       object pnButtons: TPanel
  45.         Left = 222
  46.         Top = 32
  47.         Width = 27
  48.         Height = 261
  49.         Align = alRight
  50.         BevelOuter = bvNone
  51.         TabOrder = 2
  52.         object bAdd: TButton
  53.           Left = 1
  54.           Top = 17
  55.           Width = 24
  56.           Height = 24
  57.           Caption = '>'
  58.           TabOrder = 1
  59.           OnClick = bAddClick
  60.         end
  61.         object bDel: TButton
  62.           Left = 2
  63.           Top = 97
  64.           Width = 24
  65.           Height = 24
  66.           Caption = '<'
  67.           TabOrder = 2
  68.           OnClick = bDelClick
  69.         end
  70.         object bDelAll: TButton
  71.           Left = 2
  72.           Top = 129
  73.           Width = 24
  74.           Height = 24
  75.           Caption = '<<'
  76.           TabOrder = 3
  77.           OnClick = bDelAllClick
  78.         end
  79.         object bDel_All: TButton
  80.           Left = 2
  81.           Top = 161
  82.           Width = 24
  83.           Height = 24
  84.           Caption = '<<<'
  85.           TabOrder = 4
  86.           OnClick = bDel_AllClick
  87.         end
  88.         object bMenu: TButton
  89.           Left = 2
  90.           Top = 198
  91.           Width = 24
  92.           Height = 24
  93.           Caption = '&?'
  94.           TabOrder = 0
  95.           OnClick = bMenuClick
  96.         end
  97.         object bAddAll: TButton
  98.           Left = 1
  99.           Top = 48
  100.           Width = 24
  101.           Height = 24
  102.           Caption = '>>'
  103.           TabOrder = 5
  104.           OnClick = bAddAllClick
  105.         end
  106.       end
  107.       object pnTop: TPanel
  108.         Left = 0
  109.         Top = 0
  110.         Width = 249
  111.         Height = 32
  112.         Align = alTop
  113.         BevelOuter = bvNone
  114.         TabOrder = 0
  115.         OnResize = pnTopResize
  116.         object cbBook: TComboBox
  117.           Left = 2
  118.           Top = 3
  119.           Width = 241
  120.           Height = 26
  121.           Style = csOwnerDrawFixed
  122.           ItemHeight = 20
  123.           TabOrder = 0
  124.           OnChange = cbBookChange
  125.           OnDrawItem = cbBookDrawItem
  126.         end
  127.       end
  128.       object pnAddr: TPanel
  129.         Left = 0
  130.         Top = 32
  131.         Width = 222
  132.         Height = 261
  133.         Align = alClient
  134.         BevelOuter = bvNone
  135.         BorderWidth = 2
  136.         TabOrder = 1
  137.         object gAddr: TAddressBookGrid
  138.           Left = 2
  139.           Top = 19
  140.           Width = 218
  141.           Height = 203
  142.           Align = alClient
  143.           DefaultRowHeight = 18
  144.           DefaultDrawing = False
  145.           FixedRows = 0
  146.           Options = [goThumbTracking]
  147.           PopupMenu = GridPopup
  148.           TabOrder = 0
  149.           OnDblClick = gAddrDblClick
  150.           OnKeyPress = gAddrKeyPress
  151.           OnMouseDown = gAddrMouseDown
  152.           Header = hBook
  153.           ReadOnly = True
  154.           RowHeights = (
  155.             18
  156.             18
  157.             18
  158.             18
  159.             18)
  160.         end
  161.         object hBook: THeaderControl
  162.           Left = 2
  163.           Top = 2
  164.           Width = 218
  165.           Height = 17
  166.           Hint = 'nograb'
  167.           Sections = <
  168.             item
  169.               AllowClick = False
  170.               MaxWidth = 20
  171.               MinWidth = 20
  172.               Width = 20
  173.             end
  174.             item
  175.               Text = 'Name'
  176.               Width = 150
  177.             end>
  178.           OnSectionResize = hBookSectionResize
  179.         end
  180.         object pnSearch: TPanel
  181.           Left = 2
  182.           Top = 222
  183.           Width = 218
  184.           Height = 37
  185.           Align = alBottom
  186.           BevelOuter = bvNone
  187.           TabOrder = 2
  188.           OnResize = pnSearchResize
  189.           object lSearch: TLabel
  190.             Left = 8
  191.             Top = 12
  192.             Width = 66
  193.             Height = 13
  194.             Caption = '&Quick search:'
  195.             FocusControl = eSearch
  196.           end
  197.           object eSearch: TEdit
  198.             Left = 80
  199.             Top = 8
  200.             Width = 129
  201.             Height = 21
  202.             PopupMenu = pmSearch
  203.             TabOrder = 0
  204.             OnChange = eSearchChange
  205.           end
  206.         end
  207.       end
  208.     end
  209.     object xPages: TPageControl
  210.       Left = 253
  211.       Top = 1
  212.       Width = 238
  213.       Height = 293
  214.       ActivePage = tsTo
  215.       Align = alClient
  216.       TabOrder = 1
  217.       OnChange = xPagesChange
  218.       OnDragDrop = xPagesDragDrop
  219.       OnDragOver = xPagesDragOver
  220.       object tsTo: TTabSheet
  221.         Caption = 'TO'
  222.         OnDragOver = xPagesDragOver
  223.         object l_To: TListBox
  224.           Left = 0
  225.           Top = 0
  226.           Width = 230
  227.           Height = 265
  228.           Align = alClient
  229.           DragMode = dmAutomatic
  230.           ItemHeight = 13
  231.           MultiSelect = True
  232.           Sorted = True
  233.           TabOrder = 0
  234.           OnDragDrop = l_ToDragDrop
  235.           OnDragOver = l_ToDragOver
  236.           OnKeyDown = l_BCCKeyDown
  237.         end
  238.       end
  239.       object tsCC: TTabSheet
  240.         Tag = 1
  241.         Caption = 'CC'
  242.         OnDragOver = xPagesDragOver
  243.         object l_CC: TListBox
  244.           Left = 0
  245.           Top = 0
  246.           Width = 230
  247.           Height = 265
  248.           Align = alClient
  249.           DragMode = dmAutomatic
  250.           ItemHeight = 13
  251.           MultiSelect = True
  252.           Sorted = True
  253.           TabOrder = 0
  254.           OnDragDrop = l_ToDragDrop
  255.           OnDragOver = l_ToDragOver
  256.           OnKeyDown = l_BCCKeyDown
  257.         end
  258.       end
  259.       object tsBCC: TTabSheet
  260.         Caption = 'BCC'
  261.         OnDragOver = xPagesDragOver
  262.         object l_BCC: TListBox
  263.           Left = 0
  264.           Top = 0
  265.           Width = 230
  266.           Height = 265
  267.           Align = alClient
  268.           DragMode = dmAutomatic
  269.           ItemHeight = 13
  270.           MultiSelect = True
  271.           Sorted = True
  272.           TabOrder = 0
  273.           OnDragDrop = l_ToDragDrop
  274.           OnDragOver = l_ToDragOver
  275.           OnKeyDown = l_BCCKeyDown
  276.         end
  277.       end
  278.     end
  279.   end
  280.   object pnBottom: TPanel
  281.     Left = 0
  282.     Top = 295
  283.     Width = 492
  284.     Height = 41
  285.     Align = alBottom
  286.     BevelOuter = bvNone
  287.     TabOrder = 1
  288.     object cbAddAll: TCheckBox
  289.       Left = 7
  290.       Top = 13
  291.       Width = 306
  292.       Height = 17
  293.       Caption = '&Add secondary addresses to BCC'
  294.       TabOrder = 0
  295.     end
  296.     object pnBottomBtn: TPanel
  297.       Left = 312
  298.       Top = 0
  299.       Width = 180
  300.       Height = 41
  301.       Align = alRight
  302.       BevelOuter = bvNone
  303.       TabOrder = 1
  304.       object bOK: TButton
  305.         Left = 3
  306.         Top = 7
  307.         Width = 76
  308.         Height = 25
  309.         Caption = '&OK'
  310.         Default = True
  311.         ModalResult = 1
  312.         TabOrder = 0
  313.         OnClick = bOKClick
  314.       end
  315.       object bCancel: TButton
  316.         Left = 88
  317.         Top = 7
  318.         Width = 75
  319.         Height = 25
  320.         Cancel = True
  321.         Caption = 'Cancel'
  322.         ModalResult = 2
  323.         TabOrder = 1
  324.       end
  325.     end
  326.   end
  327.   object pmSearch: TPopupMenu
  328.     Left = 116
  329.     Top = 193
  330.     object msFilter: TMenuItem
  331.       Caption = '&Filter'
  332.       Default = True
  333.       ShortCut = 13
  334.       OnClick = msFilterClick
  335.     end
  336.     object msFilterColumn: TMenuItem
  337.       Caption = 'Filter &Column'
  338.       ShortCut = 8205
  339.       OnClick = msFilterColumnClick
  340.     end
  341.     object msFindNext: TMenuItem
  342.       Caption = 'Find &Next'
  343.       ShortCut = 16397
  344.       OnClick = msFindNextClick
  345.     end
  346.     object msFindPrev: TMenuItem
  347.       Tag = 1
  348.       Caption = 'Find &Previous'
  349.       ShortCut = 24589
  350.       OnClick = msFindNextClick
  351.     end
  352.     object N11: TMenuItem
  353.       Caption = '-'
  354.       ShortCut = 0
  355.     end
  356.     object msUndo: TMenuItem
  357.       Caption = '&Undo'
  358.       ShortCut = 0
  359.       OnClick = msUndoClick
  360.     end
  361.     object N13: TMenuItem
  362.       Caption = '-'
  363.       ShortCut = 0
  364.     end
  365.     object msCut: TMenuItem
  366.       Caption = 'C&ut'
  367.       ShortCut = 16472
  368.       OnClick = msCutClick
  369.     end
  370.     object msCopy: TMenuItem
  371.       Caption = 'C&opy'
  372.       ShortCut = 16451
  373.       OnClick = msCopyClick
  374.     end
  375.     object msPaste: TMenuItem
  376.       Caption = '&Paste'
  377.       ShortCut = 16470
  378.       OnClick = msPasteClick
  379.     end
  380.     object N12: TMenuItem
  381.       Caption = '-'
  382.       ShortCut = 0
  383.     end
  384.     object msSelectAll: TMenuItem
  385.       Caption = 'Select all'
  386.       ShortCut = 16449
  387.       OnClick = msSelectAllClick
  388.     end
  389.     object qsAdd: TMenuItem
  390.       Caption = 'Add'
  391.       ShortCut = 32817
  392.       Visible = False
  393.       OnClick = bAddClick
  394.     end
  395.     object qsAddAll: TMenuItem
  396.       Caption = 'Add All'
  397.       ShortCut = 32818
  398.       Visible = False
  399.       OnClick = mgAddAllClick
  400.     end
  401.     object qsRemove: TMenuItem
  402.       Caption = 'Remove'
  403.       ShortCut = 32819
  404.       Visible = False
  405.       OnClick = bDelClick
  406.     end
  407.     object qsRemoveAll: TMenuItem
  408.       Caption = 'Remove All'
  409.       ShortCut = 32820
  410.       Visible = False
  411.       OnClick = bDelAllClick
  412.     end
  413.     object qsRemoveTOCCBCC: TMenuItem
  414.       Caption = 'Remove TO/CC/BCC'
  415.       ShortCut = 32821
  416.       Visible = False
  417.       OnClick = bDel_AllClick
  418.     end
  419.   end
  420.   object LDAP1: TLDAPClient
  421.     AutoBind = True
  422.     SearchDerefAliases = ldaNever
  423.     SearchScope = lssWholeSubtree
  424.     SearchSizeLimit = 0
  425.     SearchTimeLimit = 0
  426.     Port = 389
  427.     Authentication = laNone
  428.     OnConnectFail = LDAP1ConnectFail
  429.     OnBind = LDAP1Bind
  430.     OnBindFail = LDAP1BindFail
  431.     OnFound = LDAP1Found
  432.     OnSearchDone = LDAP1SearchDone
  433.     Left = 177
  434.     Top = 113
  435.   end
  436.   object tmSearch: TTimer
  437.     Enabled = False
  438.     Interval = 200
  439.     OnTimer = tmSearchTimer
  440.     Left = 57
  441.     Top = 105
  442.   end
  443.   object tmLdapSearch: TTimer
  444.     Enabled = False
  445.     Interval = 2000
  446.     OnTimer = tmLdapSearchTimer
  447.     Left = 113
  448.     Top = 137
  449.   end
  450.   object GridPopup: TPopupMenu
  451.     Left = 73
  452.     Top = 193
  453.     object mgAdd: TMenuItem
  454.       Caption = 'Add'
  455.       ShortCut = 32817
  456.       OnClick = bAddClick
  457.     end
  458.     object mgAddAll: TMenuItem
  459.       Caption = 'Add All'
  460.       ShortCut = 32818
  461.       OnClick = mgAddAllClick
  462.     end
  463.     object mgRemove: TMenuItem
  464.       Caption = 'Remove'
  465.       ShortCut = 32819
  466.       OnClick = bDelClick
  467.     end
  468.     object mgRemoveAll: TMenuItem
  469.       Caption = 'Remove All'
  470.       ShortCut = 32820
  471.       OnClick = bDelAllClick
  472.     end
  473.     object mgRemoveTOCCBCC: TMenuItem
  474.       Caption = 'Remove TO/CC/BCC'
  475.       ShortCut = 32821
  476.       OnClick = bDel_AllClick
  477.     end
  478.     object N1: TMenuItem
  479.       Caption = '-'
  480.       ShortCut = 0
  481.     end
  482.     object mgSelectAll: TMenuItem
  483.       Caption = 'Select All'
  484.       ShortCut = 16449
  485.       OnClick = mgSelectAllClick
  486.     end
  487.   end
  488. end
  489.