Цитата:
|
Сообщение от lmikle
Ну, в принципе, должно потихоньку наедать память. Ты же в лог все пишешь, вот он и растет. Плюс еще есть некоторые особенности работы менеджера памяти, когда заместо переиспользования блока он может выделять новые блоки. Если удалит текст из Memo, потом программу свернуть и развернуть, то выделенная память должна уменьшиться. Попробуй.
|
Спасибо, да темпы нагрузки стали не такими но даже если убираю лог всё равно память уходит(
я думаю забирается пакетами вот в этом месте:
PHP код:
procedure TForm1.ClientRead(Sender: TObject; Socket: TCustomWinSocket);
var
len : integer;
Buffer : TByteArray;
begin
setLength(Buffer, Socket.ReceiveLength);
len := Socket.ReceiveBuf(Buffer[0], Socket.ReceiveLength);
end;
Вопрос как всё это дело почистить?)