Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - TImage lädt kein jpg


elzer - Do 20.11.08 22:31
Titel: TImage lädt kein jpg
Hi Leute, ich möchte in meinem Programm ein Bild per ButtonClick in ein TImage laden, es funktioniert auch alles einwandfrei (*.bmp;*.ico;*.emf;*.wmf) außer *.jpg und *.jpeg

Hier mal der Quelltext:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
procedure TForm1.DurchsuchenClick(Sender: TObject);
begin
  if opendialog1.Execute then
    begin
    Edit1.Text:=opendialog1.FileName
    end
end;

procedure TForm1.LadenClick(Sender: TObject);
begin
Image1.Picture.LoadFromFile(Edit1.Text);
end;


Es kommt dann die Fehlermeldung: Unbekannte Bilddateierweiterung (.JPG) //bzw (.JPEG)

Eigentlich ein total einfaches Programm, aber ich finde den Fehler nicht. Hoffe ihr könnt mir helfen :)

LG Chris


turboPASCAL - Do 20.11.08 22:40

Binde mal bitte in der Uses-Klausel die Unit "Jpeg" mit ein.


Delphi-Quelltext
1:
2:
uses
  Windows, Messages, SysUtils, ... Forms, Dialogs, JPEG;


elzer - Do 20.11.08 22:44

ahhh dass ich da nich von selbst drauf gekommen bin xD
danke, dir; es geht :)