Скажите, пожалуйста, можно ли в конструкторе Create наследника TClientServerSocket проводить инициализацию данных перед inherited ну т.е. вот так:
| Код |
type
TClientThread = class(TServerClientThread)
...
constructor
TClientThread.Create(AServer: TServer; ACreateSuspended: Boolean;
ASocket: TServerClientWinSocket);
begin
FServer := AServer;
FSendBuffer := TSendBuffer.Create(False);
inherited Create(ACreateSuspended, ASocket);
end;
|
или же все таки лучше так:
| Код |
constructor
TClientThread.Create(AServer: TServer; ACreateSuspended: Boolean;
ASocket: TServerClientWinSocket);
begin
inherited Create(True, ASocket);
FServer := AServer;
FSendBuffer := TSendBuffer.Create(False);
if not ACreateSuspended then
Resume;
end;
|
Если только второй вариант правильный, то почему? |
)