166 |
|
|
167 |
|
FDefaultCompletion := DefaultCompletion; |
168 |
|
|
169 |
< |
if Length(FAttachments) > 0 then |
170 |
< |
StartMultiple |
171 |
< |
else |
169 |
> |
if Length(FAttachments) = 1 then |
170 |
|
with Firebird30ClientAPI do |
171 |
|
begin |
172 |
|
FTransactionIntf := (FAttachments[0] as TFB30Attachment).AttachmentIntf.startTransaction(StatusIntf, |
173 |
|
(FTPB as TTPB).getDataLength,BytePtr((FTPB as TTPB).getBuffer)); |
174 |
|
Check4DataBaseError; |
175 |
< |
end; |
175 |
> |
end |
176 |
> |
else |
177 |
> |
StartMultiple; |
178 |
|
SignalActivity; |
179 |
|
Inc(FSeqNo); |
180 |
|
end; |