[JVCL-Checkins] CVS: dev/JVCL3/run JvToolEdit.pas,1.39,1.40 - Fixed Delphi 5 compiler error (TReader.SkipValue)

[Andreas H. <ah...@us...>]

Update of /cvsroot/jvcl/dev/JVCL3/run
In directory sc8-pr-cvs1:/tmp/cvs-serv983/run

Modified Files:
	JvToolEdit.pas 
Log Message:
Fixed Delphi 5 compiler error (TReader.SkipValue)

Index: JvToolEdit.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvToolEdit.pas,v
retrieving revision 1.39
retrieving revision 1.40
diff -C2 -d -r1.39 -r1.40
*** JvToolEdit.pas	12 Jan 2004 10:47:35 -0000	1.39
--- JvToolEdit.pas	12 Jan 2004 17:51:19 -0000	1.40
***************
*** 1709,1715 ****
  end;
  
  procedure TJvCustomComboEdit.ReadNumGlyphs(Reader: TReader);
  begin
!   Reader.SkipValue;
  end;
  
--- 1709,1719 ----
  end;
  
+ 
+ type
+   TOpenReader = class(TReader); // (ahuser) Delphi 5's TReader.SkipValue is protected  
+ 
  procedure TJvCustomComboEdit.ReadNumGlyphs(Reader: TReader);
  begin
!   TOpenReader(Reader).SkipValue;
  end;