Zur Sichtbarkeit von TYPEN

[sx2008]

Du kannst auch ein "richtiges" Interface deklarieren:

Delphi-Quellcode:

interface

IContact = Interface(IUnknown)
  function GetPhoneNo:WideString;
  ...
end;

function CreateNewContact:IContact;

implementation
 
type

TContact = class(TComObject, IContact)
  function GetPhoneNo:WideString;
end;

Damit lassen sich alle Implementationsdetails komplett verbergen.