LogSettings.dfm 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151
  1. object LoggingFrame: TLoggingFrame
  2. Left = 0
  3. Top = 0
  4. Width = 314
  5. Height = 233
  6. TabOrder = 0
  7. DesignSize = (
  8. 314
  9. 233)
  10. object LoggingCheck: TCheckBox
  11. Left = 14
  12. Top = 8
  13. Width = 203
  14. Height = 17
  15. Caption = '&Enable logging'
  16. TabOrder = 0
  17. OnClick = DataChange
  18. end
  19. object LoggingGroup: TXPGroupBox
  20. Left = 3
  21. Top = 32
  22. Width = 309
  23. Height = 198
  24. Anchors = [akLeft, akTop, akRight]
  25. Caption = 'Logging options'
  26. TabOrder = 1
  27. DesignSize = (
  28. 309
  29. 198)
  30. object LogWindowLinesText: TLabel
  31. Left = 256
  32. Top = 166
  33. Width = 21
  34. Height = 13
  35. Caption = 'lines'
  36. end
  37. object LogProtocolLabel: TLabel
  38. Left = 16
  39. Top = 21
  40. Width = 63
  41. Height = 13
  42. Caption = 'Logging &level'
  43. FocusControl = LogProtocolCombo
  44. end
  45. object LogToFileCheck: TCheckBox
  46. Left = 16
  47. Top = 45
  48. Width = 193
  49. Height = 17
  50. Caption = 'Log to &file:'
  51. TabOrder = 1
  52. OnClick = LogToFileCheckChange
  53. end
  54. object LogFileNameEdit: TFilenameEdit
  55. Left = 40
  56. Top = 68
  57. Width = 255
  58. Height = 21
  59. AcceptFiles = True
  60. DefaultExt = 'log'
  61. Filter = 'Log files (*.log)|*.log|All files (*.*)|*.*'
  62. DialogOptions = [ofHideReadOnly, ofPathMustExist]
  63. DialogTitle = 'Select file for session log.'
  64. ClickKey = 16397
  65. Anchors = [akLeft, akTop, akRight]
  66. TabOrder = 2
  67. Text = 'LogFileNameEdit'
  68. OnChange = DataChange
  69. end
  70. object LogShowWindowCheck: TCheckBox
  71. Left = 16
  72. Top = 121
  73. Width = 129
  74. Height = 17
  75. Caption = 'Show log &window:'
  76. TabOrder = 4
  77. OnClick = DataChange
  78. end
  79. object LogWindowCompleteButton: TRadioButton
  80. Left = 40
  81. Top = 142
  82. Width = 233
  83. Height = 17
  84. Caption = 'Display &complete session'
  85. TabOrder = 5
  86. OnClick = DataChange
  87. end
  88. object LogWindowLinesButton: TRadioButton
  89. Left = 40
  90. Top = 166
  91. Width = 136
  92. Height = 17
  93. Caption = 'Display only &last '
  94. TabOrder = 6
  95. OnClick = DataChange
  96. end
  97. object LogWindowLinesEdit: TUpDownEdit
  98. Left = 176
  99. Top = 162
  100. Width = 73
  101. Height = 21
  102. Alignment = taRightJustify
  103. Increment = 50
  104. MaxValue = 10000
  105. MinValue = 50
  106. TabOrder = 7
  107. OnChange = DataChange
  108. end
  109. object LogFilePanel: TPanel
  110. Left = 40
  111. Top = 93
  112. Width = 255
  113. Height = 25
  114. Anchors = [akLeft, akTop, akRight]
  115. BevelOuter = bvNone
  116. TabOrder = 3
  117. object LogFileAppendButton: TRadioButton
  118. Left = 0
  119. Top = 4
  120. Width = 129
  121. Height = 17
  122. Caption = '&Append'
  123. TabOrder = 0
  124. OnClick = DataChange
  125. end
  126. object LogFileOverwriteButton: TRadioButton
  127. Left = 136
  128. Top = 4
  129. Width = 113
  130. Height = 17
  131. Caption = '&Overwrite'
  132. TabOrder = 1
  133. OnClick = DataChange
  134. end
  135. end
  136. object LogProtocolCombo: TComboBox
  137. Left = 112
  138. Top = 17
  139. Width = 113
  140. Height = 21
  141. Style = csDropDownList
  142. Anchors = [akLeft, akTop, akRight]
  143. ItemHeight = 13
  144. TabOrder = 0
  145. Items.Strings = (
  146. 'Normal'
  147. 'Debug 1'
  148. 'Debug 2')
  149. end
  150. end
  151. end