NAME: GetLineSettings

     USE: This procedure will return the current line style, pattern
          and thickness as set by the SetLineStyle procedure.

     DEPENDENCY:  Must first be in graphics mode.  The unit Graph
                  must also be placed in the uses section. Line
                  information is returned through the predifined
                  LineSettingsType record;

                       LineSettingsType = Record
                          LineStyle : Word;
                          Pattern   : Word;
                          Thickness : Word;
                       end;

     SYNTAX: GetLineSettings(Var LineInfo : LineSettingsType)