- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
TServerThread = class(TThread)
private
procedure DoReadData;
protected
ThreadOwner: TIPCServer;
procedure Execute; override;
constructor Create(AThreadOwner: TIPCServer);
destructor Destroy; override;
public
end;
administrator 27.06.2017 00:42 # −1
antipattern 27.06.2017 00:45 # −3
doctor_stertor 24.08.2017 23:17 # 0
destructor Destroy; override;
Зона видимости в данном случае не играет роли, всё равно вызовется деструктор в наследнике.