mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 14:01:49 +02:00
IDE: Simplify AboutForm.
git-svn-id: trunk@63796 -
This commit is contained in:
parent
e73e881289
commit
70862bc995
@ -8,6 +8,8 @@ object AboutForm: TAboutForm
|
|||||||
Caption = 'About Lazarus'
|
Caption = 'About Lazarus'
|
||||||
ClientHeight = 390
|
ClientHeight = 390
|
||||||
ClientWidth = 470
|
ClientWidth = 470
|
||||||
|
Constraints.MinHeight = 390
|
||||||
|
Constraints.MinWidth = 470
|
||||||
OnClose = FormClose
|
OnClose = FormClose
|
||||||
OnCreate = AboutFormCreate
|
OnCreate = AboutFormCreate
|
||||||
OnShow = FormShow
|
OnShow = FormShow
|
||||||
|
@ -192,11 +192,6 @@ begin
|
|||||||
|
|
||||||
VersionLabel.Font.Color:= clWhite;
|
VersionLabel.Font.Color:= clWhite;
|
||||||
|
|
||||||
Width:= Scale96ToForm(470);
|
|
||||||
Height:= Scale96ToForm(390);
|
|
||||||
Constraints.MinWidth:= Width;
|
|
||||||
Constraints.MinHeight:= Height;
|
|
||||||
|
|
||||||
AboutMemo.Lines.Text:=
|
AboutMemo.Lines.Text:=
|
||||||
Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding]);
|
Format(lisAboutLazarusMsg,[DoubleLineEnding,DoubleLineEnding,DoubleLineEnding]);
|
||||||
|
|
||||||
|
@ -3,8 +3,6 @@ object SplashForm: TSplashForm
|
|||||||
Height = 300
|
Height = 300
|
||||||
Top = 370
|
Top = 370
|
||||||
Width = 450
|
Width = 450
|
||||||
HorzScrollBar.Page = 300
|
|
||||||
VertScrollBar.Page = 450
|
|
||||||
BorderStyle = bsNone
|
BorderStyle = bsNone
|
||||||
Caption = 'Lazarus'
|
Caption = 'Lazarus'
|
||||||
ClientHeight = 300
|
ClientHeight = 300
|
||||||
|
Loading…
Reference in New Issue
Block a user