Hello.
At First excuse-me for my bad English...
I'am working in a project using the TSimpleGraph component. The thematic one of the project is "Yard Plannig"; It's similar to a parking of cars, but with containers.
I'am creating aprox. 1200 objects in the simpleGraph. All it's working OK, but reviewing the application i think that in the Destroy procedure of the object TSimpleGraph the created objects are not being freed.
Thare are a simple test to make.
I Have created a Destroy Method in TRectangleNode like:
destructor Destroy; override;
and its corresponding implementation.
When the Destroy procedure of the SimpleGraph object is Executed, the code of TRectangleNode.destroy never is Execute and the object is not freed.
To ensure this i have executed the project using AQTime (Profiler) and it's confirmed this.