Hallo. Ich hab jetzt folgendes:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Lib: Integer;
begin
Lib := LoadLibraryEx('
Ressource.dll', 0, LOAD_LIBRARY_AS_DATAFILE);
if Lib <> 0
then
try
Image1.Picture.Bitmap.LoadFromResourceName(Lib, MakeIntResource(222));
finally
FreeLibrary(Lib);
end else
raise Exception.Create('
Fehler in der Ressourcen-DLL...');
end;
Jetzt erhalte ich eine
Access Violation
[edit=Daniel B]Delphi-Tags korrrigiert. Mfg, Daniel B[/edit]