Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/
Wir brauchen nicht die PB Sourcen, daran haste ja nix geändert.Mok hat geschrieben:... aber als ich in der DLL 2 Zeilen dazugegeben habe, bekomme ich immer einen Invalid Memory Access Fehler, wenn ich DLL_OptionWindow() aufrufe. .
Theorteisch habe ich die angeblich und praktisch eigentlich eh da reingetan... so quasi...Dr. Shrek hat geschrieben:Wir brauchen die Sourcen zu DLL_OptionWindow()
tscha, Theorie und Praxis. Das ist so 'ne Sache...Mok hat geschrieben:Theorteisch habe ich die angeblich und praktisch eigentlich eh da reingetan... so quasi...Dr. Shrek hat geschrieben:Wir brauchen die Sourcen zu DLL_OptionWindow()
Das gibt's doch nichtKiffi hat geschrieben: tscha, Theorie und Praxis. Das ist so 'ne Sache...
JaKiffi hat geschrieben:@Mok:
vielleicht hilft das weiter:
http://www.purebasic.fr/german/viewtopi ... 56#p185456
Code: Alles auswählen
Procedure CallDLL_HelpWindow(lDummy.l)
hDLL = OpenLibrary(0,"op1.dll")
CallDLL_HelpWindow = GetFunction(hDll,"DLL_HelpWindow")
CallFunctionFast(CallDLL_HelpWindow) ;*************************************
CloseLibrary(hDLL)
EndProcedureCode: Alles auswählen
Procedure CallDLL_HelpWindow(lDummy.l)
If OpenLibrary(0,"op1.dll")
CallDLL_HelpWindow = GetFunction(0, "DLL_HelpWindow")
If CallDLL_HelpWindow
CallFunctionFast(CallDLL_HelpWindow)
EndIf
CloseLibrary(0)
EndIf
EndProcedure
Aehm... ich hab's wie Kiffi gemacht... und sein Code steht irgendwie nicht in der HilfeHeX0R hat geschrieben:Meine Güte, wie wäre es mal mit erst in die Hilfe schauen
Wenn du ein Nachfragen belästigend findest, dann frage ich mich, warum du überhaupt hier im Forum registriert bistHeX0R hat geschrieben:und dann das Board belästigen?
Code: Alles auswählen
Procedure CallDLL_OptionWindow(lDummy.l)
If OpenLibrary(0,"op1.dll")
CallDLL_OptionWindow= GetFunction(0, "DLL_OptionWindow")
If CallDLL_OptionWindow
CallFunctionFast(CallDLL_OptionWindow);******************
EndIf
CloseLibrary(0)
EndIf
EndProcedureglaub ich nicht.Mok hat geschrieben:Aehm... ich hab's wie Kiffi gemacht...
glaub ich auch nicht.Mok hat geschrieben:und sein Code steht irgendwie nicht in der Hilfe
Code: Alles auswählen
Case #ButtonGadget_1Kiffi hat geschrieben:Zeig mal Deinen Thread-Aufruf. Was passiert bei Dir nachin Raminf.pb?Code: Alles auswählen
Case #ButtonGadget_1
Grüße ... Kiffi
Code: Alles auswählen
Case #ButtonGadget_1
CallDLL_OptionWindow(Random(32)) ;was da drinne steht is ja wurscht... oder?
If ReadFile(0,"tempConfig.prefs") ; die tempConfig zur Config machen
ClosePreferences()
DeleteFile("Config.prefs")
CloseFile(0)
RenameFile("tempConfig.prefs","Config.prefs")
OpenPreferences("Config.prefs")
EndIf
PreferenceGroup("infSettings") ; und das klumpert dann auslesen
Unit.f = ReadPreferenceFloat("UnitData",1)
UnitName = ReadPreferenceString("UnitName","MB")
refTime = ReadPreferenceLong("RefreshTime",500)