mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-15 11:39:27 +02:00
IDE : Change on AboutBox
git-svn-id: trunk@22371 -
This commit is contained in:
parent
143f2846cd
commit
165c3dfdeb
@ -1,7 +1,7 @@
|
||||
object AboutForm: TAboutForm
|
||||
Left = 422
|
||||
Left = 420
|
||||
Height = 381
|
||||
Top = 165
|
||||
Top = 336
|
||||
Width = 454
|
||||
ActiveControl = Notebook
|
||||
Caption = 'About Lazarus'
|
||||
@ -28,7 +28,6 @@ object AboutForm: TAboutForm
|
||||
object VersionLabel: TLabel
|
||||
AnchorSideLeft.Control = VersionPage
|
||||
AnchorSideLeft.Side = asrCenter
|
||||
AnchorSideTop.Control = LazarusLabel
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 187
|
||||
Height = 18
|
||||
@ -95,35 +94,16 @@ object AboutForm: TAboutForm
|
||||
Caption = 'FPCVersionLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
object LazarusLabel: TLabel
|
||||
AnchorSideLeft.Control = VersionPage
|
||||
AnchorSideLeft.Side = asrCenter
|
||||
AnchorSideTop.Control = FPCLabel
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 153
|
||||
Height = 45
|
||||
Top = 60
|
||||
Width = 144
|
||||
Caption = 'Lazarus'
|
||||
Font.Color = clBlue
|
||||
Font.Height = -33
|
||||
ParentColor = False
|
||||
ParentFont = False
|
||||
end
|
||||
object FPCLabel: TLabel
|
||||
object PaintBox1: TPaintBox
|
||||
AnchorSideLeft.Control = VersionPage
|
||||
AnchorSideLeft.Side = asrCenter
|
||||
AnchorSideTop.Control = VersionPage
|
||||
Left = 182
|
||||
Height = 20
|
||||
Top = 40
|
||||
Width = 87
|
||||
BorderSpacing.Top = 40
|
||||
Caption = 'Free Pascal'
|
||||
Font.Color = clBlue
|
||||
Font.Height = -14
|
||||
ParentColor = False
|
||||
ParentFont = False
|
||||
Left = 110
|
||||
Height = 81
|
||||
Top = 10
|
||||
Width = 231
|
||||
BorderSpacing.Around = 10
|
||||
OnPaint = PaintBox1Paint
|
||||
end
|
||||
end
|
||||
object AboutPage: TPage
|
||||
|
158
ide/aboutfrm.lrs
158
ide/aboutfrm.lrs
@ -1,92 +1,86 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TAboutForm','FORMDATA',[
|
||||
'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#166#1#6'Height'#3'}'#1#3'Top'#3
|
||||
+#165#0#5'Width'#3#198#1#13'ActiveControl'#7#8'Notebook'#7'Caption'#6#13'Abou'
|
||||
+'t Lazarus'#12'ClientHeight'#3'}'#1#11'ClientWidth'#3#198#1#7'OnClose'#7#9'F'
|
||||
+'ormClose'#8'OnCreate'#7#15'AboutFormCreate'#9'PopupMenu'#7#10'PopupMenu1'#8
|
||||
'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'
|
||||
+'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'
|
||||
+#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'
|
||||
+#21'AnchorSideTop.Control'#7#12'LazarusLabel'#18'AnchorSideTop.Side'#7#9'asr'
|
||||
+'Bottom'#4'Left'#3#187#0#6'Height'#2#18#3'Top'#2'y'#5'Width'#2'L'#9'Alignmen'
|
||||
+'t'#7#8'taCenter'#17'BorderSpacing.Top'#2#10#20'BorderSpacing.Around'#2#6#7
|
||||
+'Caption'#6#10'Version #:'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#10
|
||||
+'ParentFont'#8#0#0#6'TLabel'#14'BuildDateLabel'#22'AnchorSideLeft.Control'#7
|
||||
+#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Con'
|
||||
+'trol'#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'TLa'
|
||||
+'bel'#13'RevisionLabel'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19'Anch'
|
||||
+'orSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#15'FPCVersionLa'
|
||||
+'bel'#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'Rev'
|
||||
+'isionLabel'#11'ParentColor'#8#0#0#6'TLabel'#13'PlatformLabel'#22'AnchorSide'
|
||||
+'Left.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'A'
|
||||
+'nchorSideTop.Control'#7#13'RevisionLabel'#18'AnchorSideTop.Side'#7#9'asrBot'
|
||||
+'tom'#4'Left'#3#181#0#6'Height'#2#18#3'Top'#3#217#0#5'Width'#2'Y'#20'BorderS'
|
||||
+'pacing.Around'#2#6#7'Caption'#6#13'PlatformLabel'#11'ParentColor'#8#0#0#6'T'
|
||||
+'Label'#15'FPCVersionLabel'#22'AnchorSideLeft.Control'#7#11'VersionPage'#19
|
||||
+'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#14'BuildDat'
|
||||
+'eLabel'#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'F'
|
||||
+'PCVersionLabel'#11'ParentColor'#8#0#0#6'TLabel'#12'LazarusLabel'#22'AnchorS'
|
||||
+'ideLeft.Control'#7#11'VersionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21
|
||||
+'AnchorSideTop.Control'#7#8'FPCLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
|
||||
+'Left'#3#153#0#6'Height'#2'-'#3'Top'#2'<'#5'Width'#3#144#0#7'Caption'#6#7'La'
|
||||
+'zarus'#10'Font.Color'#7#6'clBlue'#11'Font.Height'#2#223#11'ParentColor'#8#10
|
||||
+'ParentFont'#8#0#0#6'TLabel'#8'FPCLabel'#22'AnchorSideLeft.Control'#7#11'Ver'
|
||||
+'sionPage'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7
|
||||
+#11'VersionPage'#4'Left'#3#182#0#6'Height'#2#20#3'Top'#2'('#5'Width'#2'W'#17
|
||||
+'BorderSpacing.Top'#2'('#7'Caption'#6#11'Free Pascal'#10'Font.Color'#7#6'clB'
|
||||
+'lue'#11'Font.Height'#2#242#11'ParentColor'#8#10'ParentFont'#8#0#0#0#5'TPage'
|
||||
+#9'AboutPage'#7'Caption'#6#5'About'#11'ClientWidth'#3#194#1#12'ClientHeight'
|
||||
+#3','#1#0#6'TLabel'#13'OfficialLabel'#22'AnchorSideLeft.Control'#7#9'AboutPa'
|
||||
+'ge'#24'AnchorSideBottom.Control'#7#18'DocumentationLabel'#4'Left'#2#6#6'Hei'
|
||||
+'ght'#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'Caption'#6#13'OfficialLabel'#11'ParentColor'
|
||||
+#8#0#0#6'TLabel'#16'OfficialURLLabel'#22'AnchorSideLeft.Control'#7#13'Offici'
|
||||
+'alLabel'#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'C'
|
||||
+'aption'#6#16'OfficialURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentColor'#8
|
||||
+#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouseEnter'#7
|
||||
+#18'URLLabelMouseEnter'#12'OnMouseLeave'#7#18'URLLabelMouseLeave'#0#0#6'TLab'
|
||||
+'el'#18'DocumentationLabel'#22'AnchorSideLeft.Control'#7#9'AboutPage'#24'Anc'
|
||||
+'horSideBottom.Control'#7#9'AboutPage'#21'AnchorSideBottom.Side'#7#9'asrBott'
|
||||
+'om'#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'BorderSpacing.Around'#2#6#7'Caption'#6#18'Docume'
|
||||
+'ntationLabel'#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'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'DocumentationURLLabel'#10'Font.Color'#7#6'clBlue'#11'ParentCo'
|
||||
,'lor'#8#10'ParentFont'#8#11'OnMouseDown'#7#17'URLLabelMouseDown'#12'OnMouseE'
|
||||
+'nter'#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#246#0#3'Top'#2#0#5'Width'#3#194#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#5'TPage'#8'LogoPage'#7'Caption'#6#8'LogoPage'#11
|
||||
+'ClientWidth'#3#194#1#12'ClientHeight'#3','#1#0#6'TImage'#9'LogoImage'#4'Lef'
|
||||
+'t'#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'alBottom'#7'Caption'#6#6'Panel1'#12'ClientHeight'#2'2'
|
||||
+#11'ClientWidth'#3#198#1#8'TabOrder'#2#1#0#7'TBitBtn'#11'CloseButton'#22'Anc'
|
||||
+'horSideLeft.Control'#7#6'Panel1'#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'asrBotto'
|
||||
+'m'#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'bk'
|
||||
+'Close'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#0#10'TPopup'
|
||||
+'Menu'#10'PopupMenu1'#4'left'#2'L'#3'top'#3#22#1#0#9'TMenuItem'#16'miVerToCl'
|
||||
+'ipboard'#7'Caption'#6'%Copy version information to clipboard'#7'OnClick'#7
|
||||
+#21'miVerToClipboardClick'#0#0#0#0
|
||||
+#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
|
||||
]);
|
||||
|
@ -72,13 +72,12 @@ type
|
||||
DocumentationLabel: TLabel;
|
||||
DocumentationURLLabel: TLabel;
|
||||
FPCVersionLabel: TLabel;
|
||||
LazarusLabel: TLabel;
|
||||
FPCLabel: TLabel;
|
||||
LogoImage: TImage;
|
||||
LogoPage: TPage;
|
||||
miVerToClipboard: TMenuItem;
|
||||
OfficialLabel: TLabel;
|
||||
OfficialURLLabel: TLabel;
|
||||
PaintBox1: TPaintBox;
|
||||
VersionPage: TPage;
|
||||
Panel1: TPanel;
|
||||
PlatformLabel: TLabel;
|
||||
@ -93,6 +92,7 @@ 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);
|
||||
@ -211,6 +211,25 @@ 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
|
||||
|
Loading…
Reference in New Issue
Block a user