ich bin gerade dabei die Funktionen für dynamischen Library's auszuprobieren und erhalte bei mac os x 10.11.5 folgende Info-Meldung beim Programmstart:
(unter Linux und Windows NICHT):
objc[80568]: Class PBApplicationDelegate is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PBApplication is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PBMenuDelegate is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PBMenuObject is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PBGadgetList is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PB_NSFlippedView is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
objc[80568]: Class PBGadgetFunctions is implemented in both /tmp/PureBasic.0 and /Users/roy/purebasic/sources/ReturnPayload.dylib. One of the two will be used. Which one is undefined.
Das kurze Programm läuft ordnungsgemäß ab, halt nur diese komische Info-Meldungen.
Nachfolgend noch der Programm-Code:
ReturnPayload.pb ( kompiliert als Shared.dylib )
Code: Alles auswählen
ProcedureDLL test(x.l)
OpenConsole()
PrintN("Ich bin eine DLL-Datei und bekam als Argument "+Str(x)+" übergeben")
Delay(2000)
EndProcedure
Code: Alles auswählen
OpenConsole()
Prototype Test(x.l)
lib = OpenLibrary(#PB_Any, "/Users/roy/purebasic/sources/ReturnPayload.dylib")
If lib
PrintN("open Lib")
dllFunction.Test = GetFunction(lib, "test")
dllFunction(2)
CloseLibrary(lib)
Else
PrintN("open not Lib")
EndIf
Vielen Dank!
Mit freundlichen Grüßen
Roy