Last change
on this file was 11, checked in by chronos, 9 years ago |
- Added: Log form to show history of object. Implemented for Subversion partialy.
|
File size:
2.0 KB
|
Line | |
---|
1 | object FormLog: TFormLog
|
---|
2 | Left = 593
|
---|
3 | Height = 649
|
---|
4 | Top = 106
|
---|
5 | Width = 1037
|
---|
6 | Caption = 'Log messages'
|
---|
7 | ClientHeight = 649
|
---|
8 | ClientWidth = 1037
|
---|
9 | OnCreate = FormCreate
|
---|
10 | OnDestroy = FormDestroy
|
---|
11 | OnShow = FormShow
|
---|
12 | LCLVersion = '1.5'
|
---|
13 | object ListViewItems: TListView
|
---|
14 | Left = 8
|
---|
15 | Height = 192
|
---|
16 | Top = 8
|
---|
17 | Width = 1021
|
---|
18 | Align = alTop
|
---|
19 | BorderSpacing.Around = 8
|
---|
20 | Columns = <
|
---|
21 | item
|
---|
22 | Caption = 'Revision'
|
---|
23 | Width = 100
|
---|
24 | end
|
---|
25 | item
|
---|
26 | Caption = 'Actions'
|
---|
27 | Width = 100
|
---|
28 | end
|
---|
29 | item
|
---|
30 | Caption = 'Author'
|
---|
31 | Width = 100
|
---|
32 | end
|
---|
33 | item
|
---|
34 | Caption = 'Date'
|
---|
35 | Width = 150
|
---|
36 | end
|
---|
37 | item
|
---|
38 | Caption = 'Messages'
|
---|
39 | Width = 554
|
---|
40 | end>
|
---|
41 | OwnerData = True
|
---|
42 | ReadOnly = True
|
---|
43 | RowSelect = True
|
---|
44 | TabOrder = 0
|
---|
45 | ViewStyle = vsReport
|
---|
46 | OnData = ListViewItemsData
|
---|
47 | OnSelectItem = ListViewItemsSelectItem
|
---|
48 | end
|
---|
49 | object MemoMessages: TMemo
|
---|
50 | Left = 8
|
---|
51 | Height = 152
|
---|
52 | Top = 221
|
---|
53 | Width = 1021
|
---|
54 | Align = alTop
|
---|
55 | BorderSpacing.Around = 8
|
---|
56 | TabOrder = 1
|
---|
57 | end
|
---|
58 | object ListViewFiles: TListView
|
---|
59 | Left = 8
|
---|
60 | Height = 192
|
---|
61 | Top = 394
|
---|
62 | Width = 1021
|
---|
63 | Align = alTop
|
---|
64 | BorderSpacing.Around = 8
|
---|
65 | Columns = <
|
---|
66 | item
|
---|
67 | Caption = 'Path'
|
---|
68 | Width = 300
|
---|
69 | end
|
---|
70 | item
|
---|
71 | Caption = 'Actions'
|
---|
72 | Width = 704
|
---|
73 | end>
|
---|
74 | OwnerData = True
|
---|
75 | ReadOnly = True
|
---|
76 | RowSelect = True
|
---|
77 | TabOrder = 2
|
---|
78 | ViewStyle = vsReport
|
---|
79 | OnData = ListViewFilesData
|
---|
80 | end
|
---|
81 | object Splitter1: TSplitter
|
---|
82 | Cursor = crVSplit
|
---|
83 | Left = 0
|
---|
84 | Height = 5
|
---|
85 | Top = 381
|
---|
86 | Width = 1037
|
---|
87 | Align = alTop
|
---|
88 | ResizeAnchor = akTop
|
---|
89 | end
|
---|
90 | object Splitter2: TSplitter
|
---|
91 | Cursor = crVSplit
|
---|
92 | Left = 0
|
---|
93 | Height = 5
|
---|
94 | Top = 208
|
---|
95 | Width = 1037
|
---|
96 | Align = alTop
|
---|
97 | ResizeAnchor = akTop
|
---|
98 | end
|
---|
99 | object Button1: TButton
|
---|
100 | Left = 928
|
---|
101 | Height = 25
|
---|
102 | Top = 613
|
---|
103 | Width = 75
|
---|
104 | Anchors = [akRight, akBottom]
|
---|
105 | Caption = 'Ok'
|
---|
106 | ModalResult = 1
|
---|
107 | TabOrder = 5
|
---|
108 | end
|
---|
109 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.