ImapDemo1.dfm 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132
  1. object Form1: TForm1
  2. Left = 193
  3. Top = 114
  4. Width = 601
  5. Height = 382
  6. Caption = 'IMAP demo'
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'MS Sans Serif'
  12. Font.Style = []
  13. OldCreateOrder = False
  14. OnCreate = FormCreate
  15. OnDestroy = FormDestroy
  16. PixelsPerInch = 96
  17. TextHeight = 13
  18. object Label1: TLabel
  19. Left = 22
  20. Top = 8
  21. Width = 31
  22. Height = 13
  23. Caption = 'Server'
  24. end
  25. object Label2: TLabel
  26. Left = 22
  27. Top = 34
  28. Width = 48
  29. Height = 13
  30. Caption = 'Username'
  31. end
  32. object Label3: TLabel
  33. Left = 22
  34. Top = 60
  35. Width = 46
  36. Height = 13
  37. Caption = 'Password'
  38. end
  39. object Label4: TLabel
  40. Left = 10
  41. Top = 120
  42. Width = 100
  43. Height = 13
  44. Caption = 'Messages in mailbox:'
  45. end
  46. object Label5: TLabel
  47. Left = 12
  48. Top = 100
  49. Width = 349
  50. Height = 13
  51. Caption =
  52. 'Send emails to [email protected] to populate the in' +
  53. 'box.'
  54. end
  55. object Label6: TLabel
  56. Left = 390
  57. Top = 6
  58. Width = 189
  59. Height = 13
  60. Caption = 'Mailboxes (click one to view messages):'
  61. end
  62. object Label7: TLabel
  63. Left = 12
  64. Top = 84
  65. Width = 318
  66. Height = 13
  67. Caption =
  68. 'cyrus.andrew.cmu.edu is a publically-accessible Cyrus IMAP serve' +
  69. 'r.'
  70. end
  71. object Edit1: TEdit
  72. Left = 90
  73. Top = 2
  74. Width = 171
  75. Height = 21
  76. TabOrder = 0
  77. Text = 'cyrus.andrew.cmu.edu'
  78. end
  79. object Edit2: TEdit
  80. Left = 90
  81. Top = 28
  82. Width = 171
  83. Height = 21
  84. TabOrder = 1
  85. Text = 'anonymous'
  86. end
  87. object Edit3: TEdit
  88. Left = 90
  89. Top = 54
  90. Width = 171
  91. Height = 21
  92. TabOrder = 2
  93. Text = '[email protected]'
  94. end
  95. object Button1: TButton
  96. Left = 284
  97. Top = 2
  98. Width = 75
  99. Height = 25
  100. Caption = 'Connect'
  101. TabOrder = 3
  102. OnClick = Button1Click
  103. end
  104. object StringGrid1: TStringGrid
  105. Left = 6
  106. Top = 140
  107. Width = 579
  108. Height = 120
  109. ColCount = 4
  110. FixedCols = 0
  111. Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSelect]
  112. TabOrder = 4
  113. end
  114. object Button2: TButton
  115. Left = 250
  116. Top = 272
  117. Width = 95
  118. Height = 25
  119. Caption = 'Delete message'
  120. TabOrder = 5
  121. OnClick = Button2Click
  122. end
  123. object ListBox1: TListBox
  124. Left = 386
  125. Top = 26
  126. Width = 193
  127. Height = 89
  128. ItemHeight = 13
  129. TabOrder = 6
  130. OnClick = ListBox1Click
  131. end
  132. end