paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-02 13:10:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ everyting compiles again

Browse Source
This commit is contained in:
michael 2000-03-14 19:06:04 +00:00
parent cadf4cc024
commit 602ba37d6b
2 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fcl/db/db.pp
View File

@ -198,7 +198,7 @@ type
function HasParent: Boolean; override;
procedure Notification(AComponent: TComponent; Operation: TOperation); override;
procedure PropertyChanged(LayoutAffected: Boolean);
procedure ReadState(Reader: TReader); override;
procedure ReadState(Reader: TAbstractReader); override;
procedure SetAsBoolean(AValue: Boolean); virtual;
procedure SetAsDateTime(AValue: TDateTime); virtual;
procedure SetAsFloat(AValue: Extended); virtual;
@ -952,7 +952,7 @@ type
property RecNo: Longint read FRecNo write FRecNo;
property RecordSize: Word read FRecordSize;
property State: TDataSetState read FState;
property Fields : TFields Read FFieldList;
// property Fields : TFields Read FFieldList;
property Filter: string read FFilterText write FFilterText;
property Filtered: Boolean read FFiltered write FFiltered default False;
property FilterOptions: TFilterOptions read FFilterOptions write FFilterOptions;
@ -1260,7 +1260,10 @@ end.
{
$Log$
Revision 1.8 2000-01-07 01:24:32 peter
Revision 1.9 2000-03-14 19:06:04 michael
+ everyting compiles again
Revision 1.8 2000/01/07 01:24:32 peter
* updated copyright to 2000
Revision 1.7 2000/01/06 01:20:32 peter

7
fcl/db/fields.inc
View File

@ -406,7 +406,7 @@ begin
FDataset.DataEvent(deDatasetchange,0);
end;
procedure TField.ReadState(Reader: TReader);
procedure TField.ReadState(Reader: TAbstractReader);
begin
//!! To be implemented
@ -1752,7 +1752,10 @@ end;
{
$Log$
Revision 1.7 2000-01-07 01:24:32 peter
Revision 1.8 2000-03-14 19:06:04 michael
+ everyting compiles again
Revision 1.7 2000/01/07 01:24:32 peter
* updated copyright to 2000
Revision 1.6 2000/01/06 01:20:32 peter