{ %VERSION=1.1 } type tmyinterface = interface procedure p(p : longint); // Delphi allows this end; begin end.