Delphi开发ActiveX使用定义的属性

Delphi开发ActiveX使用定义的属性,
就是定义另一方法来操作属性

---

帮顶

---

为什么这儿无人问津呀？

---

主要是问题描述不清楚

---

引用

主要是问题描述不清楚

我问的是ActiveX里面定义的属性怎么在组内部使用，比如：在里边定义了一个属性Property，那么在一个方法里怎么使用这个属性，如对它进行加1操作。

---

为什么没人理呀？都沉下去了

---

我想结贴撒分儿，都没有人来接吗？

---

属性应该对应一个中间变量,你操作中间变量就是设置属性吧,例如:

sProperty:WideString;

property Property: WideString read Get_Property write Set_Property;


function TxxFormX.Get_Property: WideString;
begin
  Result := sProperty;
end;

procedure TxxFormX.Set_Property(const Value: WideString);
begin
  sProperty := Value;
end;

---

引用

属性应该对应一个中间变量,你操作中间变量就是设置属性吧,例如:

sProperty:WideString;

property Property: WideString read Get_Property write Set_Property;


function TxxFormX.Get_Property: WideString;
begin
  Result := sProperty;
end;

procedure TxxFormX.Set_Property(const Value: WideString);
begin
  sProperty := Value;
end;

好像只能这么做，我是这么用的，只能这样做才能在