Delphi-Quellcode:
var
dllHandle: THandle;
thisBitmap: TBitmap;
thisPNG : TPNGImage;
begin
dllHandle := LoadLibrary('
Ressource.dll' );
if dllHandle <> 0
then
try
thisBitmap := TBitmap.Create;
thisPNG := TPNGImage.Create;
try
thisBitmap.Handle := LoadBitmap(dllHandle, '
Bild2' );
thisPNG.Handle :=
//Er meckert mich an, dass TPNGImage kein Element namens Handle enthält
if thisBitmap.Handle <> 0
then IGrid.Picture.Bitmap.Assign(thisBitmap);
if thisPNG.Handle <> 0
then IHintergrund.Picture.Bitmap.Assign(thisPNG);
finally
thisBitmap.Free;
end;
finally
FreeLibrary( dllHandle );
end;
end;
Und wieso enthält
TPNGImage kein
Handle??? Immerhin kennt er TPNGImage überhaupt!
Kann ich dann trotzdem
LoadBitmap(dllHandle, 'Bild1')
verwenden, wenn es sich um ein PNG handelt?