source: trunk/Forms/FormRecord.lfm

Last change on this file was 32, checked in by chronos, 6 months ago
  • Modified: Removed U prefix from units names.
  • Modified: Use TFormEx for all forms.
File size: 1.1 KB
Line 
1object FormRecord: TFormRecord
2 Left = 639
3 Height = 649
4 Top = 223
5 Width = 858
6 Caption = 'Record'
7 ClientHeight = 649
8 ClientWidth = 858
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 OnShow = FormShow
13 Position = poMainFormCenter
14 LCLVersion = '2.2.2.0'
15 object Panel1: TPanel
16 Left = 4
17 Height = 583
18 Top = 4
19 Width = 850
20 Align = alTop
21 Anchors = [akTop, akLeft, akRight, akBottom]
22 BorderSpacing.Around = 4
23 BevelOuter = bvNone
24 TabOrder = 0
25 end
26 object ButtonOk: TButton
27 Left = 759
28 Height = 25
29 Top = 603
30 Width = 75
31 Anchors = [akRight, akBottom]
32 Caption = 'Ok'
33 ModalResult = 1
34 TabOrder = 1
35 end
36 object ButtonCancel: TButton
37 Left = 648
38 Height = 27
39 Top = 603
40 Width = 72
41 Anchors = [akRight, akBottom]
42 Caption = 'Cancel'
43 ModalResult = 2
44 TabOrder = 2
45 end
46 object ActionList1: TActionList
47 Images = Core.ImageList1
48 Left = 423
49 Top = 379
50 object ASave: TAction
51 Caption = 'Save'
52 OnExecute = ASaveExecute
53 end
54 object ACancel: TAction
55 Caption = 'Cancel'
56 OnExecute = ACancelExecute
57 end
58 end
59end
Note: See TracBrowser for help on using the repository browser.