Entwickler-Ecke
Multimedia / Grafik - JPEG/BMP
AndreG - So 09.02.03 21:16
Titel: JPEG/BMP
Also, wie kann ich eine *.jpg Datei in mein Prog laden und (am besten) aufeiner Image-Kompnente anzeigen? (Zu Laufzeit) LoadFromFile funktioniert nicht!
Andre
Alfons-G - So 09.02.03 22:38
:wave:
Schau mal in der Hilfe zu TJPEGImage nach.
Du musst die Unit "jpeg" bei "uses" hinzufügen, ein JPEGImage zur Laufzeit erzeugen und dann kannst Du es mit JPEGImage.Picture.LoadFromFile füllen.
In der Hilfe findest Du ein Beispiel dazu.
:)
Anonymous - Mo 10.02.03 01:02
So kann man Jpeg in eine Bitmap laden:
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:
| uses ..., Jpeg;
procedure Jpg2Bmp(FileName: String; Bmp: TBitmap); var Jpg : TJpegImage; begin Jpg := TJpegImage.Create; try Jpg.LoadFromFile(FileName); Bmp.Assign(Jpg); finally Jpg.Free end; end; |
Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| procedure TForm1.Button1Click(Sender: TObject); var Bmp: TBitmap; begin ... Jpg2Bmp('C:\_Bitmaps\wood1.jpg', Bmp); ... end; |
Bei TImage geht aber auch das:
Quelltext
1: 2: 3: 4:
| procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.LoadFromFile('C:\_Bitmaps\wood1.jpg'); end; |
Das aber nicht:
Quelltext
1: 2: 3: 4:
| procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.Bitmap.LoadFromFile('C:\_Bitmaps\wood1.jpg'); end; |
AndreG - Mo 10.02.03 16:05
Vielen dank
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!