CodingFrom.dfm 1.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768
  1. object CodingLoggerForm: TCodingLoggerForm
  2. Left = 0
  3. Top = 0
  4. Caption = 'CodingLoggerForm'
  5. ClientHeight = 376
  6. ClientWidth = 709
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'Tahoma'
  12. Font.Style = []
  13. Padding.Top = 30
  14. OldCreateOrder = False
  15. Position = poScreenCenter
  16. Visible = True
  17. PixelsPerInch = 96
  18. TextHeight = 13
  19. object lv1: TListView
  20. Left = 0
  21. Top = 30
  22. Width = 709
  23. Height = 346
  24. Align = alClient
  25. Columns = <
  26. item
  27. AutoSize = True
  28. Caption = #20869#23481
  29. end
  30. item
  31. Caption = #26469#28304
  32. Width = 140
  33. end
  34. item
  35. Alignment = taCenter
  36. Caption = #29992#25143
  37. Width = 150
  38. end
  39. item
  40. Alignment = taCenter
  41. Caption = #32423#21035
  42. end>
  43. GridLines = True
  44. RowSelect = True
  45. ShowWorkAreas = True
  46. TabOrder = 0
  47. ViewStyle = vsReport
  48. OnAdvancedCustomDrawItem = lv1AdvancedCustomDrawItem
  49. ExplicitTop = 0
  50. ExplicitHeight = 376
  51. end
  52. object btn1: TButton
  53. Left = 3
  54. Top = 4
  55. Width = 75
  56. Height = 25
  57. Caption = #20445#23384#26085#24535
  58. TabOrder = 1
  59. OnClick = btn1Click
  60. end
  61. object dlg1: TSaveTextFileDialog
  62. DefaultExt = 'txt'
  63. FileName = 'log'
  64. Left = 184
  65. Top = 40
  66. end
  67. end