Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.12;
Скачать: CL | DM;

Вниз

Утечка памяти   Найти похожие ветки 

 
panov ©   (2003-05-30 19:38) [40]

Утечки памяти нет.
Это уже много раз обсуждалось.

То, что показывается в "Диспетчер задач"(Task Manager), например, только лишь отображение свойств работы менеджера памяти Windows.

Мернеджер памяти Windows сам занимается возвратом виртуальной памяти в кучу. Алгоритм работы Microsoft не раскрывает.


 
Serginio   (2003-05-30 19:40) [41]

Причем тут LocalAlloc который применяется для списков следящих за кучей ???


 
Набережных С. ©   (2003-05-30 19:55) [42]

>Serginio (30.05.03 19:33)
>Если хочешь могу дать ссылочку на мои изыскания по этому поводу.

Нет, не хочу. Совсем. Своих достаточно.


 
Serginio   (2003-05-30 20:06) [43]


ind:=TSSStream.Create; //массивы выделенной памяти 64кб
d:=GetTickCount;
S:=">>>>>>>>>>>>>>>>>...>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>";
S1:="Мама ";
S2:="мыла ";
S3:="раму";
S4:=#10;
sComp:=S+S1+S2+S3+S4;
for i:=0 to 80000 Do
Begin
ind.Write(S[1],length(s));
ind.Write(S1[1],length(s1));
ind.Write(S2[1],length(s2));
ind.Write(S3[1],length(s3));
ind.Write(S4[1],length(s4));

end;
ind.Free;
0.244 сек

ind2:=TMemoryStream.Create;
d:=GetTickCount;
for i:=0 to 80000 Do
Begin
ind2.Write(S[1],length(s));
ind2.Write(S1[1],length(s1));
ind2.Write(S2[1],length(s2));
ind2.Write(S3[1],length(s3));
ind2.Write(S4[1],length(s4));

end;
d:=GetTickCount-d;
Ind2.Free;
20.67 сек

d:=GetTickCount;
s:="";
for i:=0 to 80000 Do
Begin
S:=S+">>>>>>>>>>>>>>>>>...>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>";
S:=S+"Мама ";
S:=S+"мыла ";
S:=S+"раму";
S:=S+#10;
end;
d:=GetTickCount-d;
0.444 сек.


 
Serginio   (2003-05-30 20:09) [44]

Еще результирующий объем 6 560 082 байта



Страницы: 1 2 вся ветка

Текущий архив: 2003.06.12;
Скачать: CL | DM;

Наверх




Память: 0.54 MB
Время: 0.018 c
3-34727
kdy
2003-05-20 11:56
2003.06.12
При переходе с D3 на D6 перестал работать PREPARE


14-35021
Gerakl
2003-05-27 10:51
2003.06.12
TaTy


14-34980
Мазут Береговой
2003-05-28 23:51
2003.06.12
Вопрос по сканерам.


1-34837
avenger
2003-06-02 15:32
2003.06.12
Как узнать версию программы из неё же?


1-34922
odyssey
2003-06-02 09:42
2003.06.12
ExtractFilePath