Wie gesagt, ich werde mir das nachher nochmal genau ansehen. Im Moment muß ich noch was anderes erledigen. Ich liiiebe diese Hektik.....
![Rolling Eyes :roll:](./images/smilies/rolleyes.gif)
Moderator: Moderatoren
nein, MEMVAR verhindert nur die Warnung wenn man PRIVATE oder PUBLICS verwendet, es ändert nichts an deren Inhalt.Tom hat geschrieben:"oVtPara" zu, die gleich im Anschluss überdeklariert wird (MEMVAR oVtPara) und also NIL sein muss.
Code: Alles auswählen
FUNCTION MAIN()
PRIVATE c := 'x'
? c
Test()
? c
RETURN NIL
FUNCTION Test()
MEMVAR c
? c
RETURN NIL
Code: Alles auswählen
#xcommand DEFAULT <var1> TO <val1> [,<varN> TO <valN>];
=> IF <var1> == NIL ; <var1> := <val1> ; ENDIF ;
[; IF <varN> == NIL ; <varN> := <valN> ; ENDIF ]
Code: Alles auswählen
FUNCTION TueWas()
nReturnCode := TueWasAnderes() // der Returncode ist 0, wenn das funktioniert hat, und hat sonst einen anderen Wert
RETURN nReturnCode == 0 // gibt .T. oder .F. zurück, je nachdem, ob der ReturnCode 0 war oder nicht
naja ... ich gehe zunächst mal davon aus das es kein "Manfred" Fehler ist ... :-"Tom hat geschrieben:Ich bewundere Jimmys stoischen Optimismus, dass es für jedes Problem irgendeine kühne, aber total abseitige technische Lösung gibt.