Subject | Redeclared property in TIB_ControlDataLink |
---|---|
Author | Calin Iancu, Pirtea |
Post date | 2005-07-22T07:39:11Z |
Jason,
I got bitten by a little problem in TIB_ControlDataLink and I'm
checking whether my fix is not going to brake something else.
I'll try explaining my problem 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.
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?
Cheers,
Calin Pirtea
COMMUNICARE DEVELOPMENT TEAM
Communicare Systems Pty Ltd
Australia
08 9332 2433
041 9906 150
08 9310 1516 (fax)
I got bitten by a little problem in TIB_ControlDataLink and I'm
checking whether my fix is not going to brake something else.
I'll try explaining my problem 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.
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?
Cheers,
Calin Pirtea
COMMUNICARE DEVELOPMENT TEAM
Communicare Systems Pty Ltd
Australia
08 9332 2433
041 9906 150
08 9310 1516 (fax)