Einzelnen Beitrag anzeigen

Johannes013

Registriert seit: 2. Jun 2009
179 Beiträge
 
Delphi 5 Standard
 
#1

Ressource nicht gefunden => aber da

  Alt 16. Aug 2009, 18:19
hi,

ich habe gerade mir Bibliotheken angefangen.
mit dieser prozedur rufe ich JPEG-Bilder auf:

Delphi-Quellcode:
procedure TPMain.JPEG(ResName: String; ResType: PChar);
var
  h :HINST;
  r :TResourceStream;
  j :TJPEGImage;
begin
  h := LoadLibrary('Pegasus.dll');
  if h <> 0 then
  begin
    r := TResourceStream.Create(h,ResName,ResType);
    j := TJPEGImage.Create;
      try
        j.LoadFromStream(r);
        PBack.Picture.Assign(j);
      finally
        j.Free;
        r.Free;
      end;
  end;
  FreeLibrary(h);
end;
Wenn ich nun schreibe :
Code:
JPEG('Titel','JPEG');
kommt: EResNotFound: Titel wurde nicht gefunden

Aber warum??? Die Prozedur ist auch deklriert und mit Gif-Bildern funktioniert das.

.res und .rc sind im anhang

Angehängte Dateien
Dateityp: zip pegasus.rc_199.zip (277 Bytes, 6x aufgerufen)
Dateityp: zip pegasus.res_861.zip (1,62 MB, 6x aufgerufen)
Johannes
Der folgende Satz ist richtig.
Der vorherige Satz ist falsch.
  Mit Zitat antworten Zitat