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 object AboutForm: TAboutForm
Left = 420 Left = 496
Height = 381 Height = 376
Top = 336 Top = 282
Width = 454 Width = 460
ActiveControl = Notebook ActiveControl = Notebook
Caption = 'About Lazarus' Caption = 'About Lazarus'
ClientHeight = 381 ClientHeight = 376
ClientWidth = 454 ClientWidth = 460
OnClose = FormClose OnClose = FormClose
OnCreate = AboutFormCreate OnCreate = AboutFormCreate
PopupMenu = PopupMenu1 PopupMenu = PopupMenu1
@ -14,109 +14,118 @@ object AboutForm: TAboutForm
LCLVersion = '0.9.29' LCLVersion = '0.9.29'
object Notebook: TNotebook object Notebook: TNotebook
Left = 0 Left = 0
Height = 331 Height = 326
Top = 0 Top = 0
Width = 454 Width = 460
Align = alClient Align = alClient
OnPageChanged = NotebookPageChanged OnPageChanged = NotebookPageChanged
PageIndex = 0 PageIndex = 0
TabOrder = 0 TabOrder = 0
object VersionPage: TPage object VersionPage: TPage
Caption = 'Version' Caption = 'Version'
ClientWidth = 450 ClientWidth = 458
ClientHeight = 300 ClientHeight = 299
object VersionLabel: TLabel object LogoImage: TImage
AnchorSideLeft.Control = VersionPage AnchorSideLeft.Control = VersionPage
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Side = asrBottom AnchorSideTop.Control = VersionPage
Left = 187 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 Height = 18
Top = 121 Top = 120
Width = 76 Width = 76
Alignment = taCenter Alignment = taCenter
BorderSpacing.Top = 10 BorderSpacing.Top = 115
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Version #:' Caption = 'Version #:'
Font.Color = clSilver
Font.Style = [fsBold] Font.Style = [fsBold]
ParentColor = False ParentColor = False
ParentFont = False ParentFont = False
end end
object BuildDateLabel: TLabel object BuildDateLabel: TLabel
AnchorSideLeft.Control = VersionPage AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = VersionLabel AnchorSideTop.Control = VersionLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 207 Left = 211
Height = 18 Height = 18
Top = 145 Top = 144
Width = 36 Width = 36
Alignment = taCenter Alignment = taCenter
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Date:' Caption = 'Date:'
Font.Color = clSilver
ParentColor = False ParentColor = False
ParentFont = False
end end
object RevisionLabel: TLabel object RevisionLabel: TLabel
AnchorSideLeft.Control = VersionPage AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = FPCVersionLabel AnchorSideTop.Control = FPCVersionLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 182 Left = 186
Height = 18 Height = 18
Top = 193 Top = 192
Width = 86 Width = 86
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'RevisionLabel' Caption = 'RevisionLabel'
Font.Color = clSilver
ParentColor = False ParentColor = False
ParentFont = False
end end
object PlatformLabel: TLabel object PlatformLabel: TLabel
AnchorSideLeft.Control = VersionPage AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = RevisionLabel AnchorSideTop.Control = RevisionLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 181 Left = 185
Height = 18 Height = 18
Top = 217 Top = 216
Width = 89 Width = 89
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'PlatformLabel' Caption = 'PlatformLabel'
Font.Color = clSilver
ParentColor = False ParentColor = False
ParentFont = False
end end
object FPCVersionLabel: TLabel object FPCVersionLabel: TLabel
AnchorSideLeft.Control = VersionPage AnchorSideLeft.Control = LogoImage
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = BuildDateLabel AnchorSideTop.Control = BuildDateLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 172 Left = 176
Height = 18 Height = 18
Top = 169 Top = 168
Width = 106 Width = 106
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'FPCVersionLabel' Caption = 'FPCVersionLabel'
Font.Color = clSilver
ParentColor = False ParentColor = False
end ParentFont = False
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
end end
end end
object AboutPage: TPage object AboutPage: TPage
Caption = 'About' Caption = 'About'
ClientWidth = 450 ClientWidth = 458
ClientHeight = 300 ClientHeight = 299
object OfficialLabel: TLabel object OfficialLabel: TLabel
AnchorSideLeft.Control = AboutPage AnchorSideLeft.Control = AboutPage
AnchorSideBottom.Control = DocumentationLabel AnchorSideBottom.Control = DocumentationLabel
Left = 6 Left = 6
Height = 18 Height = 14
Top = 252 Top = 259
Width = 77 Width = 59
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'OfficialLabel' Caption = 'OfficialLabel'
@ -126,10 +135,10 @@ object AboutForm: TAboutForm
AnchorSideLeft.Control = OfficialLabel AnchorSideLeft.Control = OfficialLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = DocumentationLabel AnchorSideBottom.Control = DocumentationLabel
Left = 89 Left = 71
Height = 18 Height = 14
Top = 252 Top = 259
Width = 102 Width = 78
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'OfficialURLLabel' Caption = 'OfficialURLLabel'
@ -145,9 +154,9 @@ object AboutForm: TAboutForm
AnchorSideBottom.Control = AboutPage AnchorSideBottom.Control = AboutPage
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 18 Height = 14
Top = 276 Top = 279
Width = 134 Width = 98
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'DocumentationLabel' Caption = 'DocumentationLabel'
@ -158,10 +167,10 @@ object AboutForm: TAboutForm
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = AboutPage AnchorSideBottom.Control = AboutPage
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 146 Left = 110
Height = 18 Height = 14
Top = 276 Top = 279
Width = 159 Width = 117
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'DocumentationURLLabel' Caption = 'DocumentationURLLabel'
@ -179,9 +188,9 @@ object AboutForm: TAboutForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = OfficialLabel AnchorSideBottom.Control = OfficialLabel
Left = 0 Left = 0
Height = 246 Height = 253
Top = 0 Top = 0
Width = 450 Width = 458
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
ReadOnly = True ReadOnly = True
ScrollBars = ssAutoBoth ScrollBars = ssAutoBoth
@ -194,37 +203,24 @@ object AboutForm: TAboutForm
object AcknowledgementsPage: TPage object AcknowledgementsPage: TPage
Caption = 'Acknowledgements' Caption = 'Acknowledgements'
end 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 end
object Panel1: TPanel object ButtonPanel: TPanel
Left = 0 Left = 0
Height = 50 Height = 50
Top = 331 Top = 326
Width = 454 Width = 460
Align = alBottom Align = alBottom
Caption = 'Panel1'
ClientHeight = 50 ClientHeight = 50
ClientWidth = 454 ClientWidth = 460
TabOrder = 1 TabOrder = 1
object CloseButton: TBitBtn object CloseButton: TBitBtn
AnchorSideLeft.Control = Panel1 AnchorSideLeft.Control = ButtonPanel
AnchorSideLeft.Side = asrCenter AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = ButtonPanel
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 192 Left = 195
Height = 32 Height = 32
Top = 9 Top = 9
Width = 70 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',[ LazarusResources.Add('TAboutForm','FORMDATA',[
'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#164#1#6'Height'#3'}'#1#3'Top'#3 'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#240#1#6'Height'#3'x'#1#3'Top'#3
+'P'#1#5'Width'#3#198#1#13'ActiveControl'#7#8'Notebook'#7'Caption'#6#13'About' +#26#1#5'Width'#3#204#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' +' 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 +'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 +'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 +#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' +'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' +'idth'#3#202#1#12'ClientHeight'#3'+'#1#0#6'TImage'#9'LogoImage'#22'AnchorSid'
+'rSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter' +'eLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21
+#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#187#0#6'Height'#2#18#3'Top' +'AnchorSideTop.Control'#7#11'VersionPage'#18'AnchorSideTop.Side'#7#9'asrCent'
+#2'y'#5'Width'#2'L'#9'Alignment'#7#8'taCenter'#17'BorderSpacing.Top'#2#10#20 +'er'#4'Left'#2#4#6'Height'#3','#1#3'Top'#2#255#5'Width'#3#194#1#8'AutoSize'#9
+'BorderSpacing.Around'#2#6#7'Caption'#6#10'Version #:'#10'Font.Style'#11#6'f' +#0#0#6'TLabel'#12'VersionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19
+'sBold'#0#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#14'BuildDateLabel' +'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#9'LogoImage'
+#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'as' +#4'Left'#3#191#0#6'Height'#2#18#3'Top'#2'x'#5'Width'#2'L'#9'Alignment'#7#8't'
+'rCenter'#21'AnchorSideTop.Control'#7#12'VersionLabel'#18'AnchorSideTop.Side' +'aCenter'#17'BorderSpacing.Top'#2's'#20'BorderSpacing.Around'#2#6#7'Caption'
+#7#9'asrBottom'#4'Left'#3#207#0#6'Height'#2#18#3'Top'#3#145#0#5'Width'#2'$'#9 +#6#10'Version #:'#10'Font.Color'#7#8'clSilver'#10'Font.Style'#11#6'fsBold'#0
+'Alignment'#7#8'taCenter'#20'BorderSpacing.Around'#2#6#7'Caption'#6#5'Date:' +#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#14'BuildDateLabel'#22'Anch'
+#11'ParentColor'#8#0#0#6'TLabel'#13'RevisionLabel'#22'AnchorSideLeft.Control' +'orSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21
+#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.C' +'AnchorSideTop.Control'#7#12'VersionLabel'#18'AnchorSideTop.Side'#7#9'asrBot'
+'ontrol'#7#15'FPCVersionLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left' +'tom'#4'Left'#3#211#0#6'Height'#2#18#3'Top'#3#144#0#5'Width'#2'$'#9'Alignmen'
+#3#182#0#6'Height'#2#18#3'Top'#3#193#0#5'Width'#2'V'#20'BorderSpacing.Around' +'t'#7#8'taCenter'#20'BorderSpacing.Around'#2#6#7'Caption'#6#5'Date:'#10'Font'
+#2#6#7'Caption'#6#13'RevisionLabel'#11'ParentColor'#8#0#0#6'TLabel'#13'Platf' +'.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'#13'R'
+'ormLabel'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Si' +'evisionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLeft.S'
+'de'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#13'RevisionLabel'#18'AnchorS' +'ide'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#15'FPCVersionLabel'#18'Anch'
+'ideTop.Side'#7#9'asrBottom'#4'Left'#3#181#0#6'Height'#2#18#3'Top'#3#217#0#5 +'orSideTop.Side'#7#9'asrBottom'#4'Left'#3#186#0#6'Height'#2#18#3'Top'#3#192#0
+'Width'#2'Y'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'PlatformLabel'#11 +#5'Width'#2'V'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'RevisionLabel'#10
+'ParentColor'#8#0#0#6'TLabel'#15'FPCVersionLabel'#22'AnchorSideLeft.Control' +'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabel'
+#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.C' +#13'PlatformLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorSideLe'
+'ontrol'#7#14'BuildDateLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3 +'ft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#13'RevisionLabel'#18'An'
+#172#0#6'Height'#2#18#3'Top'#3#169#0#5'Width'#2'j'#20'BorderSpacing.Around'#2 +'chorSideTop.Side'#7#9'asrBottom'#4'Left'#3#185#0#6'Height'#2#18#3'Top'#3#216
+#6#7'Caption'#6#15'FPCVersionLabel'#11'ParentColor'#8#0#0#9'TPaintBox'#9'Pai' +#0#5'Width'#2'Y'#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'PlatformLabel'
+'ntBox1'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side' +#10'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0#6'TLabe'
+#7#9'asrCenter'#21'AnchorSideTop.Control'#7#11'VersionPage'#4'Left'#2'n'#6'H' +'l'#15'FPCVersionLabel'#22'AnchorSideLeft.Control'#7#9'LogoImage'#19'AnchorS'
+'eight'#2'Q'#3'Top'#2#10#5'Width'#3#231#0#20'BorderSpacing.Around'#2#10#7'On' +'ideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#14'BuildDateLabel'
+'Paint'#7#14'PaintBox1Paint'#0#0#0#5'TPage'#9'AboutPage'#7'Caption'#6#5'Abou' +#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#176#0#6'Height'#2#18#3'Top'
+'t'#11'ClientWidth'#3#194#1#12'ClientHeight'#3','#1#0#6'TLabel'#13'OfficialL' +#3#168#0#5'Width'#2'j'#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'FPCVersi'
+'abel'#22'AnchorSideLeft.Control'#7#9'AboutPage'#24'AnchorSideBottom.Control' +'onLabel'#10'Font.Color'#7#8'clSilver'#11'ParentColor'#8#10'ParentFont'#8#0#0
+#7#18'DocumentationLabel'#4'Left'#2#6#6'Height'#2#18#3'Top'#3#252#0#5'Width' +#0#5'TPage'#9'AboutPage'#7'Caption'#6#5'About'#11'ClientWidth'#3#202#1#12'Cl'
+#2'M'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'C' +'ientHeight'#3'+'#1#0#6'TLabel'#13'OfficialLabel'#22'AnchorSideLeft.Control'
+'aption'#6#13'OfficialLabel'#11'ParentColor'#8#0#0#6'TLabel'#16'OfficialURLL' +#7#9'AboutPage'#24'AnchorSideBottom.Control'#7#18'DocumentationLabel'#4'Left'
+'abel'#22'AnchorSideLeft.Control'#7#13'OfficialLabel'#19'AnchorSideLeft.Side' +#2#6#6'Height'#2#14#3'Top'#3#3#1#5'Width'#2';'#7'Anchors'#11#6'akLeft'#8'akB'
+#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#18'DocumentationLabel'#4'Left' +'ottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'OfficialLabel'#11'Par'
+#2'Y'#6'Height'#2#18#3'Top'#3#252#0#5'Width'#2'f'#7'Anchors'#11#6'akLeft'#8 +'entColor'#8#0#0#6'TLabel'#16'OfficialURLLabel'#22'AnchorSideLeft.Control'#7
+'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#16'OfficialURLLabel' +#13'OfficialLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBotto'
+#10'Font.Color'#7#6'clBlue'#11'ParentColor'#8#10'ParentFont'#8#11'OnMouseDow' +'m.Control'#7#18'DocumentationLabel'#4'Left'#2'G'#6'Height'#2#14#3'Top'#3#3#1
+'n'#7#17'URLLabelMouseDown'#12'OnMouseEnter'#7#18'URLLabelMouseEnter'#12'OnM' +#5'Width'#2'N'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'
+'ouseLeave'#7#18'URLLabelMouseLeave'#0#0#6'TLabel'#18'DocumentationLabel'#22 +#2#6#7'Caption'#6#16'OfficialURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentC'
+'AnchorSideLeft.Control'#7#9'AboutPage'#24'AnchorSideBottom.Control'#7#9'Abo' +'olor'#8#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouse'
+'utPage'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#18 +'Enter'#7#18'URLLabelMouseEnter'#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0
+#3'Top'#3#20#1#5'Width'#3#134#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'Bor' +#0#6'TLabel'#18'DocumentationLabel'#22'AnchorSideLeft.Control'#7#9'AboutPage'
+'derSpacing.Around'#2#6#7'Caption'#6#18'DocumentationLabel'#11'ParentColor'#8 +#24'AnchorSideBottom.Control'#7#9'AboutPage'#21'AnchorSideBottom.Side'#7#9'a'
+#0#0#6'TLabel'#21'DocumentationURLLabel'#22'AnchorSideLeft.Control'#7#18'Doc' +'srBottom'#4'Left'#2#6#6'Height'#2#14#3'Top'#3#23#1#5'Width'#2'b'#7'Anchors'
+'umentationLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBottom' +#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'Doc'
+'.Control'#7#9'AboutPage'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3 +'umentationLabel'#11'ParentColor'#8#0#0#6'TLabel'#21'DocumentationURLLabel'
+#146#0#6'Height'#2#18#3'Top'#3#20#1#5'Width'#3#159#0#7'Anchors'#11#6'akLeft' +#22'AnchorSideLeft.Control'#7#18'DocumentationLabel'#19'AnchorSideLeft.Side'
+#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'DocumentationURL' +#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#9'AboutPage'#21'AnchorSideBot'
+'Label'#10'Font.Color'#7#6'clBlue'#11'ParentColor'#8#10'ParentFont'#8#11'OnM' +'tom.Side'#7#9'asrBottom'#4'Left'#2'n'#6'Height'#2#14#3'Top'#3#23#1#5'Width'
+'ouseDown'#7#17'URLLabelMouseDown'#12'OnMouseEnter'#7#18'URLLabelMouseEnter' +#2'u'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'C'
+#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0#0#5'TMemo'#9'AboutMemo'#22'Anch' +'aption'#6#21'DocumentationURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentCol'
+'orSideLeft.Control'#7#9'AboutPage'#21'AnchorSideTop.Control'#7#9'AboutPage' +'or'#8#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouseEn'
+#23'AnchorSideRight.Control'#7#9'AboutPage'#20'AnchorSideRight.Side'#7#9'asr' +'ter'#7#18'URLLabelMouseEnter'#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0#0
+'Bottom'#24'AnchorSideBottom.Control'#7#13'OfficialLabel'#4'Left'#2#0#6'Heig' +#5'TMemo'#9'AboutMemo'#22'AnchorSideLeft.Control'#7#9'AboutPage'#21'AnchorSi'
+'ht'#3#246#0#3'Top'#2#0#5'Width'#3#194#1#7'Anchors'#11#5'akTop'#6'akLeft'#7 +'deTop.Control'#7#9'AboutPage'#23'AnchorSideRight.Control'#7#9'AboutPage'#20
,'akRight'#8'akBottom'#0#8'ReadOnly'#9#10'ScrollBars'#7#10'ssAutoBoth'#8'TabO' ,'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#13'Offi'
+'rder'#2#0#0#0#0#5'TPage'#16'ContributorsPage'#7'Caption'#6#12'Contributors' +'cialLabel'#4'Left'#2#0#6'Height'#3#253#0#3'Top'#2#0#5'Width'#3#202#1#7'Anch'
+#0#0#5'TPage'#20'AcknowledgementsPage'#7'Caption'#6#16'Acknowledgements'#0#0 +'ors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8'ReadOnly'#9#10'Scroll'
+#5'TPage'#8'LogoPage'#7'Caption'#6#8'LogoPage'#11'ClientWidth'#3#194#1#12'Cl' +'Bars'#7#10'ssAutoBoth'#8'TabOrder'#2#0#0#0#0#5'TPage'#16'ContributorsPage'#7
+'ientHeight'#3','#1#0#6'TImage'#9'LogoImage'#4'Left'#2#0#6'Height'#3','#1#3 +'Caption'#6#12'Contributors'#0#0#5'TPage'#20'AcknowledgementsPage'#7'Caption'
+'Top'#2#0#5'Width'#3#194#1#5'Align'#7#8'alClient'#0#0#0#0#6'TPanel'#6'Panel1' +#6#16'Acknowledgements'#0#0#0#6'TPanel'#11'ButtonPanel'#4'Left'#2#0#6'Height'
+#4'Left'#2#0#6'Height'#2'2'#3'Top'#3'K'#1#5'Width'#3#198#1#5'Align'#7#8'alBo' +#2'2'#3'Top'#3'F'#1#5'Width'#3#204#1#5'Align'#7#8'alBottom'#12'ClientHeight'
+'ttom'#7'Caption'#6#6'Panel1'#12'ClientHeight'#2'2'#11'ClientWidth'#3#198#1#8 +#2'2'#11'ClientWidth'#3#204#1#8'TabOrder'#2#1#0#7'TBitBtn'#11'CloseButton'#22
+'TabOrder'#2#1#0#7'TBitBtn'#11'CloseButton'#22'AnchorSideLeft.Control'#7#6'P' +'AnchorSideLeft.Control'#7#11'ButtonPanel'#19'AnchorSideLeft.Side'#7#9'asrCe'
+'anel1'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#6 +'nter'#21'AnchorSideTop.Control'#7#11'ButtonPanel'#18'AnchorSideTop.Side'#7#9
+'Panel1'#18'AnchorSideTop.Side'#7#9'asrCenter'#24'AnchorSideBottom.Control'#7 +'asrCenter'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'
+#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#192#0#6'Height' +#7#9'asrBottom'#4'Left'#3#195#0#6'Height'#2' '#3'Top'#2#9#5'Width'#2'F'#8'Au'
+#2' '#3'Top'#2#9#5'Width'#2'F'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6 +'toSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'&Close'#4
+'Cancel'#9#7'Caption'#6#6'&Close'#4'Kind'#7#7'bkClose'#11'ModalResult'#2#1#9 +'Kind'#7#7'bkClose'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0
+'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#2 +#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#2'L'#3'top'#3#22#1#0#9'TMenuItem'#16
+'L'#3'top'#3#22#1#0#9'TMenuItem'#16'miVerToClipboard'#7'Caption'#6'%Copy ver' +'miVerToClipboard'#7'Caption'#6'%Copy version information to clipboard'#7'On'
+'sion information to clipboard'#7'OnClick'#7#21'miVerToClipboardClick'#0#0#0 +'Click'#7#21'miVerToClipboardClick'#0#0#0#0
+#0
]); ]);

