| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ico в bmp [D4, Win2k]
DmitryM © (2002-04-23 15:46:00)Ка преобразовать ico-файл в bmp-файл?
DmitryM (2002-04-25 11:56:00) [1]Спасибо, попробую.
Song (2002-04-24 16:25:00) [2]
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-24 16:16:00) [3]НЕсле бы все было так просто - я бы не писал :)
Gu (2002-04-23 16:26:00) [4]Переименовать
| |
