program Minimum_Size_Test; { * test program for the Graph unit } uses Graph; var grDriver, grMode : Integer; begin grDriver := Detect; InitGraph(grDriver, grMode,''); CloseGraph; end.