
Wenn man den Structure Namen ändern außerhalb des Moduls giebts keinen Fehler.
Code: Alles auswählen
DeclareModule test
Structure TestStruc
String.s
EndStructure
Declare.s GetTest()
Declare SetTest(String.s)
EndDeclareModule
Module test
Global temp.TestStruc
Procedure.s GetTest()
ProcedureReturn temp\String
EndProcedure
Procedure SetTest(String.s)
temp\String = String
EndProcedure
EndModule
Structure TestStruc
String.s
EndStructure
temp.TestStruc
temp\String = "Hello World!"
test::SetTest(temp\String)
Debug test::GetTest()Code: Alles auswählen
DeclareModule test
Structure TestStruc
String.s
EndStructure
Declare.s GetTest()
Declare SetTest(String.s)
EndDeclareModule
Module test
Global temp.TestStruc
Procedure.s GetTest()
ProcedureReturn temp\String
EndProcedure
Procedure SetTest(String.s)
temp\String = String
EndProcedure
EndModule
temp.TestStruc
temp\String = "Hello World!"
test::SetTest(temp\String)
Debug test::GetTest()

