paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 13:50:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: show about text in paragraphs

Browse Source 
git-svn-id: trunk@11094 -
This commit is contained in:
vincents 2007-05-07 07:56:01 +00:00
parent d0c8b02aab
commit 44b95915d1
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ide/aboutfrm.pas
View File

@ -100,10 +100,12 @@ begin
end;
procedure TAboutForm.AboutFormCreate(Sender:TObject);
const
DoubleLineEnding = LineEnding + LineEnding;
{The compiler generated date string is always of the form y/m/d.
This function gives it a string respresentation according to the
shortdateformat}
function GetLocalizedBuildDate(): string;
var
BuildDate: string;
@ -136,11 +138,11 @@ begin
Constraints.MinWidth:= 600;
Constraints.MinHeight:= 300;
AboutMemo.Lines.Text:=Format(lisAboutLazarusMsg,[LineEnding,LineEnding,LineEnding])
+LineEnding+LineEnding
AboutMemo.Lines.Text:=
Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding])
+DoubleLineEnding
+'Official: http://sourceforge.net/projects/lazarus/'+LineEnding
+'Tutorials: http://lazarus-ccr.sourceforge.net'+LineEnding
;
+'Tutorials: http://lazarus-ccr.sourceforge.net'+LineEnding;
LoadContributors;
LoadAcknowledgements;
CloseButton.Caption:=lisClose;