Browse Source

* Changed all occurences of TAbstractReader to TReader, as FCL streaming
is source compatible to VCL streaming now (for quite a while, BTW)

sg 25 years ago
parent
commit
664bc98f53
2 changed files with 12 additions and 4 deletions
  1. 6 2
      fcl/db/db.pp
  2. 6 2
      fcl/db/fields.inc

+ 6 - 2
fcl/db/db.pp

@@ -198,7 +198,7 @@ type
     function HasParent: Boolean; override;
     procedure Notification(AComponent: TComponent; Operation: TOperation); override;
     procedure PropertyChanged(LayoutAffected: Boolean);
-    procedure ReadState(Reader: TAbstractReader); override;
+    procedure ReadState(Reader: TReader); override;
     procedure SetAsBoolean(AValue: Boolean); virtual;
     procedure SetAsDateTime(AValue: TDateTime); virtual;
     procedure SetAsFloat(AValue: Extended); virtual;
@@ -1260,7 +1260,11 @@ end.
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:32:56  michael
+  Revision 1.3  2000-09-02 09:36:36  sg
+  * Changed all occurences of TAbstractReader to TReader, as FCL streaming
+    is source compatible to VCL streaming now (for quite a while, BTW)
+
+  Revision 1.2  2000/07/13 11:32:56  michael
   + removed logs
  
 }

+ 6 - 2
fcl/db/fields.inc

@@ -406,7 +406,7 @@ begin
       FDataset.DataEvent(deDatasetchange,0);
 end;
 
-procedure TField.ReadState(Reader: TAbstractReader); 
+procedure TField.ReadState(Reader: TReader); 
 
 begin
   //!! To be implemented
@@ -1752,7 +1752,11 @@ end;
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:32:56  michael
+  Revision 1.3  2000-09-02 09:36:36  sg
+  * Changed all occurences of TAbstractReader to TReader, as FCL streaming
+    is source compatible to VCL streaming now (for quite a while, BTW)
+
+  Revision 1.2  2000/07/13 11:32:56  michael
   + removed logs
  
 }