[Jcl-checkins] jcl/source/windows JclRegistry.pas,1.14,1.15

[Robert R. <rro...@us...>]

Update of /cvsroot/jcl/jcl/source/windows
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18848/source/windows

Modified Files:
	JclRegistry.pas 
Log Message:
rollback to rev. 1.13 state

Index: JclRegistry.pas
===================================================================
RCS file: /cvsroot/jcl/jcl/source/windows/JclRegistry.pas,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** JclRegistry.pas	28 May 2004 14:18:20 -0000	1.14
--- JclRegistry.pas	31 May 2004 22:45:07 -0000	1.15
***************
*** 125,129 ****
  procedure RegWriteMultiString(const RootKey: DelphiHKEY; const Key, Name: string; const Value: TStrings); overload;
  
! procedure RegWriteBinary(const RootKey: DelphiHKEY; const Key, Name: string; var Value; const ValueSize: Cardinal);
  
  function RegGetValueNames(const RootKey: DelphiHKEY; const Key: string; const List: TStrings): Boolean;
--- 125,129 ----
  procedure RegWriteMultiString(const RootKey: DelphiHKEY; const Key, Name: string; const Value: TStrings); overload;
  
! procedure RegWriteBinary(const RootKey: DelphiHKEY; const Key, Name: string; const Value; const ValueSize: Cardinal);
  
  function RegGetValueNames(const RootKey: DelphiHKEY; const Key: string; const List: TStrings): Boolean;
***************
*** 1185,1189 ****
  //--------------------------------------------------------------------------------------------------
  
! procedure RegWriteBinary(const RootKey: DelphiHKEY; const Key, Name: string; var Value; const ValueSize: Cardinal);
  begin
    InternalRegWriteA(RootKey, Key, Name, REG_BINARY, Value, ValueSize);
--- 1185,1189 ----
  //--------------------------------------------------------------------------------------------------
  
! procedure RegWriteBinary(const RootKey: DelphiHKEY; const Key, Name: string; const Value; const ValueSize: Cardinal);
  begin
    InternalRegWriteA(RootKey, Key, Name, REG_BINARY, Value, ValueSize);
***************
*** 1374,1379 ****
  
  // $Log$
! // Revision 1.14  2004/05/28 14:18:20  obones
! // BCB compatibility, replaced const by var (see QC7224)
  //
  // Revision 1.13  2004/05/19 21:43:36  rrossmair
--- 1374,1379 ----
  
  // $Log$
! // Revision 1.15  2004/05/31 22:45:07  rrossmair
! // rollback to rev. 1.13 state
  //
  // Revision 1.13  2004/05/19 21:43:36  rrossmair