Changeset 128 for trunk/Forms/UFormContacts.lfm
- Timestamp:
- Apr 8, 2022, 9:43:55 PM (2 years ago)
- File:
-
- 1 edited
-
trunk/Forms/UFormContacts.lfm (modified) (9 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormContacts.lfm
r95 r128 1 1 object FormContacts: TFormContacts 2 2 Left = 400 3 Height = 9 463 Height = 908 4 4 Top = 212 5 Width = 12 605 Width = 1210 6 6 Caption = 'Contacts' 7 ClientHeight = 9 468 ClientWidth = 12 609 DesignTimePPI = 1 507 ClientHeight = 908 8 ClientWidth = 1210 9 DesignTimePPI = 144 10 10 OnClose = FormClose 11 11 OnCreate = FormCreate … … 16 16 object ListView1: TListView 17 17 Left = 0 18 Height = 8 4418 Height = 810 19 19 Top = 0 20 Width = 12 6020 Width = 1210 21 21 Align = alClient 22 22 Columns = < 23 23 item 24 24 Caption = 'Full Name' 25 Width = 3 1225 Width = 300 26 26 end 27 27 item 28 28 Caption = 'First name' 29 Width = 15 629 Width = 150 30 30 end 31 31 item 32 32 Caption = 'Middle name' 33 Width = 15 633 Width = 150 34 34 end 35 35 item 36 36 Caption = 'Last Name' 37 Width = 15 637 Width = 150 38 38 end 39 39 item 40 40 Caption = 'Phone' 41 Width = 15 641 Width = 150 42 42 end 43 43 item 44 44 Caption = 'Mobile' 45 Width = 15 645 Width = 150 46 46 end 47 47 item 48 48 Caption = 'Home phone' 49 Width = 15 649 Width = 150 50 50 end 51 51 item 52 52 Caption = 'Work phone' 53 Width = 15 653 Width = 150 54 54 end> 55 55 MultiSelect = True … … 67 67 object ToolBar1: TToolBar 68 68 Left = 0 69 Height = 4170 Top = 8 7771 Width = 12 6069 Height = 39 70 Top = 842 71 Width = 1210 72 72 Align = alBottom 73 73 Images = Core.ImageList1 … … 82 82 end 83 83 object ToolButton2: TToolButton 84 Left = 3 784 Left = 36 85 85 Top = 2 86 86 Action = AModify 87 87 end 88 88 object ToolButton3: TToolButton 89 Left = 10 989 Left = 106 90 90 Top = 2 91 91 Action = ARemove 92 92 end 93 93 object ToolButton4: TToolButton 94 Left = 7 394 Left = 71 95 95 Top = 2 96 96 Action = AClone 97 97 end 98 98 object ToolButton5: TToolButton 99 Left = 14 5100 Height = 3 499 Left = 141 100 Height = 33 101 101 Top = 2 102 102 Style = tbsSeparator 103 103 end 104 104 object ToolButton6: TToolButton 105 Left = 1 53105 Left = 149 106 106 Top = 2 107 107 Action = ALoadFromFile 108 108 end 109 109 object ToolButton7: TToolButton 110 Left = 18 9110 Left = 184 111 111 Top = 2 112 112 Action = ASaveToFile … … 115 115 object ListViewFilter1: TListViewFilter 116 116 Left = 0 117 Height = 3 3118 Top = 8 44119 Width = 12 60117 Height = 32 118 Top = 810 119 Width = 1210 120 120 OnChange = ListViewFilter1Change 121 121 Align = alBottom … … 123 123 object StatusBar1: TStatusBar 124 124 Left = 0 125 Height = 2 8126 Top = 918127 Width = 12 60125 Height = 27 126 Top = 881 127 Width = 1210 128 128 Panels = < 129 129 item 130 Width = 5 2130 Width = 50 131 131 end> 132 132 SimplePanel = False … … 134 134 object PopupMenuContact: TPopupMenu 135 135 Images = Core.ImageList1 136 Left = 4 53137 Top = 2 74136 Left = 435 137 Top = 263 138 138 object MenuItem1: TMenuItem 139 139 Action = AAdd … … 175 175 object ActionList1: TActionList 176 176 Images = Core.ImageList1 177 Left = 7 63178 Top = 2 68177 Left = 732 178 Top = 257 179 179 object AAdd: TAction 180 180 Caption = 'Add' … … 241 241 Column = 0 242 242 Order = soNone 243 Left = 5 50244 Top = 4 46243 Left = 528 244 Top = 428 245 245 end 246 246 object SaveDialog1: TSaveDialog 247 Left = 7 50248 Top = 4 25247 Left = 720 248 Top = 408 249 249 end 250 250 object OpenDialog1: TOpenDialog 251 Left = 7 50252 Top = 500251 Left = 720 252 Top = 480 253 253 end 254 254 end
Note:
See TracChangeset
for help on using the changeset viewer.
