IDE : Change on AboutBox

git-svn-id: trunk@22371 -
This commit is contained in:
laurent 2009-11-01 15:25:31 +00:00
parent 143f2846cd
commit 165c3dfdeb
3 changed files with 106 additions and 113 deletions

View File

@ -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

View File

@ -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
]);

View File

@ -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