Last change
on this file was 103, checked in by chronos, 3 years ago |
- Added: Support for profile photo as URL.
- Added: New UContactImage form to show profile photo in bigger size and with URL.
- Modified: Profile photo image load/save handling moved to separate unit UContactImage.
- Fixed: Some dynamically created forms were not translated.
- Added: Remember last used file name for image open/save dialog.
|
File size:
1.9 KB
|
Line | |
---|
1 | object FormProperty: TFormProperty
|
---|
2 | Left = 760
|
---|
3 | Height = 435
|
---|
4 | Top = 576
|
---|
5 | Width = 756
|
---|
6 | Caption = 'Field'
|
---|
7 | ClientHeight = 435
|
---|
8 | ClientWidth = 756
|
---|
9 | DesignTimePPI = 150
|
---|
10 | OnClose = FormClose
|
---|
11 | OnCreate = FormCreate
|
---|
12 | OnShow = FormShow
|
---|
13 | LCLVersion = '2.2.0.4'
|
---|
14 | object ButtonOk: TButton
|
---|
15 | Left = 479
|
---|
16 | Height = 39
|
---|
17 | Top = 379
|
---|
18 | Width = 124
|
---|
19 | Anchors = [akRight, akBottom]
|
---|
20 | Caption = 'OK'
|
---|
21 | ModalResult = 1
|
---|
22 | OnClick = ButtonOkClick
|
---|
23 | ParentFont = False
|
---|
24 | TabOrder = 4
|
---|
25 | end
|
---|
26 | object ButtonCancel: TButton
|
---|
27 | Left = 620
|
---|
28 | Height = 39
|
---|
29 | Top = 379
|
---|
30 | Width = 120
|
---|
31 | Anchors = [akRight, akBottom]
|
---|
32 | Caption = 'Cancel'
|
---|
33 | ModalResult = 2
|
---|
34 | ParentFont = False
|
---|
35 | TabOrder = 5
|
---|
36 | end
|
---|
37 | object Label1: TLabel
|
---|
38 | Left = 25
|
---|
39 | Height = 27
|
---|
40 | Top = 83
|
---|
41 | Width = 59
|
---|
42 | Caption = 'Name:'
|
---|
43 | end
|
---|
44 | object EditName: TEdit
|
---|
45 | Left = 175
|
---|
46 | Height = 43
|
---|
47 | Top = 75
|
---|
48 | Width = 554
|
---|
49 | Anchors = [akTop, akLeft, akRight]
|
---|
50 | OnChange = EditNameChange
|
---|
51 | TabOrder = 1
|
---|
52 | end
|
---|
53 | object Label2: TLabel
|
---|
54 | Left = 25
|
---|
55 | Height = 27
|
---|
56 | Top = 133
|
---|
57 | Width = 95
|
---|
58 | Caption = 'Attributes:'
|
---|
59 | end
|
---|
60 | object EditAttributes: TEdit
|
---|
61 | Left = 175
|
---|
62 | Height = 43
|
---|
63 | Top = 129
|
---|
64 | Width = 554
|
---|
65 | Anchors = [akTop, akLeft, akRight]
|
---|
66 | OnChange = EditAttributesChange
|
---|
67 | TabOrder = 2
|
---|
68 | end
|
---|
69 | object Label3: TLabel
|
---|
70 | Left = 25
|
---|
71 | Height = 27
|
---|
72 | Top = 188
|
---|
73 | Width = 64
|
---|
74 | Caption = 'Values:'
|
---|
75 | end
|
---|
76 | object EditValues: TEdit
|
---|
77 | Left = 175
|
---|
78 | Height = 43
|
---|
79 | Top = 179
|
---|
80 | Width = 554
|
---|
81 | Anchors = [akTop, akLeft, akRight]
|
---|
82 | TabOrder = 3
|
---|
83 | end
|
---|
84 | object Label4: TLabel
|
---|
85 | Left = 25
|
---|
86 | Height = 27
|
---|
87 | Top = 33
|
---|
88 | Width = 48
|
---|
89 | Caption = 'Field:'
|
---|
90 | end
|
---|
91 | object ComboBoxField: TComboBox
|
---|
92 | Left = 175
|
---|
93 | Height = 42
|
---|
94 | Top = 25
|
---|
95 | Width = 554
|
---|
96 | Anchors = [akTop, akLeft, akRight]
|
---|
97 | ItemHeight = 0
|
---|
98 | OnChange = ComboBoxFieldChange
|
---|
99 | Style = csDropDownList
|
---|
100 | TabOrder = 0
|
---|
101 | end
|
---|
102 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.