Question

I want to know whether we can do such in Delphi: I have a private procedure:

procedure SetMySend(const oValue: TTM_MySend_Profile;
    displayValue: string =  ... );

我拥有公共财产:

property MySend: TTM_MySend_Profile displayLocateID  ... 
    read FMySend write SetMySend;

Can 我在这里作一个参数显示器,作为固定装置的第二参数? 我无法得到这一汇编。

我不能说出这样做的正确方法,并想知道我是否能够在德尔菲斯这样做。帮助!

Answer 1

A property setter for a property takes only one parameter, of the same type as the property. There is no syntax that would allow you to write the type of code you are attempting to write. Note that I am ignoring array properties which are not pertinent here.

你们需要做的是写一部专栏,为您的<代码>SetMySend功能提供额外的参数。

procedure SetMySend(const Value: TTM_MySend_Profile; 
    const displayValue: string); overload;
procedure SetMySend(const Value: TTM_MySend_Profile); overload;
property MySend: TTM_MySend_Profile read FMySend write SetMySend;

之后,在执行过程中,你写道:

procedure TMyClass.SetMySend(const Value: TTM_MySend_Profile);
begin
  SetMySend(Value,  ... );
end;

您可劫持index specifiers,以实施类似内容,但我不建议这样做。

友情链接