Variablen auf Ausgangsstatus zurück setzen

[NeoRon]

Hallo PureBasic Community!

wie kann ich denn die Variablen auf den Anfangstaus des Programms zurück setzen?

mfg
NeoRon

[Kiffi]

Code: Alles auswählen

Procedure InitVars()
 myVar1 = 345
 myVar2 = 678
 [...]
EndProcedure

; Programmstart
InitVars()
[...]

; irgendwann mal zurücksetzen der Variablen
InitVars()
[...]

Grüße ... Kiffi

[ts-soft]

Code: Alles auswählen

RunProgram(ProgramFilename())
End

[NicTheQuick]

Am Anfang eines Programms sind bei PB alle Variablen 0 bzw. alle Stringvariablen enthalten leere Strings. Also musst du sie alle von Hand zurück setzen.

[NeoRon]

Irgendwie setzt er sie nicht zurück wärend des laufenden programms.
Liegt das weil sie globalisiert sind meine variablen?

grüße

[NicTheQuick]

Da wir keine Hellseher sind, solltest du uns lieber mal deinen Code zeigen.

[ts-soft]

alle Stringvariablen enthalten leere Strings. Also musst du sie alle von Hand zurück setzen.

Das ist "GottSeiDank" nicht so ganz richtig

Code: Alles auswählen

EnableExplicit

Define a.s
Define b.s = ""

Debug @a
Debug @b

Strings lassen sich nicht auf uninitialisiert zurücksetzen!

[NicTheQuick]

Jaja, das weiß ich auch. Aber ich denke für einen Anfänger war die Antwort passend.

Im übrigen geht auch das hier: ^^

Code: Alles auswählen

EnableExplicit

Define a.s
Define b.s = a

Debug @a
Debug @b

[NeoRon]

Hey,

habs hinbekommen.

hatte bei manchen Variablen keinen Wert vergeben(das war bei denen die ich auf null lassen wollte) also hat er immer den Wert im laufenden Programm den ihm zugewiesen worden ist behalten.
Hab die Variabeln jetzt in einer prozedur untergebracht und ihnen alle Werte zugewiesen, sprich den Wert 0 bei mir und bei Strings das "" , wenn ich die aufrufen lasse vegibt er neu meine angegebenen Anfangswerte.

Danke!

Grüße NeoRon