IDE : Change on AboutBox

git-svn-id: trunk@22387 -
This commit is contained in:
laurent 2009-11-02 20:05:06 +00:00
parent 9fee6fe8eb
commit a305255f16
3 changed files with 157 additions and 181 deletions

View File

@ -1,12 +1,12 @@
object AboutForm: TAboutForm
Left = 420
Height = 381
Top = 336
Width = 454
Left = 496
Height = 376
Top = 282
Width = 460
ActiveControl = Notebook
Caption = 'About Lazarus'
ClientHeight = 381
ClientWidth = 454
ClientHeight = 376
ClientWidth = 460
OnClose = FormClose
OnCreate = AboutFormCreate
PopupMenu = PopupMenu1
@ -14,109 +14,118 @@ object AboutForm: TAboutForm
LCLVersion = '0.9.29'
object Notebook: TNotebook
Left = 0
Height = 331
Height = 326
Top = 0
Width = 454
Width = 460
Align = alClient
OnPageChanged = NotebookPageChanged
PageIndex = 0
TabOrder = 0
object VersionPage: TPage
Caption = 'Version'
ClientWidth = 450
ClientHeight = 300
object VersionLabel: TLabel
ClientWidth = 458
ClientHeight = 299
object LogoImage: TImage
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Side = asrBottom
Left = 187
AnchorSideTop.Control = VersionPage
AnchorSideTop.Side = asrCenter
Left = 4
Height = 300
Top = -1
Width = 450
AutoSize = True
end
object VersionLabel: TLabel
AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = LogoImage
Left = 191
Height = 18
Top = 121
Top = 120
Width = 76
Alignment = taCenter
BorderSpacing.Top = 10
BorderSpacing.Top = 115
BorderSpacing.Around = 6
Caption = 'Version #:'
Font.Color = clSilver
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object BuildDateLabel: TLabel
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = VersionLabel
AnchorSideTop.Side = asrBottom
Left = 207
Left = 211
Height = 18
Top = 145
Top = 144
Width = 36
Alignment = taCenter
BorderSpacing.Around = 6
Caption = 'Date:'
Font.Color = clSilver
ParentColor = False
ParentFont = False
end
object RevisionLabel: TLabel
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = FPCVersionLabel
AnchorSideTop.Side = asrBottom
Left = 182
Left = 186
Height = 18
Top = 193
Top = 192
Width = 86
BorderSpacing.Around = 6
Caption = 'RevisionLabel'
Font.Color = clSilver
ParentColor = False
ParentFont = False
end
object PlatformLabel: TLabel
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = RevisionLabel
AnchorSideTop.Side = asrBottom
Left = 181
Left = 185
Height = 18
Top = 217
Top = 216
Width = 89
BorderSpacing.Around = 6
Caption = 'PlatformLabel'
Font.Color = clSilver
ParentColor = False
ParentFont = False
end
object FPCVersionLabel: TLabel
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = BuildDateLabel
AnchorSideTop.Side = asrBottom
Left = 172
Left = 176
Height = 18
Top = 169
Top = 168
Width = 106
BorderSpacing.Around = 6
Caption = 'FPCVersionLabel'
Font.Color = clSilver
ParentColor = False
end
object PaintBox1: TPaintBox
AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = VersionPage
Left = 110
Height = 81
Top = 10
Width = 231
BorderSpacing.Around = 10
OnPaint = PaintBox1Paint
ParentFont = False
end
end
object AboutPage: TPage
Caption = 'About'
ClientWidth = 450
ClientHeight = 300
ClientWidth = 458
ClientHeight = 299
object OfficialLabel: TLabel
AnchorSideLeft.Control = AboutPage
AnchorSideBottom.Control = DocumentationLabel
Left = 6
Height = 18
Top = 252
Width = 77
Height = 14
Top = 259
Width = 59
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'OfficialLabel'
@ -126,10 +135,10 @@ object AboutForm: TAboutForm
AnchorSideLeft.Control = OfficialLabel
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = DocumentationLabel
Left = 89
Height = 18
Top = 252
Width = 102
Left = 71
Height = 14
Top = 259
Width = 78
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'OfficialURLLabel'
@ -145,9 +154,9 @@ object AboutForm: TAboutForm
AnchorSideBottom.Control = AboutPage
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 18
Top = 276
Width = 134
Height = 14
Top = 279
Width = 98
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'DocumentationLabel'
@ -158,10 +167,10 @@ object AboutForm: TAboutForm
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = AboutPage
AnchorSideBottom.Side = asrBottom
Left = 146
Height = 18
Top = 276
Width = 159
Left = 110
Height = 14
Top = 279
Width = 117
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'DocumentationURLLabel'
@ -179,9 +188,9 @@ object AboutForm: TAboutForm
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = OfficialLabel
Left = 0
Height = 246
Height = 253
Top = 0
Width = 450
Width = 458
Anchors = [akTop, akLeft, akRight, akBottom]
ReadOnly = True
ScrollBars = ssAutoBoth
@ -194,37 +203,24 @@ object AboutForm: TAboutForm
object AcknowledgementsPage: TPage
Caption = 'Acknowledgements'
end
object LogoPage: TPage
Caption = 'LogoPage'
ClientWidth = 450
ClientHeight = 300
object LogoImage: TImage
Left = 0
Height = 300
Top = 0
Width = 450
Align = alClient
end
end
end
object Panel1: TPanel
object ButtonPanel: TPanel
Left = 0
Height = 50
Top = 331
Width = 454
Top = 326
Width = 460
Align = alBottom
Caption = 'Panel1'
ClientHeight = 50
ClientWidth = 454
ClientWidth = 460
TabOrder = 1
object CloseButton: TBitBtn
AnchorSideLeft.Control = Panel1
AnchorSideLeft.Control = ButtonPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Panel1
AnchorSideTop.Control = ButtonPanel
AnchorSideTop.Side = asrCenter
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 192
Left = 195
Height = 32
Top = 9
Width = 70

