вывести *pcx попиксельно на форму

[ropblHbl4]

Доброго времени суток, уважаемые форумчане.
При работе с pcx изображением столкнулся с проблемой его декодирования. Само задание состоит в том, что необходимо считать информацию и пикселях изображения в массив, затем из массива вывести каждый пиксель на форму с помощью функции RGB. Алгоритм кодирования RLE вроде бы прост и понятен. Но я не смог разобраться как именно хранятся байты с информацией о цвете пикселя. Не понимаю что такое "строка разверстки". Привожу нерабочий вариант программы и ошибку, которую она выдает.
Заранее благодарен за помощь. Хотелось бы именно разъяснения по данному вопросу, а не ссылку на информацию о pcx, ибо я не совсем понимаю эту информацию.

fname:= opendialog1.FileName;
assignfile(f1, fname);
reset(f1, 1);
count:= pos('.pcx', fname);
if count > 0 then
begin
 seek(f1, 1);
 blockread(f1, maspixels, 11);
 versionpcx:= maspixels[1]; //версия файла
 coded:=  maspixels[2]; //закодирована ли информация
 bpp:= maspixels[3]; //bit per pixel
 w:= ((maspixels[9] shl 8) or maspixels[8]) - ((maspixels[5] shl 8) or      maspixels[4]) +1;
 h:= ((maspixels[11] shl 8) or maspixels[10]) - ((maspixels[7] shl 8) or   maspixels[6]) +1;

 seek(f1, 65);
 blockread(f1, maspixels, 3);
 nplanes:= maspixels[1];
 bpl:= (maspixels[3] shl 8) or maspixels[2];

 seek(f1, 128);
 x:=1; y:=1;
 while not eof(f1) do
 begin
 blockread(f1, maspixels, 1);
 if ((maspixels[1] and $C0) = $C0) then
 begin
 count:= (maspixels[1] and $3F);
 blockread(f1, maspixels, 1);
 for x:= 1 to count do
    begin
    matrixpcx[y]:= maspixels[1];
    inc(y);
    end
 end
else
    begin
    matrixpcx[y]:= maspixels[1];
    inc(y)
    end
end
   end
else showmessage('Неверный формат') end;

[IMG][/IMG]

[kropotkina-alice]

Поищите бесплатную библиотеку GraphicEx.
С её помощью можно работать с РСХ, как с обычным ВМР.
Кстати, она с исходниками...
(Код на форуме оформляется при помощи тега, см. значок # в шапке окна редактирования)

[ropblHbl4]

Сообщение от kropotkina-alice

Поищите бесплатную библиотеку GraphicEx.
С её помощью можно работать с РСХ, как с обычным ВМР.
Кстати, она с исходниками...
(Код на форуме оформляется при помощи тега, см. значок # в шапке окна редактирования)

Спасибо за ответ. Я так понимаю, данная библиотека позволяет примерно то же, что и Bitmap для BMP? Вся проблема в том, что подобными "облегчителями" жизни пользоваться мне не позволяют (делаю ргз в универе). Помощь требуется в реализации данной задачи стандартными средствами.

(Код на форуме оформляется при помощи тега, см. значок # в шапке окна редактирования)

Впервые здесь. Всё исправил)

[kropotkina-alice]

Я недаром обратила ваше внимание, что GraphicEx поставлялась с исходниками.
То есть там можно кое-что подсмотреть
З.Ы.
А вот тут и вовсе о попиксельном выводе на экран:
http://forum.vingrad.ru/sources/topic-157332.html

[ropblHbl4]

Сообщение от kropotkina-alice

Я недаром обратила ваше внимание, что GraphicEx поставлялась с исходниками.
То есть там можно кое-что подсмотреть
З.Ы.
А вот тут и вовсе о попиксельном выводе на экран:
http://forum.vingrad.ru/sources/topic-157332.html

Спасибо. Буду пробовать). Тему пока не закрываю, может кто-то сталкивался с подобной задачей, и может помочь с кодом..