U>var U> TempSurf:PSurface; U>begin U> GetMem(TempSurf,sizeof(TSurface)); U> TempSurf^.Data:=nil //тут выдаёт ошибку U>end; U>