Delphi Variable Initialization

[DeddyH]

Man benutzt ja sowieso keine globalen Variablen, von daher ist das eigentlich egal

[Edelfix]

Danke schon einmal für die Beiträge.

Wie ist dann die richtige Vorgehensweise bei lokalen Variablen?

Wenn es heißt: "Laut Google sind in Delphi globale Variablen immer auf 0/nil initialisiert, lokale aber uninitialisiert, also undefined."

Beispiel:

Delphi-Quellcode:

procedure Foo;
var
  iLokaleVar: Integer;
begin
  //wenn volgende Zeile fehlt dann mekert der Compiler: "[dcc32 Warnung] Muster.pas(7): W1036 Variable 'iLokaleVar' ist möglicherweise nicht initialisiert worden"
  iLokaleVar:=0;  //sicherheitshalber definieren.
  if Vorfall_1 then
  iLokaleVar := iLokaleVar + 1;
  if Vorfall_2 then
  iLokaleVar := iLokaleVar + 1;
  if Vorfall_3 then
  iLokaleVar := iLokaleVar + 1;

  if iLokaleVar>0 then
    showmessage('Achtung es gab ein Vorfall!');
end;

Oder wie macht ihr das mit lokalen Variablen?

[DeddyH]

Genau so.

[Glados]

Wenn dann doch gleich so

Delphi-Quellcode:

if Vorfall_1 or Vorfall_2 or Vorfall_3 then
 iLokaleVar := iLokaleVar + 1;

[Aviator]

Zitat von Glados:

Wenn dann doch gleich so

Delphi-Quellcode:

if Vorfall_1 or Vorfall_2 or Vorfall_3 then
 iLokaleVar := iLokaleVar + 1;

Ich würde mal behaupten, dass das einfach nur ein Beispiel war.


{$BrainCompiler ON} .

Aber nichts desto trotz macht dein Code etwas anderes als der von Edelfix. Das Ergebnis wäre nicht gleich.
EDIT: Unter der Voraussetzung, dass mehrere Vorfälle eintreten können. Um das noch genauer zu sagen

{$BrainCompiler OFF}