Zuerst mal solltest du dir die GIFImage-Bibliothek bei Torry.net runterladen, damit Delphi überhaupt GIF kann. Dann kann man die Konverterung durch eine Zuweisung mit
Assign machen, z.B. so:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10:
| bmp := TBitmap.Create; gif := TGIFImage.Create; try bmp.LoadFromFile(bmpDateiName); gif.Assign(bmp); gif.SaveToFile(gifDateiName); finally bmp.Free; gif.Free; end; |
GIF in BMP funktioniert umgekehrt genauso.
Stefan
Ein Computer ohne Windows ist wie eine Schokoladentorte ohne Senf.