[SOLVED] Problem mit Procedure und ProcedureDll

[R3booz]

Ich habe bei folgendem Code das Problem, dass ich die ProcedureDLL shutdown() nicht aufrufen kann.

Code Programm:

Code: Alles auswählen

Procedure system(proc.s)
If OpenLibrary(0, "dll/system.dll")
  CallFunction(0, proc.s)
  CloseLibrary(0)
Else
  MessageRequester("Fehler","Konnte dll\system.dll nicht finden!")
  End
EndIf
EndProcedure

system("shutdown()")

Code system.dll:

Code: Alles auswählen

ProcedureDLL shutdown()
  MessageRequester("IP",ipini.s)
  ;RunProgram("shutdown.exe","-s -t 0 -f","",0)
EndProcedure

Vielen Dank schon einmal für die Hilfe

[Danilo]

Code: Alles auswählen

system("shutdown()")

Die Klammern beim Funktionsname müssen schon mal weg, also nur "shutdown" nehmen.

[R3booz]

Ah jetzt geht es Danke

Neuer Code Programm:

Code: Alles auswählen

Procedure system()
If OpenLibrary(0, "dll/system.dll")
  CallFunction(0, proc.s)
  CloseLibrary(0)
Else
  MessageRequester("Fehler","Konnte dll\system.dll nicht finden!")
  End
EndIf
EndProcedure

Neuer Code system.dll:

Code: Alles auswählen

ProcedureDLL shutdown()
  MessageRequester("IP",ipini.s)
EndProcedure