Subversion Repositories recyclebinunit

Rev

Rev 17 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
12 daniel-mar 1 
object MainForm: TMainForm
2 
  Left = 224
3 
  Top = 149
4 
  Caption = 'Recycle Bin Example'
24 daniel-mar 5 
  ClientHeight = 459
6 
  ClientWidth = 636
12 daniel-mar 7 
  Color = clBtnFace
8 
  Constraints.MinHeight = 495
9 
  Constraints.MinWidth = 652
10 
  Font.Charset = DEFAULT_CHARSET
11 
  Font.Color = clWindowText
12 
  Font.Height = -11
13 
  Font.Name = 'MS Sans Serif'
14 
  Font.Style = []
15 
  OldCreateOrder = False
16 
  Position = poScreenCenter
17 
  PixelsPerInch = 96
18 
  TextHeight = 13
19 
  object topPanel: TPanel
20 
    Left = 0
21 
    Top = 0
24 daniel-mar 22 
    Width = 636
12 daniel-mar 23 
    Height = 81
24 
    Align = alTop
25 
    Font.Charset = DEFAULT_CHARSET
26 
    Font.Color = clWindowText
27 
    Font.Height = -12
28 
    Font.Name = 'MS Sans Serif'
29 
    Font.Style = []
30 
    ParentFont = False
31 
    TabOrder = 0
32 
    object rightPanel: TPanel
24 daniel-mar 33 
      Left = 404
12 daniel-mar 34 
      Top = 1
35 
      Width = 231
36 
      Height = 79
37 
      Align = alRight
38 
      BevelOuter = bvNone
39 
      Font.Charset = DEFAULT_CHARSET
40 
      Font.Color = clWindowText
41 
      Font.Height = -12
42 
      Font.Name = 'MS Sans Serif'
43 
      Font.Style = []
44 
      ParentFont = False
45 
      TabOrder = 0
46 
      object btnReadOwnRecyclers: TButton
47 
        Left = 8
48 
        Top = 8
49 
        Width = 217
50 
        Height = 25
51 
        Caption = 'Read own recyclers'
52 
        Font.Charset = DEFAULT_CHARSET
53 
        Font.Color = clWindowText
54 
        Font.Height = -12
55 
        Font.Name = 'MS Sans Serif'
56 
        Font.Style = []
57 
        ParentFont = False
58 
        TabOrder = 0
59 
        OnClick = btn_readown_click
60 
      end
61 
      object btnShowConfig: TButton
62 
        Left = 8
63 
        Top = 40
64 
        Width = 217
65 
        Height = 25
66 
        Caption = 'Show configuration'
67 
        TabOrder = 1
68 
        OnClick = btnShowConfigClick
69 
      end
70 
    end
71 
    object leftPanel: TPanel
72 
      Left = 1
73 
      Top = 1
74 
      Width = 232
75 
      Height = 79
76 
      Align = alLeft
77 
      BevelOuter = bvNone
78 
      TabOrder = 1
79 
      object btnReadRecyclerFile: TButton
80 
        Left = 8
81 
        Top = 8
82 
        Width = 217
83 
        Height = 25
84 
        Caption = 'Read recycler file (INFO, INFO2 or $I......)'
85 
        Font.Charset = DEFAULT_CHARSET
86 
        Font.Color = clWindowText
87 
        Font.Height = -12
88 
        Font.Name = 'MS Sans Serif'
89 
        Font.Style = []
90 
        ParentFont = False
91 
        TabOrder = 0
92 
        OnClick = btn_read_click
93 
      end
94 
      object btnSaveTextDump: TButton
95 
        Left = 8
96 
        Top = 40
97 
        Width = 217
98 
        Height = 25
99 
        Caption = 'Save Text Dump'
100 
        Font.Charset = DEFAULT_CHARSET
101 
        Font.Color = clWindowText
102 
        Font.Height = -12
103 
        Font.Name = 'MS Sans Serif'
104 
        Font.Style = []
105 
        ParentFont = False
106 
        TabOrder = 1
107 
        OnClick = btnSaveTextDumpClick
108 
      end
109 
    end
110 
  end
111 
  object outputPanel: TPanel
112 
    Left = 0
113 
    Top = 81
24 daniel-mar 114 
    Width = 636
115 
    Height = 378
12 daniel-mar 116 
    Align = alClient
117 
    Caption = 'Please wait...'
118 
    Font.Charset = DEFAULT_CHARSET
119 
    Font.Color = clWindowText
120 
    Font.Height = -49
121 
    Font.Name = 'Tahoma'
122 
    Font.Style = []
123 
    ParentFont = False
124 
    TabOrder = 1
125 
    object outputMemo: TMemo
126 
      Left = 1
127 
      Top = 1
24 daniel-mar 128 
      Width = 634
129 
      Height = 376
12 daniel-mar 130 
      Align = alClient
131 
      Font.Charset = DEFAULT_CHARSET
132 
      Font.Color = clWindowText
133 
      Font.Height = -12
134 
      Font.Name = 'Courier'
135 
      Font.Style = []
136 
      ParentFont = False
137 
      ReadOnly = True
138 
      ScrollBars = ssBoth
139 
      TabOrder = 0
140 
    end
141 
  end
142 
  object openDialog: TOpenDialog
143 
    Title = 'Select recycler file'
144 
    Left = 592
145 
    Top = 416
146 
  end
147 
  object saveDialog: TSaveDialog
148 
    DefaultExt = '.txt'
149 
    Filter = 'Text files (*.txt)|*.txt|All files (*.*)|*.*'
150 
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
151 
    Left = 560
152 
    Top = 416
153 
  end
154 
end