Код
TPicture *pct=new TPicture;
pct->LoadFromFile(ExtractFileDir(Application->ExeName)+"\\Images\\col.bmp");
canv -> StretchDraw( Rect(250,0,350,50), pct -> Bitmap );
delete pct;
pct->LoadFromFile(ExtractFileDir(Application->ExeName)+"\\Images\\col.bmp");
canv -> StretchDraw( Rect(250,0,350,50), pct -> Bitmap );
delete pct;
В рисунке содержится градиент от синего к белому, но при вызове функции появляется только монохромный прямоугольник с одной частью чёрного а другой белого цвета, помогите разобраться в чем дело.
Нажмите для просмотра прикрепленного файла - непонятно что выводит
Нажмите для просмотра прикрепленного файла - исходный рисунок который нужно вывести