ошибка 203 (переполнение кучи) , GetMem

[volvo877]

Цитата Romtek @ 17.01.07, 10:14

компилятор сообщает о незнакомой SafetyPoolSize...

Само собой, эта переменная описана в секции Implementation модуля Memory...

А если вот так, попробуй, что тебе выдаст (у себя проверял, но у меня и первая твоя версия не дает артефактов):

constructor TMyObj.init;
begin
  inherited init;
  if LowMemory then fail
  else New(R);
end;
...
 
constructor TTutorApp.init;
begin
  inherited init;
  list := New(PCollection, Init(10, 5));
  LowMemSize := 1024;
end;

Все остальное - без изменений от программы в сообщении №13...

[Romtek]

Цитата volvo877 @ 17.01.07, 08:52

А чего ты не воспользуешься MemAlloc для того случая, который привел?

Да вот, только сейчас дошло.