Fix compile with 3.0.4

git-svn-id: trunk@64317 -
This commit is contained in:
martin 2021-01-01 16:20:04 +00:00
parent 7ec8d3b74b
commit beee215ea3

View File

@ -291,7 +291,7 @@ type
procedure DefineBinaryProperty(const Name: string;
{%H-}ReadData, {%H-}WriteData: TStreamProc;
{%H-}HasData: Boolean); override;
procedure FlushBuffer; override;
procedure FlushBuffer; {$IF FPC_FULLVERSION >= 30200}override;{$ENDIF}
property DefinePropertyNames: TStrings read FDefinePropertyNames;
end;