PROGRAM   SetLnWdh ;
USES   Graph ;

VAR
   G_GraphDriver : Integer ;
   G_GraphMode   : Integer ;
BEGIN
   G_GraphDriver := Detect ;
   G_GraphMode   := Detect ;
   InitGraph ( G_GraphDriver , G_GraphMode , 'C:\Lib\BGI' );


   SetLineStyle ( SolidLn , 0 , NormWidth );
   Line ( 0,0  ,  200,0 );


   SetLineStyle ( SolidLn , 0 , ThickWidth );
   Line ( 0,40  ,  200,40 );


   ReadLn ;
   CloseGraph ;
END.
