как преобразовать байты в hex запись??

[Galatimus]

как преобразовать байты в hex запись?? И массив байт должен быть из составляющих RGB?
вот получаю массив как преобразовать то .. не пойму

var
A: Array [0..63,0..24] of Byte; // массив с байтами рисунка.
p:string;
i, j: Integer;
R, G, B: Byte;
Color: TColor;
begin

for i := 0 to Image3.Height - 1 do

for j := 0 to Image3.Width - 1 do
begin
Color := Image3.Canvas.Pixels[j, i];
// Получаем составляющие цвета
R := GetRValue(Color);
G := GetGValue(Color);
B := GetBValue(Color);
//p:=p+inttohex(a[i,j],2)+'';
p:=p+inttostr(a[i,j]);

// Теперь делаем с ними, что надо. Например, сохраняем в массив.

end;

Form1.RichEdit1.Lines.Add(p);

//Form1.RichEdit1.Lines.Add(IntToStr(R) + IntToStr(G)+IntToStr(B));
end;

т.e как как составляющие цвета RGB сохранить в массив ???
и вывести его например в memo??

[Stilet]

как преобразовать байты в hex запись??

IntToHex(число,2)

даст строку с двумя символами, олицетворяющую число 32 бита в 16-тиричной системе.

[s-andriano]

Можно и ручками: первый символ - частное от деления байта на 16, а второй - остаток (сдвинутые в район представления символов, т.е. для 0..9 нужно прибавить 48, а для A..F - чуть побольше, кажется, 55).

[Galatimus]

Всем спасибо ... разобрался сам... тему можно закрывать .