View File

@ -73,13 +73,11 @@ type
DocumentationURLLabel: TLabel; DocumentationURLLabel: TLabel;
FPCVersionLabel: TLabel; FPCVersionLabel: TLabel;
LogoImage: TImage; LogoImage: TImage;
LogoPage: TPage;
miVerToClipboard: TMenuItem; miVerToClipboard: TMenuItem;
OfficialLabel: TLabel; OfficialLabel: TLabel;
OfficialURLLabel: TLabel; OfficialURLLabel: TLabel;
PaintBox1: TPaintBox;
VersionPage: TPage; VersionPage: TPage;
Panel1: TPanel; ButtonPanel: TPanel;
PlatformLabel: TLabel; PlatformLabel: TLabel;
PopupMenu1: TPopupMenu; PopupMenu1: TPopupMenu;
VersionLabel: TLABEL; VersionLabel: TLABEL;
@ -92,7 +90,6 @@ type
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction); procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure miVerToClipboardClick(Sender: TObject); procedure miVerToClipboardClick(Sender: TObject);
procedure NotebookPageChanged(Sender: TObject); procedure NotebookPageChanged(Sender: TObject);
procedure PaintBox1Paint(Sender: TObject);
procedure URLLabelMouseDown(Sender: TObject; Button: TMouseButton; procedure URLLabelMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); Shift: TShiftState; X, Y: Integer);
procedure URLLabelMouseEnter(Sender: TObject); procedure URLLabelMouseEnter(Sender: TObject);
@ -172,11 +169,14 @@ begin
ContributorsPage.DoubleBuffered := True; ContributorsPage.DoubleBuffered := True;
AcknowledgementsPage.Caption:=lisAcknowledgements; AcknowledgementsPage.Caption:=lisAcknowledgements;
AcknowledgementsPage.DoubleBuffered := True; AcknowledgementsPage.DoubleBuffered := True;
LogoPage.Caption:=lisLogo;
miVerToClipboard.Caption := lisVerToClipboard; miVerToClipboard.Caption := lisVerToClipboard;
Constraints.MinWidth:= 455; VersionLabel.Font.Color:= clWhite;
Constraints.MinWidth:= 460;
Constraints.MinHeight:= 380; Constraints.MinHeight:= 380;
Width:= 460;
Height:= 380;
AboutMemo.Lines.Text:= AboutMemo.Lines.Text:=
Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding]); Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding]);
@ -211,25 +211,6 @@ begin
Acknowledgements.Active:=NoteBook.ActivePage = lisAcknowledgements; Acknowledgements.Active:=NoteBook.ActivePage = lisAcknowledgements;
end; 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; procedure TAboutForm.URLLabelMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer); Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin begin