View File

@ -1,86 +1,85 @@
{ This is an automatically generated lazarus resource file }
{ Ceci est un fichier ressource généré automatiquement par Lazarus }
LazarusResources.Add('TAboutForm','FORMDATA',[
'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#164#1#6'Height'#3'}'#1#3'Top'#3
+'P'#1#5'Width'#3#198#1#13'ActiveControl'#7#8'Notebook'#7'Caption'#6#13'About'
+' Lazarus'#12'ClientHeight'#3'}'#1#11'ClientWidth'#3#198#1#7'OnClose'#7#9'Fo'
'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#240#1#6'Height'#3'x'#1#3'Top'#3
+#26#1#5'Width'#3#204#1#13'ActiveControl'#7#8'Notebook'#7'Caption'#6#13'About'
+' Lazarus'#12'ClientHeight'#3'x'#1#11'ClientWidth'#3#204#1#7'OnClose'#7#9'Fo'
+'rmClose'#8'OnCreate'#7#15'AboutFormCreate'#9'PopupMenu'#7#10'PopupMenu1'#8
+'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.29'#0#9'TNotebook'#8
+'Notebook'#4'Left'#2#0#6'Height'#3'K'#1#3'Top'#2#0#5'Width'#3#198#1#5'Align'
+'Notebook'#4'Left'#2#0#6'Height'#3'F'#1#3'Top'#2#0#5'Width'#3#204#1#5'Align'
+#7#8'alClient'#13'OnPageChanged'#7#19'NotebookPageChanged'#9'PageIndex'#2#0#8
+'TabOrder'#2#0#0#5'TPage'#11'VersionPage'#7'Caption'#6#7'Version'#11'ClientW'
+'idth'#3#194#1#12'ClientHeight'#3','#1#0#6'TLabel'#12'VersionLabel'#22'Ancho'
+'rSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'
+#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#187#0#6'Height'#2#18#3'Top'
+#2'y'#5'Width'#2'L'#9'Alignment'#7#8'taCenter'#17'BorderSpacing.Top'#2#10#20
+'BorderSpacing.Around'#2#6#7'Caption'#6#10'Version #:'#10'Font.Style'#11#6'f'
+'sBold'#0#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#14'BuildDateLabel'
+#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'as'
+'rCenter'#21'AnchorSideTop.Control'#7#12'VersionLabel'#18'AnchorSideTop.Side'
+#7#9'asrBottom'#4'Left'#3#207#0#6'Height'#2#18#3'Top'#3#145#0#5'Width'#2'$'#9
+'Alignment'#7#8'taCenter'#20'BorderSpacing.Around'#2#6#7'Caption'#6#5'Date:'
+#11'ParentColor'#8#0#0#6'TLabel'#13'RevisionLabel'#22'AnchorSideLeft.Control'
+#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.C'
+'ontrol'#7#15'FPCVersionLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'
+#3#182#0#6'Height'#2#18#3'Top'#3#193#0#5'Width'#2'V'#20'BorderSpacing.Around'
+#2#6#7'Caption'#6#13'RevisionLabel'#11'ParentColor'#8#0#0#6'TLabel'#13'Platf'
+'ormLabel'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Si'
+'de'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#13'RevisionLabel'#18'AnchorS'
+'ideTop.Side'#7#9'asrBottom'#4'Left'#3#181#0#6'Height'#2#18#3'Top'#3#217#0#5
+'Width'#2'Y'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'PlatformLabel'#11
+'ParentColor'#8#0#0#6'TLabel'#15'FPCVersionLabel'#22'AnchorSideLeft.Control'
+#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.C'
+'ontrol'#7#14'BuildDateLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3
+#172#0#6'Height'#2#18#3'Top'#3#169#0#5'Width'#2'j'#20'BorderSpacing.Around'#2
+#6#7'Caption'#6#15'FPCVersionLabel'#11'ParentColor'#8#0#0#9'TPaintBox'#9'Pai'
+'ntBox1'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'
+#7#9'asrCenter'#21'AnchorSideTop.Control'#7#11'VersionPage'#4'Left'#2'n'#6'H'
+'eight'#2'Q'#3'Top'#2#10#5'Width'#3#231#0#20'BorderSpacing.Around'#2#10#7'On'
+'Paint'#7#14'PaintBox1Paint'#0#0#0#5'TPage'#9'AboutPage'#7'Caption'#6#5'Abou'
+'t'#11'ClientWidth'#3#194#1#12'ClientHeight'#3','#1#0#6'TLabel'#13'OfficialL'
+'abel'#22'AnchorSideLeft.Control'#7#9'AboutPage'#24'AnchorSideBottom.Control'
+#7#18'DocumentationLabel'#4'Left'#2#6#6'Height'#2#18#3'Top'#3#252#0#5'Width'
+#2'M'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'C'
+'aption'#6#13'OfficialLabel'#11'ParentColor'#8#0#0#6'TLabel'#16'OfficialURLL'
+'abel'#22'AnchorSideLeft.Control'#7#13'OfficialLabel'#19'AnchorSideLeft.Side'
+#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#18'DocumentationLabel'#4'Left'
+#2'Y'#6'Height'#2#18#3'Top'#3#252#0#5'Width'#2'f'#7'Anchors'#11#6'akLeft'#8
+'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#16'OfficialURLLabel'
+#10'Font.Color'#7#6'clBlue'#11'ParentColor'#8#10'ParentFont'#8#11'OnMouseDow'
+'n'#7#17'URLLabelMouseDown'#12'OnMouseEnter'#7#18'URLLabelMouseEnter'#12'OnM'
+'ouseLeave'#7#18'URLLabelMouseLeave'#0#0#6'TLabel'#18'DocumentationLabel'#22
+'AnchorSideLeft.Control'#7#9'AboutPage'#24'AnchorSideBottom.Control'#7#9'Abo'
+'utPage'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#18
+#3'Top'#3#20#1#5'Width'#3#134#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'Bor'
+'derSpacing.Around'#2#6#7'Caption'#6#18'DocumentationLabel'#11'ParentColor'#8
+#0#0#6'TLabel'#21'DocumentationURLLabel'#22'AnchorSideLeft.Control'#7#18'Doc'
+'umentationLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBottom'
+'.Control'#7#9'AboutPage'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3
+#146#0#6'Height'#2#18#3'Top'#3#20#1#5'Width'#3#159#0#7'Anchors'#11#6'akLeft'
+#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'DocumentationURL'
+'Label'#10'Font.Color'#7#6'clBlue'#11'ParentColor'#8#10'ParentFont'#8#11'OnM'
+'ouseDown'#7#17'URLLabelMouseDown'#12'OnMouseEnter'#7#18'URLLabelMouseEnter'
+#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0#0#5'TMemo'#9'AboutMemo'#22'Anch'
+'orSideLeft.Control'#7#9'AboutPage'#21'AnchorSideTop.Control'#7#9'AboutPage'
+#23'AnchorSideRight.Control'#7#9'AboutPage'#20'AnchorSideRight.Side'#7#9'asr'
+'Bottom'#24'AnchorSideBottom.Control'#7#13'OfficialLabel'#4'Left'#2#0#6'Heig'
+'ht'#3#246#0#3'Top'#2#0#5'Width'#3#194#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
,'akRight'#8'akBottom'#0#8'ReadOnly'#9#10'ScrollBars'#7#10'ssAutoBoth'#8'TabO'
+'rder'#2#0#0#0#0#5'TPage'#16'ContributorsPage'#7'Caption'#6#12'Contributors'
+#0#0#5'TPage'#20'AcknowledgementsPage'#7'Caption'#6#16'Acknowledgements'#0#0
+#5'TPage'#8'LogoPage'#7'Caption'#6#8'LogoPage'#11'ClientWidth'#3#194#1#12'Cl'
+'ientHeight'#3','#1#0#6'TImage'#9'LogoImage'#4'Left'#2#0#6'Height'#3','#1#3
+'Top'#2#0#5'Width'#3#194#1#5'Align'#7#8'alClient'#0#0#0#0#6'TPanel'#6'Panel1'
+#4'Left'#2#0#6'Height'#2'2'#3'Top'#3'K'#1#5'Width'#3#198#1#5'Align'#7#8'alBo'
+'ttom'#7'Caption'#6#6'Panel1'#12'ClientHeight'#2'2'#11'ClientWidth'#3#198#1#8
+'TabOrder'#2#1#0#7'TBitBtn'#11'CloseButton'#22'AnchorSideLeft.Control'#7#6'P'
+'anel1'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#6
+'Panel1'#18'AnchorSideTop.Side'#7#9'asrCenter'#24'AnchorSideBottom.Control'#7
+#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#192#0#6'Height'
+#2' '#3'Top'#2#9#5'Width'#2'F'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6
+'Cancel'#9#7'Caption'#6#6'&Close'#4'Kind'#7#7'bkClose'#11'ModalResult'#2#1#9
+'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#2
+'L'#3'top'#3#22#1#0#9'TMenuItem'#16'miVerToClipboard'#7'Caption'#6'%Copy ver'
+'sion information to clipboard'#7'OnClick'#7#21'miVerToClipboardClick'#0#0#0
+#0
+'idth'#3#202#1#12'ClientHeight'#3'+'#1#0#6'TImage'#9'LogoImage'#22'AnchorSid'
+'eLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21
+'AnchorSideTop.Control'#7#11'VersionPage'#18'AnchorSideTop.Side'#7#9'asrCent'
+'er'#4'Left'#2#4#6'Height'#3','#1#3'Top'#2#255#5'Width'#3#194#1#8'AutoSize'#9
+#0#0#6'TLabel'#12'VersionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19
+'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#9'LogoImage'
+#4'Left'#3#191#0#6'Height'#2#18#3'Top'#2'x'#5'Width'#2'L'#9'Alignment'#7#8't'
+'aCenter'#17'BorderSpacing.Top'#2's'#20'BorderSpacing.Around'#2#6#7'Caption'
+#6#10'Version #:'#10'Font.Color'#7#8'clSilver'#10'Font.Style'#11#6'fsBold'#0
+#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#14'BuildDateLabel'#22'Anch'
+'orSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21
+'AnchorSideTop.Control'#7#12'VersionLabel'#18'AnchorSideTop.Side'#7#9'asrBot'
+'tom'#4'Left'#3#211#0#6'Height'#2#18#3'Top'#3#144#0#5'Width'#2'$'#9'Alignmen'
+'t'#7#8'taCenter'#20'BorderSpacing.Around'#2#6#7'Caption'#6#5'Date:'#10'Font'
+'.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#13'R'
+'evisionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLeft.S'
+'ide'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#15'FPCVersionLabel'#18'Anch'
+'orSideTop.Side'#7#9'asrBottom'#4'Left'#3#186#0#6'Height'#2#18#3'Top'#3#192#0
+#5'Width'#2'V'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'RevisionLabel'#10
+'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'
+#13'PlatformLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLe'
+'ft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#13'RevisionLabel'#18'An'
+'chorSideTop.Side'#7#9'asrBottom'#4'Left'#3#185#0#6'Height'#2#18#3'Top'#3#216
+#0#5'Width'#2'Y'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'PlatformLabel'
+#10'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabe'
+'l'#15'FPCVersionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorS'
+'ideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#14'BuildDateLabel'
+#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#176#0#6'Height'#2#18#3'Top'
+#3#168#0#5'Width'#2'j'#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'FPCVersi'
+'onLabel'#10'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0
+#0#5'TPage'#9'AboutPage'#7'Caption'#6#5'About'#11'ClientWidth'#3#202#1#12'Cl'
+'ientHeight'#3'+'#1#0#6'TLabel'#13'OfficialLabel'#22'AnchorSideLeft.Control'
+#7#9'AboutPage'#24'AnchorSideBottom.Control'#7#18'DocumentationLabel'#4'Left'
+#2#6#6'Height'#2#14#3'Top'#3#3#1#5'Width'#2';'#7'Anchors'#11#6'akLeft'#8'akB'
+'ottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'OfficialLabel'#11'Par'
+'entColor'#8#0#0#6'TLabel'#16'OfficialURLLabel'#22'AnchorSideLeft.Control'#7
+#13'OfficialLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBotto'
+'m.Control'#7#18'DocumentationLabel'#4'Left'#2'G'#6'Height'#2#14#3'Top'#3#3#1
+#5'Width'#2'N'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'
+#2#6#7'Caption'#6#16'OfficialURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentC'
+'olor'#8#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouse'
+'Enter'#7#18'URLLabelMouseEnter'#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0
+#0#6'TLabel'#18'DocumentationLabel'#22'AnchorSideLeft.Control'#7#9'AboutPage'
+#24'AnchorSideBottom.Control'#7#9'AboutPage'#21'AnchorSideBottom.Side'#7#9'a'
+'srBottom'#4'Left'#2#6#6'Height'#2#14#3'Top'#3#23#1#5'Width'#2'b'#7'Anchors'
+#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'Doc'
+'umentationLabel'#11'ParentColor'#8#0#0#6'TLabel'#21'DocumentationURLLabel'
+#22'AnchorSideLeft.Control'#7#18'DocumentationLabel'#19'AnchorSideLeft.Side'
+#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#9'AboutPage'#21'AnchorSideBot'
+'tom.Side'#7#9'asrBottom'#4'Left'#2'n'#6'Height'#2#14#3'Top'#3#23#1#5'Width'
+#2'u'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'C'
+'aption'#6#21'DocumentationURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentCol'
+'or'#8#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouseEn'
+'ter'#7#18'URLLabelMouseEnter'#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0#0
+#5'TMemo'#9'AboutMemo'#22'AnchorSideLeft.Control'#7#9'AboutPage'#21'AnchorSi'
+'deTop.Control'#7#9'AboutPage'#23'AnchorSideRight.Control'#7#9'AboutPage'#20
,'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#13'Offi'
+'cialLabel'#4'Left'#2#0#6'Height'#3#253#0#3'Top'#2#0#5'Width'#3#202#1#7'Anch'
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8'ReadOnly'#9#10'Scroll'
+'Bars'#7#10'ssAutoBoth'#8'TabOrder'#2#0#0#0#0#5'TPage'#16'ContributorsPage'#7
+'Caption'#6#12'Contributors'#0#0#5'TPage'#20'AcknowledgementsPage'#7'Caption'
+#6#16'Acknowledgements'#0#0#0#6'TPanel'#11'ButtonPanel'#4'Left'#2#0#6'Height'
+#2'2'#3'Top'#3'F'#1#5'Width'#3#204#1#5'Align'#7#8'alBottom'#12'ClientHeight'
+#2'2'#11'ClientWidth'#3#204#1#8'TabOrder'#2#1#0#7'TBitBtn'#11'CloseButton'#22
+'AnchorSideLeft.Control'#7#11'ButtonPanel'#19'AnchorSideLeft.Side'#7#9'asrCe'
+'nter'#21'AnchorSideTop.Control'#7#11'ButtonPanel'#18'AnchorSideTop.Side'#7#9
+'asrCenter'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'
+#7#9'asrBottom'#4'Left'#3#195#0#6'Height'#2' '#3'Top'#2#9#5'Width'#2'F'#8'Au'
+'toSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'&Close'#4
+'Kind'#7#7'bkClose'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0
+#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#2'L'#3'top'#3#22#1#0#9'TMenuItem'#16
+'miVerToClipboard'#7'Caption'#6'%Copy version information to clipboard'#7'On'
+'Click'#7#21'miVerToClipboardClick'#0#0#0#0
]);

