代码之家 › 专栏 › 技术社区 › mmmm

在Delphi COM向导中使用记录作为属性类型

type-library delphi

mmmm · 技术社区 · 14 年前

我正在尝试设计一个COM库,它使用一个属性返回一个记录。Delphi COM向导允许我创建属性,但是当它被编译时,我得到

[GENTLB Error] Project1.ridl(1): Error saving C:\Users\mark\Documents\RAD Studio\Projects\Test\Project1.tlb: Inconsistent property functions

[
 uuid(24BD89DB-AB22-430C-874C-EC5CEA062E80)
]   
struct Record1   
{
    long Field1;   
};


[
  uuid(FA48C31A-56B8-4A86-8325-5A2000AA77B2),
  helpstring("Interface for XXX Object"),
  oleautomation
]
interface IXXX : IUnknown
{
  [propget, id(0x00000065)]
  HRESULT _stdcall Property1([out, retval] struct Record1* Value);
  [propput, id(0x00000065)]
  struct Record1 _stdcall Property1([in] long Value);
};

有人能看出我做错了什么吗?

1 回复 | 直到 10 年前

Ondrej Kelle 14 年前

[propput, id(0x00000065)]
HRESULT _stdcall Property1([in] struct Record1 Value);

推荐文章

Some1Else · 函数在Delphi中重新创建TForm

2 年前

MarkoZaaz · Delphi TwebuUpdate E2003未声明的标识符_WIN32_FIND_数据

2 年前

Agmcz · Delphi安卓库。so未安装(AAB)

2 年前

nader · 如何使用delphi在web上提交表单

6 年前

Freddie Bell · Delphi中的位补码。(翻译C#运算符)

6 年前

kwadratens · Delphi中的卡方分布函数代码

6 年前

user9672569 · 如何从确定的点向ListView的第三列添加数据?

6 年前

user9672569 · 如何在完整的位图图像中绘制阴影效果?

6 年前

mmmm · MSBuild(用于Delphi)Make-like功能

6 年前

Den · TabTip的大小和位置。Windows 10上的exe(虚拟键盘)?

6 年前