hallo,
ich habe folgendes problem:
ich habe eine delphi.exe die eine cobol.dll mittels dynamischen einbinden lädt.
das problem ist das ich innerhalb dieser cobol.dll nur einen einsprungspunkt habe und dieser allerdings mehrfach geladen werden soll. d.h. die cobol.dll öffnet ein fenster und bleibt solange aktiv bis dieses wieder geschlossen wird. wenn ich es schliesse zieht freelibrary und ich kann die dll erneut aufrufen. ich erhalte im moment beim 2. aufruf der funktion aus der dll eine externe exception. die frage ist ob es überhaupt möglich ist die funktion mehrfach zu laden!?!
kleines codebeispiel:
Type Tcobol = array[1..1] of Char;
type tcobolopen = function(parameter: string) :tcobol; cdecl;
...
dllhandle := LoadLibrary('COBOL.DLL');
if (dllhandle <> 0) then
begin
@cobolopen := GetProcAddress(dllhandle,'COBOLDLL');
if (@cobolopen <> nil) then
cobol := cobolopen(parameter)
else
showmessage(pchar(@cobolopen));
end
else
showmessage('COBOLDLL konnte nicht geladen werden!');
freelibrary(dllhandle);
weiss jemand rat
ich habe folgendes problem:
ich habe eine delphi.exe die eine cobol.dll mittels dynamischen einbinden lädt.
das problem ist das ich innerhalb dieser cobol.dll nur einen einsprungspunkt habe und dieser allerdings mehrfach geladen werden soll. d.h. die cobol.dll öffnet ein fenster und bleibt solange aktiv bis dieses wieder geschlossen wird. wenn ich es schliesse zieht freelibrary und ich kann die dll erneut aufrufen. ich erhalte im moment beim 2. aufruf der funktion aus der dll eine externe exception. die frage ist ob es überhaupt möglich ist die funktion mehrfach zu laden!?!
kleines codebeispiel:
Type Tcobol = array[1..1] of Char;
type tcobolopen = function(parameter: string) :tcobol; cdecl;
...
dllhandle := LoadLibrary('COBOL.DLL');
if (dllhandle <> 0) then
begin
@cobolopen := GetProcAddress(dllhandle,'COBOLDLL');
if (@cobolopen <> nil) then
cobol := cobolopen(parameter)
else
showmessage(pchar(@cobolopen));
end
else
showmessage('COBOLDLL konnte nicht geladen werden!');
freelibrary(dllhandle);
weiss jemand rat
Comment