[fpc-pascal] Interface reference counting

[dmitry boyarintsev]

> var
>   d3d: IDirect3D9 = nil; // Direct3D interface
no need in this.
any interface type variable is always initialized with 'nil' value.