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

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

# Line 85 | Line 85 | type
85       FAttachment: TFB25Attachment;
86       FTransaction: TFB25Transaction;
87     protected
88 +     function Attachment: IAttachment; override;
89       procedure NeedFullMetadata; override;
90     public
91       constructor Create(Attachment: TFB25Attachment; Transaction: TFB25Transaction;
# Line 127 | Line 128 | uses IBErrorCodes, FBMessages, FBParamBl
128  
129   { TFB25BlobMetaData }
130  
131 + function TFB25BlobMetaData.Attachment: IAttachment;
132 + begin
133 +  Result := FAttachment;
134 + end;
135 +
136   procedure TFB25BlobMetaData.NeedFullMetadata;
137   var
138    BlobDesc: TISC_BLOB_DESC;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines