JPG's in BMP's umwandeln

[robinWie]

Hi,

auf den wunsch von Daniel mache ich einen neuen Thread auf. Ich möcte wissen wie man JPG's in BMP's umwandelt. Danke im Voraus

[idontwantaname]

ganz einfach:
Du lädst das Bild in ein TJPEGImage, dann machst du ein neues Bitmap-Objekt, per Assign bringst du das JPG-Bild hinein, abspeichern, fertig :)

Delphi-Quellcode:

uses JPEG;

procedure TForm1.Button1Click(Sender: TObject);
var
  jpg: TJPEGImage;
  bmp: TBitmap;
begin
  jpg := TJPEGImage.Create;
  bmp := TBitmap.Create;
  try
    jpg.LoadFromFile('J:\test.jpg');
    bmp.Assign(jpg);
    bmp.SaveToFile('J:\test.bmp');
  finally
    jpg.Free;
    bmp.Free;
  end;
end;

[Airblader]

Übrigens kann man vor einem neuem Thema auch bei den den Schweizern schauen und würde das finden ;)

air

[Nils_13]

@air: die Codes von den Schweizern sind immer so verkompliziert.

[Khabarakh]

Zitat:

Zitat von Nils_13

@air: die Codes von den Schweizern sind immer so verkompliziert.

Erläutere bitte mal, was an dem Code im Link "verkompliziert" sein soll :roll: .

[Nils_13]

Zitat:

Zitat von Khabarakh

Zitat:

Zitat von Nils_13

@air: die Codes von den Schweizern sind immer so verkompliziert.

Erläutere bitte mal, was an dem Code im Link "verkompliziert" sein soll :roll: .

Alles. Einfach umständlich. Idontwantanames Code ist hingegen leicht verständlich.

[Airblader]

Alles? Nenn doch mal genaue Beispiele. "Alles" kann ja jeder sagen.
Der Code der Schweizer ist theoretisch der selbe, nur, dass man noch die Qualität einstellt
und eben den selben Dateinamen zum Speichern nimmt - nur mit anderer Dateiendung, logischerweise.

MfG, air

[Khabarakh]

o_O

Der Code ist doch fast genau gleich, außer dass

• einem noch gezeigt wird, wie man die Qualität ändern kann
• er schön in eine Prozedur verpackt ist
• und durch den zweiten try-Block Ressourcen gespart werden, falls das Bild gar nicht geladen werden kann (-> besser strukturiert. Auf diese Idee wäre ich aber selbst nie im Leben gekommen :stupid: )

[add]Stimmt, der Dateiname bleibt. Aber es ist ja auf den ersten Blick erkennbar, welche Stelle abgeändert werden müsste. [/add]