blob: 2e30150843e90a01e5d47c4d797e52652dc0a501 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{$mode delphi}
type
IGUserData = interface(IInvokable)
['{35377B66-6B1B-11D9-8827-00055DDDEA00}']
(* userdata *)
function GetUserData(key: UTF8String): IInterface;
procedure SetUserData(key: UTF8String; const v: IInterface);
function GetUserDataVariant(key: UTF8String): Variant;
procedure SetUserDataVariant(key: UTF8String; const v: Variant);
property UserData[key: UTF8String]: IInterface read GetUserData write SetUserData;
end;
begin
end.
|
