class - TEdit和TQuery

Question

我有课:

TcvDbedit = class(TCustomMaskEdit)
...
private
  ...
  fQuery: TQuery;
  ...
protected
  ...
public
  constructor Create(AOwner: TComponent); override;
  destructor Destroy; override;
  ...
published
  ...
  property DataQuery: TQuery read fQuery write fQuery;
  ...

这样，我就可以将TQuery作为属性，并且可以更改属性查询。我需要其他东西，以更改tQuery的属性并将其保存在dfm中。我不希望TQuery在窗体上可见。实际上，我使用TFDQuery。我该如何实现？

Answer 1

也许您需要SetSubComponent。