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

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.043 c
2-1197979576
istok
2007-12-18 15:06
2008.01.20
верна ли функция


2-1198141918
SKIPtr
2007-12-20 12:11
2008.01.20
Как узнать об изменении CheckBox


15-1197729611
Jade
2007-12-15 17:40
2008.01.20
IP-адреса


6-1178182143
Влад123
2007-05-03 12:49
2008.01.20
Как определить скрытую отправку письма


11-1182526366
lse
2007-06-22 19:32
2008.01.20
goodwell





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский