[JVCL-Checkins] CVS: jvcl/source Changelog.txt,1.47,1.48 JvCurrEdit.pas,1.9,1.10

[Peter T. <pe...@us...>]

Update of /cvsroot/jvcl/jvcl/source
In directory sc8-pr-cvs1:/tmp/cvs-serv6274/source

Modified Files:
	Changelog.txt JvCurrEdit.pas 
Log Message:
Added EnablePopupChange property to TJvCustomCalcEdit (in JvCurrEdit.pas). Set it to true to get notified when changes are done in the popup calculator


Index: Changelog.txt
===================================================================
RCS file: /cvsroot/jvcl/jvcl/source/Changelog.txt,v
retrieving revision 1.47
retrieving revision 1.48
diff -C2 -d -r1.47 -r1.48
*** Changelog.txt	23 Mar 2003 14:09:38 -0000	1.47
--- Changelog.txt	23 Mar 2003 14:31:27 -0000	1.48
***************
*** 1,5 ****
  2003-03-23
  - Removed TJvOpenDialog2000 and TJvSaveDialog2000 from registration in JVCLReg.pas: use TJvOpenDialog and TJvSaveDialog instead. They contain a better implementation of the same things as the xxx2000 versions. // peter3
! 
  2003-03-23
  Modifications from Andreas Hausladen:
--- 1,6 ----
  2003-03-23
  - Removed TJvOpenDialog2000 and TJvSaveDialog2000 from registration in JVCLReg.pas: use TJvOpenDialog and TJvSaveDialog instead. They contain a better implementation of the same things as the xxx2000 versions. // peter3
! - Added EnablePopupChange property to TJvCustomCalcEdit (in JvCurrEdit.pas). Set it to true to get notified when changes are done in the popup calculator // peter3
!  
  2003-03-23
  Modifications from Andreas Hausladen:

Index: JvCurrEdit.pas
===================================================================
RCS file: /cvsroot/jvcl/jvcl/source/JvCurrEdit.pas,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** JvCurrEdit.pas	22 Feb 2003 06:45:21 -0000	1.9
--- JvCurrEdit.pas	23 Mar 2003 14:31:27 -0000	1.10
***************
*** 229,232 ****
--- 229,237 ----
  
    TJvCustomCalcEdit = class(TJvCustomNumEdit)
+   private
+     FEnablePopupChange: boolean;
+   protected
+     procedure PopupChange;override;
+     property EnablePopupChange:boolean read FEnablePopupChange write FEnablePopupChange default false;
    public
      constructor Create(AOwner: TComponent); override;
***************
*** 254,257 ****
--- 259,263 ----
      property DragMode;
      property Enabled;
+     property EnablePopupChange;
      property Font;
      property FormatOnEditing;
***************
*** 988,992 ****
--- 994,1008 ----
  end;
  
+ { TJvCustomCalcEdit }
+ 
+ procedure TJvCustomCalcEdit.PopupChange;
+ begin
+   inherited;
+   if EnablePopupChange then
+     DoChange;
+ end;
+ 
  {$IFDEF WIN32}
+ 
  initialization