在标签页上重现按钮操作

Question

在LineDetails表单上，我们具有标签页[Areas]。在该标签页下方是[读取区域]按钮。该按钮是多余的，不需要它，因为应该在打开选项卡页[Areas]时执行单击该按钮时发生的操作。

[Control("Button")]
class ReadCommonAreas
{
void clicked()
{
ContractArea contractArea;
AmountMST sumContractArea;

super();

ContractLine_ds.readCommonAreas(ContractLine);
h1_h2.realValue(ContractLine_ds.h1_h2(ContractLine));
efa.realValue(ContractLine_ds.efa(ContractLine));
bfa.realValue(ContractLine_ds.bfa(ContractLine));
mfa.realValue(ContractLine_ds.mfa(ContractLine));
sumArea.realValue(h1_h2.realValue() + efa.realValue() + bfa.realValue() + mfa.realValue());

while select AreaSelector, sum(RentalValue)
from contractArea
group by AreaSelector
where contractArea.ContractId == Contract.ContractId
&& contractArea.RentalObjectId == ContractLine.RentalObjectId
{
sumContractArea += contractArea.RentalValue;
switch (contractArea.AreaSelector)
{
case AreaSelector::CommonAreaBuilding :
contractAreaBFA.realValue(contractArea.RentalValue);
break;
case AreaSelector::CommonAreaSection :
contractAreaEFA.realValue(contractArea.RentalValue);
break;
case AreaSelector::PrimaryArea, AreaSelector::SecondaryArea :
contractAreaH1_H2.realValue(contractArea.RentalValue);
break;
case AreaSelector::CommonAreaFixed :
contractAreaMFA.realValue(contractArea.RentalValue);
break;
}
}
contractAreaSum.realValue(sumContractArea);
}

}

如何在单击“区域”时显示类似单击“阅读区域”时那样的信息？

然后，我将删除“读取区域”按钮。

Answer 1

只需按下Read Areas按钮Visible = No即可将其隐藏。

然后在Areas标签页上，覆盖pageActivated()方法并执行ReadAreas.clicked()。这样，核心代码就可以保持原样。

您应该考虑的是，如果用户每次单击Areas按钮时都在Read Areas页面上关闭标签/ ...，不确定是否有问题。

在适当的地方使用事件处理程序等。这只是我最不习惯的方法。