Форум: "Media";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];
Внизico в bmp Найти похожие ветки
← →
DmitryM (2002-04-23 15:46) [0]Ка преобразовать ico-файл в bmp-файл?
← →
Gu (2002-04-23 16:26) [1]Переименовать
← →
DmitryM (2002-04-24 16:16) [2]НЕсле бы все было так просто - я бы не писал :)
← →
Song (2002-04-24 16:25) [3]
procedure TForm1.Button1Click(Sender: TObject);
var
Icon: TIcon;
Bitmap: TBitmap;
begin
Icon := TIcon.Create;
try
Bitmap := TBitmap.Create;
try
{Load the .ICO}
Icon.LoadFromFile("c:\YourIcon.ico");
Bitmap.Height := Icon.Height;
Bitmap.Width := Icon.Width;
Bitmap.Canvas.Draw(0, 0, Icon);
Bitmap.SaveToFile("c:\YourBitmap.bmp");
finally
Bitmap.Free;
end;
finally
Icon.Free;
end;
end;
← →
DmitryM (2002-04-25 11:56) [4]Спасибо, попробую.
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c