mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 12:18:30 +02:00
13 lines
238 B
ObjectPascal
13 lines
238 B
ObjectPascal
{ %version=1.1}
|
|
{$mode objfpc}
|
|
|
|
type
|
|
ITest = interface
|
|
procedure Put(Key: Integer; Item: IUnknown);
|
|
function Get(Key: Integer): IUnknown;
|
|
property Item[Key: Integer]: IUnknown read Get write Put; default;
|
|
end;
|
|
|
|
begin
|
|
end.
|