Subject | Redeclared property in TIB_ControlDataLink |
---|---|
Author | Calin Pirtea |
Post date | 2005-08-22T01:11:10Z |
Jason,
I found the property "Control" declared both in TIB_ControlDataLink and TIB_InterfaceDataLink.
This is an extract from the definition:
TIB_InterfaceDataLink = class(TIB_DataLink)
private
FControl: TWinControl;
public
property Control: TWinControl read FControl write FControl;
end;
TIB_ControlDataLink = class(TIB_InterfaceDataLink)
private
FControl: TWinControl;
public
property Control: TWinControl read FControl write FControl;
end;
My question is why? Is this on purpose or is it a mistake? Should I
remove the property from TIB_ControlDataLink or
TIB_InterfaceDataLink?
Using these objects:
MyObject: TIB_FieldDataLink;
MyWinControl: TWinControl;
TIB_FieldDataLink = class(TIB_ControlDataLink)
TIB_ControlDataLink = class(TIB_InterfaceDataLink)
TIB_InterfaceDataLink = class(TIB_DataLink)
MyObject.Control = MyWinControl
TIB_InterfaceDataLink(MyObject).Control = nil
Same object has 2 different values in the "same" property.
I say "same" because it is not really the same.
Cheers,
Calin Pirtea
COMMUNICARE DEVELOPMENT TEAM
Communicare Systems Pty Ltd
Australia
08 9332 2433
041 9906 150
08 9310 1516 (fax)
I found the property "Control" declared both in TIB_ControlDataLink and TIB_InterfaceDataLink.
This is an extract from the definition:
TIB_InterfaceDataLink = class(TIB_DataLink)
private
FControl: TWinControl;
public
property Control: TWinControl read FControl write FControl;
end;
TIB_ControlDataLink = class(TIB_InterfaceDataLink)
private
FControl: TWinControl;
public
property Control: TWinControl read FControl write FControl;
end;
My question is why? Is this on purpose or is it a mistake? Should I
remove the property from TIB_ControlDataLink or
TIB_InterfaceDataLink?
Using these objects:
MyObject: TIB_FieldDataLink;
MyWinControl: TWinControl;
TIB_FieldDataLink = class(TIB_ControlDataLink)
TIB_ControlDataLink = class(TIB_InterfaceDataLink)
TIB_InterfaceDataLink = class(TIB_DataLink)
MyObject.Control = MyWinControl
TIB_InterfaceDataLink(MyObject).Control = nil
Same object has 2 different values in the "same" property.
I say "same" because it is not really the same.
Cheers,
Calin Pirtea
COMMUNICARE DEVELOPMENT TEAM
Communicare Systems Pty Ltd
Australia
08 9332 2433
041 9906 150
08 9310 1516 (fax)