kako da prebacim icon u bitmap? probao sam sa savetofile funkciom imagea ali kad probam da loadam taj bitmap u glyph speedbara on izbaci gresku tipa "Bitmap image is not valid". Postoji li neki drugi nacin za to? Ili mozda postoji nacin da ucitam icon u glyph?
Icon to Bitmap pa u Glyph
Zaključano
Zakačeno
izmenjeno 1 put, poslednji put Trodmi 27.10.2005. u 02:14
Izmene poruke
- Trodmi27.10.2005. u 02:14zapis iz teksta poruke
Konverzija Ico2Bmp:
procedure TForm1.Button1Click(Sender: TObject);
var
Icon: TIcon;
Bitmap: TBitmap;
begin
Icon := TIcon.Create;
try
Bitmap := TBitmap.Create;
try
Icon.LoadFromFile('c:\Ikona.ico');
Bitmap.Height := Icon.Height;
Bitmap.Width := Icon.Width;
Bitmap.Canvas.Draw(0, 0, Icon);
Bitmap.SaveToFile('c:\Bitmapa.bmp');
finally
Bitmap.Free;
end;
finally
Icon.Free;
end;
end;
Toliko sto se konverzije tice, Nema, takvo je vreme doslo da samo 'sareno pa se mrda' ima prodju, nebitno je da li je motor ispod skoljke ispravan, pouzdan, koristan :)
procedure TForm1.Button1Click(Sender: TObject);
var
Icon: TIcon;
Bitmap: TBitmap;
begin
Icon := TIcon.Create;
try
Bitmap := TBitmap.Create;
try
Icon.LoadFromFile('c:\Ikona.ico');
Bitmap.Height := Icon.Height;
Bitmap.Width := Icon.Width;
Bitmap.Canvas.Draw(0, 0, Icon);
Bitmap.SaveToFile('c:\Bitmapa.bmp');
finally
Bitmap.Free;
end;
finally
Icon.Free;
end;
end;
Toliko sto se konverzije tice, Nema, takvo je vreme doslo da samo 'sareno pa se mrda' ima prodju, nebitno je da li je motor ispod skoljke ispravan, pouzdan, koristan :)
Ne znam zasto ti treba na taj nacin.
Ja to uradim prosto sa ACDSee programom, koji nudi konverziju svih mogucih tipova slika.
Ja to uradim prosto sa ACDSee programom, koji nudi konverziju svih mogucih tipova slika.