Проблемка с памятью
есть класс
type TPro
field COUNT_FRAMES:int
field IMAGE:TImage
end type
type Ololo extends TObject
field PRO:TPro
field X,Y:int
field CurrentFrame:int
method Draw()
DrawImage PRO.IMAGE,X,Y,CurrentFrame
end method
end type
Когда вызывается метод Draw() типа Ololo, прога начинает жрать память , от 58 до 400 мб.
оказалось, что память жрет строчка
DrawImage PRO.IMAGE,x,y,CurrentFrame
|