Есть такой код:

TRGB *ptr;
TRGB px;
const int w=InBmp->Width;
const int h=InBmp->Height;
OutBmp=new Graphics::TBitmap();
OutBmp->PixelFormat=pf8bit;
OutBmp->Width=w;
OutBmp->Height=h;


BYTE *mas;
mas = new BYTE [w*h];
BYTE tmp;
for(int y=0;y<h;y++)
{
ptr=(TRGB *)InBmp->ScanLine[h-y-1];
for(int x=0;x<w;x++)
{
px=(TRGB)ptr[x];
tmp=(px.r+px.g+px.b)/3;
mas[x+w*y]=tmp;

}
}

typedef struct {
TLogPalette lpal;
TPaletteEntry dummy[256];
} LogPal;

LogPal GrayPal;
GrayPal.lpal.palVersion = 0x300;
GrayPal.lpal.palNumEntries = 256;
//Заполняем палетту серым веществом
PALETTEENTRY *pe=GrayPal.lpal.palPalEntry;
for(int i=0; i < 256; i++)
{
pe .peRed=i;
pe.peGreen=i;
pe.peBlue=i;
pe.peFlags=0;
}
//Прицепляем патетту к битмапу
OutBmp->Palette=CreatePalette(&GrayPal.lpal);

// Получаем адрес на массив пикселов DIB секции битмапа
::BITMAP bmp = { 0 };
GetObject(OutBmp->Handle,sizeof(::BITMAP),&bmp);


//копируем из своего массива байтов в битмап
memcpy(bmp.bmBits,mas,w*h);

OutImage->Picture->Bitmap->Assign(OutBmp);
OutBmp->SaveToFile(OutEdit->Text);

delete [] mas;

Конвертирует, но выходной битмап покарёженный получается

В этом топике исходный битмап вложен в следующем - то,
что получается
В чём грабли?
C ув. Tors

Да - забыл:
TRGB:

struct TRGB
{
BYTE b,g,r;
};

C ув. Tors

Сканлинии должны быть выровнены под границе в 32 бита.
То есть если у тебя ширина картинки 38 пикселей, надо сканлинии выравнивать по границе в 40 пикселей

Не понял, какая зависимость между 32 битами,
реальной шириной 38 пикселей и 40 пикселями?

C ув. Tors