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

Visible property is by default true.

Browse Source 
git-svn-id: trunk@1142 -
This commit is contained in:
lazarus 2002-02-09 01:47:57 +00:00
parent 94daa35ae0
commit 59714a7be6
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/include/control.inc
View File

@ -1661,16 +1661,14 @@ begin
FAnchors := [akLeft,akTop];
FAlign := alNone;
FColor := clWindow;
// initial control isn't visible (It isn't created yet)
FVisible := False;
// FOwner := AOwner;
FVisible := true;
FParentShowHint := True;
FWindowProc := @WndProc;
FCursor := crDefault;
FFont := TFont.Create;
//FFont.OnChange := @FontChanged;
FIsControl := False;
FEnabled := True; {Default}
FEnabled := True;
end;
{------------------------------------------------------------------------------}
@ -1805,6 +1803,9 @@ end;
{ =============================================================================
$Log$
Revision 1.82 2002/09/07 19:35:42 lazarus
Visible property is by default true.
Revision 1.81 2002/09/06 22:32:21 lazarus
Enabled cursor property + property editor.