Не могу разобраться со Stretchdraw()

[ollleg]

У меня есть код:

TPicture *pct=new TPicture;
pct->LoadFromFile(ExtractFileDir(Application->ExeName)+"\\Images\\col.bmp");
canv -> StretchDraw( Rect(250,0,350,50), pct -> Bitmap );
delete pct;

В рисунке содержится градиент от синего к белому, но при вызове функции появляется только монохромный прямоугольник с одной частью чёрного а другой белого цвета, помогите разобраться в чем дело.
Посмотреть вложение 1.bmp - непонятно что выводит
Посмотреть вложение col.bmp - исходный рисунок который нужно вывести

 

[ollleg]

можете не отвечать, сам разобрался, я просто рисовал на канве монохромного битмепа