ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/client/FBActivityMonitor.pas
(Generate patch)

Comparing ibx/trunk/fbintf/client/FBActivityMonitor.pas (file contents):
Revision 56 by tony, Mon Mar 6 10:20:02 2017 UTC vs.
Revision 87 by tony, Mon Jan 1 11:31:26 2018 UTC

# Line 308 | Line 308 | end;
308  
309   function TInterfaceOwner.HasInterface(index: integer): boolean;
310   begin
311 <  Result := FInterfaces[index] <> nil;
311 >  Result := (Length(FInterfaces) > 0) and (FInterfaces[index] <> nil);
312   end;
313  
314   procedure TInterfaceOwner.Remove(intf: TInterfacedObject);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines