ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/fbintf/client/3.0/FB30Blob.pas
(Generate patch)

Comparing ibx/trunk/fbintf/client/3.0/FB30Blob.pas (file contents):
Revision 59 by tony, Mon Mar 6 10:20:02 2017 UTC vs.
Revision 60 by tony, Mon Mar 27 15:21:02 2017 UTC

# Line 50 | Line 50 | type
50       FAttachment: TFB30Attachment;
51       FTransaction: TFB30Transaction;
52     protected
53 +     function Attachment: IAttachment; override;
54       procedure NeedFullMetadata; override;
55     public
56       constructor Create(Attachment: TFB30Attachment; Transaction: TFB30Transaction;
# Line 99 | Line 100 | const
100  
101   { TFB30BlobMetaData }
102  
103 + function TFB30BlobMetaData.Attachment: IAttachment;
104 + begin
105 +  Result := FAttachment;
106 + end;
107 +
108   procedure TFB30BlobMetaData.NeedFullMetadata;
109   var stmt: IStatement;
110   begin

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines