Конвертирование Ico в Bmp.

  • Автор темы GOSTIK
  • Дата начала
Статус
Закрыто для дальнейших ответов.
G

GOSTIK

#1
Помогите изменить фон получаемого изображения. По умолчанию оно белое! Как изменить его на произвольный цвет???

Вот мой способ конвертирования (с уменшением изображения):
if (OpenPictureDialog1->Execute())
Image777->Picture->LoadFromFile(OpenPictureDialog1->FileName);
TIcon *tIcon;
tIcon = new TIcon;
AnsiString vasS=OpenPictureDialog1->FileName;
tIcon->LoadFromFile(vasS);
Graphics::TBitmap *tBmp=new Graphics::TBitmap;
tBmp->Height = tIcon->Height;
tBmp->Width = tIcon->Width;
tBmp->Canvas->Draw(0,0,tIcon);
if(vasS.LastDelimiter(".") != 0)
vasS=vasS.SubString(1,vasS.LastDelimiter(".")-1);
Image777->Picture->Assign(tBmp);
Image777->Picture->SaveToFile("C:\\01.bmp");
delete tIcon;
delete tBmp;
Graphics::TBitmap* gBitmap1 = new Graphics::TBitmap;
gBitmap1->LoadFromFile("C:\\01.bmp");
TRect tRectFrom(0,0,32,32);
TRect tRectTo(0,0,16,16);
Image1->Canvas->CopyMode=cmSrcCopy;
Image1->Canvas->CopyRect(tRectTo,gBitmap1->Canvas,tRectFrom);
delete gBitmap1;
Может стоит добавить что? Подскажите!!! :D
 
Статус
Закрыто для дальнейших ответов.