Работа с графикой Опции

[n00b]

Подскажите как работать с графикой, например перемещение картинки по экрану. Я вижу это так:

assign (f,'file');
reset(f);

//загрузка картинки в матрицу
for y:=1 to 50 do
for x:=1 to 50 do
read (f, color);
mas (x,y):=color;

//вывод картинки на экран
for y:=1 to 50 do
for x:=1 to 50 do
PutPixel (x,y,color);

но в таком случае нужно "затереть" те точки на, которых была картинка, точками фона. Сам понимаю что это очень примитивно, по этому и обращаюсь к Вам за помощью.