View File

@ -73,13 +73,11 @@ type
DocumentationURLLabel: TLabel;
FPCVersionLabel: TLabel;
LogoImage: TImage;
LogoPage: TPage;
miVerToClipboard: TMenuItem;
OfficialLabel: TLabel;
OfficialURLLabel: TLabel;
PaintBox1: TPaintBox;
VersionPage: TPage;
Panel1: TPanel;
ButtonPanel: TPanel;
PlatformLabel: TLabel;
PopupMenu1: TPopupMenu;
VersionLabel: TLABEL;
@ -92,7 +90,6 @@ type
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure miVerToClipboardClick(Sender: TObject);
procedure NotebookPageChanged(Sender: TObject);
procedure PaintBox1Paint(Sender: TObject);
procedure URLLabelMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure URLLabelMouseEnter(Sender: TObject);
@ -172,11 +169,14 @@ begin
ContributorsPage.DoubleBuffered := True;
AcknowledgementsPage.Caption:=lisAcknowledgements;
AcknowledgementsPage.DoubleBuffered := True;
LogoPage.Caption:=lisLogo;
miVerToClipboard.Caption := lisVerToClipboard;
Constraints.MinWidth:= 455;
VersionLabel.Font.Color:= clWhite;
Constraints.MinWidth:= 460;
Constraints.MinHeight:= 380;
Width:= 460;
Height:= 380;
AboutMemo.Lines.Text:=
Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding]);
@ -211,25 +211,6 @@ begin
Acknowledgements.Active:=NoteBook.ActivePage = lisAcknowledgements;
end;
procedure TAboutForm.PaintBox1Paint(Sender: TObject);
begin
with PaintBox1.Canvas do
begin
Font.Color:= RGBToColor(63,97,197);
Font.Size:= 16;
TextOut(55,0, 'Free Pascal');
Font.Size:= 36;
Font.Style:= [fsBold];
TextOut(5,10, 'Lazarus');
Brush.Color:= clRed;
Pen.Color:= clRed;
Rectangle(60,63,170,81);
Font.Color:= clWhite;
Font.Size:= 10;
TextOut(90,63, 'Project');
end;
end;
procedure TAboutForm.URLLabelMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin