USE_BEFORE_DEF kann nicht ausgeschaltet werden ?

[charly52]

Hi Leute,

die vielen Antworten sind ja schon toll.

ABER, die Frage war:

Weiß jemand ob man mit {$WARN USE_BEFORE_DEF OFF} die Warnung, um die es in der Frage ging, einfach nicht abschalten kann, oder ob ich schlicht was falsch mache.
Der Code steht gar nicht zur Debatte.

Und er ist auch nicht falsch oder gefährlich, sondern einfach so, daß der Compiler an der Stelle, wo die Variable benutzt wird wohl vergessen hat, daß unter der selben Bedingung, die zum zurücksetzen benutzt wird, weiter oben auch ein Wert zugewiesen wurde.

Und entschuldigt bitte die späte Reaktion. War anderweitig unterwegs

Charly

[himitsu]

Nein, der Compilier kann das nicht wissen.
Woher soll er hier wissen, ob diese Funkion oben und unten das gleiche Ergebnis liefert?
Es kann auch sein, dass es nicht so ist und demnach ist diese Meldung vollkommen korrekt.



Hmmmmmm, hier ist am Ende ein ;

Wir hatten schonmal einen ähnlichen Fall.
Da wurde die Überlaufprüfung deaktiviert, aber wenn das wiederanschalten vor dem ; kommt, dann wird es ausgewertet, bevor die die eigentliche Prüfung gemacht wurde und somit war sie weiterhin aktiv.

[charly52]

Hi himitsu,

meinst du das ; hinter aFarbe?
 DG0_AbtlNamen.Canvas.Brush.Color:= aFarbe; Das hab ich schon rausgenommen. Bringt auch nichts.

Charly

[charly52]

Hi

Es sieht so aus als ginge dieser Schalter nur ausserhalb einer Funktion/Prozedur.
Bei folgendem Code ist die Meldung weg.

Delphi-Quellcode:

{$WARN USE_BEFORE_DEF OFF}
procedure TKHSFormP1.MyProzedur( );
begin  //of MyProzedur


end; //of my Prozedure
{$WARN USE_BEFORE_DEF ON}

Charly

[himitsu]

kann schon drin.

Es gibt ja schalter, die gelten für das ganze Programm (egal wo sie stehen),
genauso gut kann es sein, dass gewisse Schalter für ganze Units, Methoden oder Codezeilen Befehle gelten.

Wäre auch zu einfach, wenn sowas in der Hilfe erwähnt würde.