Форум: "Начинающим";
Текущий архив: 2008.01.20;
Скачать: [xml.tar.bz2];

Вниз

Уменьшение ресурсов!   Найти похожие ветки 

← →
homm ©   (2007-12-17 22:26) [40]

> [39] tesseract ©   (17.12.07 21:24)
> Видишь ли выделение памяти, в многозадачных системах с контролем
> доступа, - это ОЧЧЧЕНЬ медленная процедура.

Очень медленная… Ну ОЧЕНЬ медленная…

procedure TForm1.Button1Click(Sender: TObject);
var
  T,i: Integer;
  p: THandle;
begin
  T := GetTickCount();
  try
    for i := 0 to 225000 do begin
      P := GlobalAlloc(GMEM_FIXED, 5*1024*1024);
      GlobalFree(P);
    end;
  finally
    ShowMessage(IntToStr(GetTickCount-T));
  end;
end;

Целых 0,000004(4) секунды на одну такую операцию уходит. А теперь представь, что память тки попала в своп за 4 секунды, что работали другие приложения…


> Но меня смущает TBitmap, который славен тем, что норовит
> к самой простой операции прицепить кучу "самодеятельности".

Вот тут согласен полностью.


> Поиграйся с глобальной памятью - поймешь почему photoshop
> при старте под себя хапает

Неа, не понял :( Фотошоп у меня вообще при каждом старте ругается, что у меня подкачка отключена. Дурень, ему не ведомо, что у меня 2 гектара :)

---

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

Форум: "Начинающим";
Текущий архив: 2008.01.20;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.51 MB
Время: 0.048 c