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

readonly flag is now only saved if user set

Browse Source 
git-svn-id: trunk@2194 -
This commit is contained in:
mattias 2002-08-17 23:41:06 +00:00
parent 67e947a35b
commit 71fd500f21
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/controls.pp
View File

@ -593,7 +593,7 @@ type
procedure CMVisibleChanged(var Message : TLMessage); message CM_VISIBLECHANGED;
procedure ConstrainedResize(var MinWidth, MinHeight, MaxWidth, MaxHeight : TConstraintSize); virtual;
function GetPalette: HPalette; virtual;
procedure Resize;
procedure Resize; virtual;
procedure RequestAlign; dynamic;
procedure BeginAutoDrag; dynamic;
procedure ChangeBounds(ALeft, ATop, AWidth, AHeight : integer); virtual;
@ -1439,6 +1439,9 @@ end.
{ =============================================================================
$Log$
Revision 1.102 2003/02/26 12:44:52 mattias
readonly flag is now only saved if user set
Revision 1.101 2003/01/01 13:01:01 mattias
fixed setcolor for streamed components