pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

tvplanit: Use font "default" (lowercase!) in all forms instead of MS Sans Serif, font size 0

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4704 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-06-09 23:49:35 +00:00
parent 3e1a370a4b
commit d9de3d571d
17 changed files with 457 additions and 425 deletions
Download Patch File Download Diff File Expand all files Collapse all files

100
components/tvplanit/source/vpcontacteditdlg.lfm
View File

@ -9,8 +9,6 @@ object ContactEditForm: TContactEditForm
Caption = 'ContactEdit'
ClientHeight = 320
ClientWidth = 433
Font.Height = -11
Font.Name = 'Default'
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnShow = FormShow
@ -21,9 +19,9 @@ object ContactEditForm: TContactEditForm
Height = 279
Top = 0
Width = 433
ActivePage = tabMain
ActivePage = tabCustom
Align = alClient
TabIndex = 0
TabIndex = 2
TabOrder = 0
OnChange = tsContactsChange
object tabMain: TTabSheet
@ -142,7 +140,7 @@ object ContactEditForm: TContactEditForm
end
object NameEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 4
Width = 247
MaxLength = 100
@ -151,7 +149,7 @@ object ContactEditForm: TContactEditForm
end
object AddressEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 52
Width = 247
MaxLength = 100
@ -160,7 +158,7 @@ object ContactEditForm: TContactEditForm
end
object CityEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 76
Width = 247
MaxLength = 50
@ -169,7 +167,7 @@ object ContactEditForm: TContactEditForm
end
object StateEdit: TEdit
Left = 168
Height = 22
Height = 23
Top = 100
Width = 247
MaxLength = 25
@ -178,7 +176,7 @@ object ContactEditForm: TContactEditForm
end
object ZipCodeEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 124
Width = 121
MaxLength = 10
@ -187,7 +185,7 @@ object ContactEditForm: TContactEditForm
end
object PositionEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 197
Width = 121
MaxLength = 50
@ -196,7 +194,7 @@ object ContactEditForm: TContactEditForm
end
object TitleEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 29
Width = 121
MaxLength = 50
@ -205,7 +203,7 @@ object ContactEditForm: TContactEditForm
end
object CompanyEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 173
Width = 121
MaxLength = 50
@ -217,7 +215,7 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 224
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 11
end
@ -226,14 +224,14 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 100
Width = 249
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 4
Visible = False
end
object edtCountry: TEdit
Left = 152
Height = 22
Height = 23
Top = 148
Width = 249
TabOrder = 8
@ -258,10 +256,10 @@ object ContactEditForm: TContactEditForm
ClientWidth = 425
ImageIndex = 1
object EMailLbl: TLabel
Left = 91
Height = 14
Left = 84
Height = 15
Top = 133
Width = 38
Width = 45
Caption = 'EMailLbl'
FocusControl = EMailEdit
ParentColor = False
@ -271,7 +269,7 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 8
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 0
end
@ -280,7 +278,7 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 32
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 2
end
@ -289,7 +287,7 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 56
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 4
end
@ -298,42 +296,42 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 80
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 6
end
object Phone4Edit: TEdit
Left = 136
Height = 22
Height = 23
Top = 80
Width = 121
Width = 281
MaxLength = 25
OnChange = ItemChanged
TabOrder = 7
end
object Phone3Edit: TEdit
Left = 136
Height = 22
Height = 23
Top = 56
Width = 121
Width = 281
MaxLength = 25
OnChange = ItemChanged
TabOrder = 5
end
object Phone2Edit: TEdit
Left = 136
Height = 22
Height = 23
Top = 32
Width = 121
Width = 281
MaxLength = 25
OnChange = ItemChanged
TabOrder = 3
end
object Phone1Edit: TEdit
Left = 136
Height = 22
Height = 23
Top = 8
Width = 121
Width = 281
MaxLength = 25
OnChange = ItemChanged
TabOrder = 1
@ -343,24 +341,24 @@ object ContactEditForm: TContactEditForm
Height = 22
Top = 104
Width = 121
ItemHeight = 14
ItemHeight = 15
MaxLength = 65535
TabOrder = 8
end
object Phone5Edit: TEdit
Left = 136
Height = 22
Height = 23
Top = 104
Width = 121
Width = 281
MaxLength = 25
OnChange = ItemChanged
TabOrder = 9
end
object EMailEdit: TEdit
Left = 136
Height = 22
Height = 23
Top = 128
Width = 121
Width = 281
TabOrder = 10
end
end
@ -371,68 +369,68 @@ object ContactEditForm: TContactEditForm
ImageIndex = 2
object CustomLbl1: TLabel
Left = 8
Height = 14
Height = 15
Top = 12
Width = 56
Width = 64
Caption = 'CustomLbl1'
ParentColor = False
end
object CustomLbl2: TLabel
Left = 8
Height = 14
Height = 15
Top = 36
Width = 56
Width = 64
Caption = 'CustomLbl2'
ParentColor = False
end
object CustomLbl3: TLabel
Left = 8
Height = 14
Height = 15
Top = 60
Width = 56
Width = 64
Caption = 'CustomLbl3'
ParentColor = False
end
object CustomLbl4: TLabel
Left = 8
Height = 14
Height = 15
Top = 84
Width = 56
Width = 64
Caption = 'CustomLbl4'
ParentColor = False
end
object Custom1Edit: TEdit
Left = 80
Height = 22
Height = 23
Top = 8
Width = 121
Width = 337
MaxLength = 100
OnChange = ItemChanged
TabOrder = 0
end
object Custom2Edit: TEdit
Left = 80
Height = 22
Height = 23
Top = 32
Width = 121
Width = 337
MaxLength = 100
OnChange = ItemChanged
TabOrder = 1
end
object Custom3Edit: TEdit
Left = 80
Height = 22
Height = 23
Top = 56
Width = 121
Width = 337
MaxLength = 100
OnChange = ItemChanged
TabOrder = 2
end
object Custom4Edit: TEdit
Left = 80
Height = 22
Height = 23
Top = 80
Width = 121
Width = 337
MaxLength = 100
OnChange = ItemChanged
TabOrder = 3