Code: Alles auswählen
Structure MyStruc
StructureUnion
Quad.q
Dbl .d
EndStructureUnion
EndStructure
Define x.MyStruc
x\Dbl = 3.141592654
x\Quad = 0
Debug x\Dbl
Code: Alles auswählen
Structure MyStruc
StructureUnion
Quad.q
Dbl .d
EndStructureUnion
EndStructure
Define x.MyStruc
x\Dbl = 3.141592654
x\Quad = 0
Debug x\Dbl
Code: Alles auswählen
ClearStructure(@x, MyStruc)