官术网_书友最值得收藏!

Interfaces

From the viewpoint of memory management, interfaces in Delphi are implemented as classes with added reference counting. To create an interface, you actually have to create an object of a class, which will get a reference count of 1. If you then assign this interface to another variable, both will point to the same memory and the reference count will be incremented to 2.

There is no equivalent to SetLength or UniqueString that would make a unique copy of an interface. That would require duplicating the underlying object and Delphi has no built-in support for that.

The object implementing the interface is destroyed when its reference count falls to 0:

var
i1, i2: IInterface;
begin
i1 := TInterfacedObject.Create;
// i1 points to an object with reference count 1
i2 := i1;
// both i1 and i2 point to a same object with reference count 2
i1 := nil;
// i2 now points to an object with reference count 1
i2 := nil;
// reference count dropped to 0 and object is destroyed
end;

Although interfaces are very similar to classes, all this reference count management takes its cost. It is implemented with something called interlocked instructions which are a bit slower than normal increment/decrement instructions. I'll discuss this in more detail in Chapter 5, Getting Started with the Parallel World.

This only makes a measurable difference when you are assigning interfaces a lot, but sometimes this is exactly what happens. I'll show an example in the next section.

主站蜘蛛池模板: 太仓市| 老河口市| 休宁县| 阿拉善右旗| 龙井市| 宁乡县| 惠东县| 饶阳县| 洛川县| 深圳市| 德惠市| 札达县| 博兴县| 桃园市| 湖南省| 古交市| 宜君县| 项城市| 兴安盟| 靖西县| 读书| 桐柏县| 当雄县| 河东区| 鄄城县| 梧州市| 永善县| 唐山市| 宁晋县| 敦化市| 朔州市| 齐齐哈尔市| 株洲县| 陕西省| 福安市| 孟州市| 连云港市| 江津市| 石门县| 全州县| 绥宁县|