Код для выведения обводки и фона на экран - Pascal

Формулировка задачи:

Здраствуйет уважаемая администрация и программисты. Я хочю обратится к вам с вопросом связанным с модулем Graph. Я в принципе понял мой вопрос, но хочю убедиться что это так. Я использовал код для выведения обводки и фона на экран =; Фон появился а обводки нет ни прикаком стиле или цвете. Даже при отключённом фоне всё равно обводки нет! Как я понял обводка обводит фигуры в программе и поэтому не появляется.

Program VideoDriver;
Uses
 Graph, CRT;
Var
 GraphDriver, GraphMode: Integer;
Begin
GraphDriver := Detect;
GraphMode := 0;
InitGraph(GaphDriver, GraphMode, 'C:\BP\BGI');
SetColor(Red)
SetLineStyle(CenterLn, 0, ThickWidth);
ReadKey;
CloseGraph;
End.

Решение задачи: «Код для выведения обводки и фона на экран»

Листинг программы

Program VideoDriver; 
Uses 
 Graph, CRT; 
Var 
 GraphDriver, GraphMode: Integer; 
Begin 
GraphDriver := Detect; 
GraphMode := 0; 
InitGraph(GaphDriver, GraphMode, 'C:\BP\BGI');    {переменной GaphDriver не существует. Возможно надо graphdriver :) }
SetColor(Red)     {А тут ожидается ';'}
SetLineStyle(CenterLn, 0, ThickWidth); 
ReadKey; 
CloseGraph; 
End.

Объяснение кода листинга программы

Программа определяет две переменные: GraphDriver и GraphMode.
Значение GraphDriver устанавливается в Detect, а GraphMode в 0.
Используется функция InitGraph для инициализации графического драйвера с указанным именем файла.
Ожидается точка с запятой после строки с функцией InitGraph.
Используется функция SetColor для установки цвета на красный.
Используется функция SetLineStyle для установки стиля линии на центрированную линию, толщиной 0, длиной 1.
Используется функция ReadKey для ожидания нажатия клавиши.
Используется функция CloseGraph для закрытия графического контекста.
Программа завершается.