I'm implementing my IDropTarget based on: How can I allow a form to accept file dropping without handling Windows messages? The implementation by David works fine. however the IDropTarget (TInter...

i have two units, first one, my interface: use personas interface type Tllave = array[0..31] of byte; Tdatos = array of byte; ImyInterface = interface(IInterface) function nombre : string...

I am trying to declare a custom list of interfaces from which I want to inherit in order to get list of specific interfaces (I am aware of IInterfaceList, this is just an example). I'm using Delphi...

In my code I use a small data-storing class, which is created in different places. To avoid memory leaks and simplify things, I want to use reference counting, so I did type TFileInfo = class (TIn...

i have a class based on TInterfacedObject. i add it to TTreeNode's Data property. TFacilityTreeItem=class(TInterfacedObject) private m_guidItem:TGUID; m_SomeOtherNode:TTreeNode; public end; i ...