* Merging revisions 43211 from trunk:

    ------------------------------------------------------------------------
    r43211 | lacak | 2019-10-17 14:59:25 +0200 (Thu, 17 Oct 2019) | 1 line
    
    fcl-db: sdf: add virtual to ExtractDelimited(). Bug #36190
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@43226 -

packages/fcl-db/src/sdf/sdfdata.pp

@@ -283,7 +283,7 @@ type
     procedure InternalInitFieldDefs; override;
     function BufToStore(Buffer: TRecordBuffer): String; override;
     function StoreToBuf(Source: String): String; override;
-    function ExtractDelimited(const S: String; var Pos: integer): string;
+    function ExtractDelimited(const S: String; var Pos: integer): string; virtual;
   public
     constructor Create(AOwner: TComponent); override;
   published