Zitat von
DJ-SPM:
Der Quelltext ist aus Sakuras großen Plug-In-Tutorial. Die TLoadPlug-In-Funktion ist aus einer Klasse, die sowohl das hauptprogramm, als auch das Plug-In kennen muss. Aber diese Stelle im Code sagt mir nichts...
Ist die Codestelle so in dem Projekt? Wie ist denn der Typ TLoadPlugIn deklariert?
Jedenfalls hat Brainshock ja schon gesagt, dass an der Stelle kein Objekt erzeugt wird. An sich sieht dein Schema an einigen Stellen nicht ganz korrekt aus.
Zitat von
DJ-SPM:
Delphi-Quellcode:
// Hier holst du dir einfach nur die Adresse des Einsprungpunkts 'LoadPlugin'
// da wird kein Speicher reserviert oder sonst etwas importiert
ProcAddr := GetProcAddress(TempHandle, 'LoadPlugIn');
// hier prüfst du ob die zurückgegebene Adresse gültig ist
// wenn nicht, dann gibt es einfach keine solche exportierte Funktion
// oder ein Fehler ist aufgetaucht
if ProcAddr = nil then
begin
// register function not exported
FreeLibrary(TempHandle);
Exit;
end;
// LoadPlugInProc ist ein Funktionszeiger!
// hier wird (wie Brainshock schon sagte) der ungetypte Zeiger
// in den entsprechenden Funktionszeiger gecastet
LoadPlugInProc := TLoadPlugIn(ProcAddr); //<------DIESE STELLE
try
TempPlugIn := nil;
// hier wird dann die Funktion auf die TempPlugin zeigt angesprungen
// es entspricht also dem Aufruf einer normalen Funktion,
// aber du kennst hier direkt die Adresse
LoadPlugInProc(Application.Handle, TempPlugIn);
except
// register function invalid
FreeLibrary(TempHandle);
Exit;
end;
Gruß Der Unwissende
[edit]
sorry, falscher Name (hab an diese eine Prog.Sprache gedacht
[/edit]