From: <ah...@us...> - 2009-01-06 17:17:15
|
Revision: 12130 http://jvcl.svn.sourceforge.net/jvcl/?rev=12130&view=rev Author: ahuser Date: 2009-01-06 17:17:02 +0000 (Tue, 06 Jan 2009) Log Message: ----------- Fixed two default property values Modified Paths: -------------- trunk/jvcl/run/JvMemo.pas Modified: trunk/jvcl/run/JvMemo.pas =================================================================== --- trunk/jvcl/run/JvMemo.pas 2009-01-06 16:57:19 UTC (rev 12129) +++ trunk/jvcl/run/JvMemo.pas 2009-01-06 17:17:02 UTC (rev 12130) @@ -53,9 +53,6 @@ Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, StdCtrls, JvCaret, JvTypes, JvComponent, JvExStdCtrls; -//const (ahuser): not used -// WM_AUTOBAR = WM_USER + 43; - type TJvCustomMemo = class(TJvExCustomMemo) private @@ -109,7 +106,7 @@ protected property Caret: TJvCaret read FCaret write SetCaret; property HideCaret: Boolean read FHideCaret write SetHideCaret default False; - property MaxLines: Integer read FMaxLines write SetMaxLines; + property MaxLines: Integer read FMaxLines write SetMaxLines default 0; property HotTrack: Boolean read FHotTrack write SetHotTrack default False; property Lines: TStrings read GetLines write SetLines; property Transparent: Boolean read FTransparent write SetTransparent default False; @@ -121,7 +118,7 @@ TJvMemo = class(TJvCustomMemo) published - property AutoSize; + property AutoSize default False; // TCustomMemo.Create sets AutoSize:=False property Caret; property ClipboardCommands; property MaxLines; This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |