DebugTut: TDirectory ptr example