Delphi Variable Initialization

[bra]

Laut Google sind in Delphi globale Variablen immer auf 0/nil initialisiert, lokale aber unintialisiert, also undefined. Darauf verlassen würde ich mich aber nicht.

[jaenicke]

Zitat von bra:

Laut Google sind in Delphi globale Variablen immer auf 0/nil initialisiert, lokale aber unintialisiert, also undefined. Darauf verlassen würde ich mich aber nicht.

Da kann man sich schon drauf verlassen, das ist auch dokumentiert, einfach mal in die Doku schauen:
http://docwiki.embarcadero.com/RADSt...o/en/Variables

Zitat:

If you do not explicitly initialize a global variable, the compiler initializes it to 0. Object instance data (fields) are also initialized to 0. On the Wiin32 platform, the contents of a local variable are undefined until a value is assigned to them.

[bra]

Was ich meinte ist, wenn das irgendwann mal geändert wird, hat man den Salat.

[jaenicke]

Wenn etwas so fest dokumentiert ist, vor allem solch eine grundlegende Geschichte, dann kann man schon davon ausgehen, dass das auch so bleibt. Denn bei einer Änderung würden viele Quelltexte nicht mehr funktionieren.

[uligerhardt]

Zitat von jaenicke:

Wenn etwas so fest dokumentiert ist, vor allem solch eine grundlegende Geschichte, dann kann man schon davon ausgehen, dass das auch so bleibt. Denn bei einer Änderung würden viele Quelltexte nicht mehr funktionieren.

Du meinst wie bei ARC, Zero based strings usw. usf.?

[hoika]

Hallo,

Delphi-Quellcode:

  Vorfall_1:= False;
  Vorfall_2:= False;
  Vorfall_2:= False;


procedure Foo;
var
  iLokaleVar: Integer;
begin
  // iLokaleVar:=0; //sicherheitshalber definieren.

  // iLokaleVar ist undefiniert

  if Vorfall_1 then
    iLokaleVar := iLokaleVar + 1;  // du kummst hier nich rein
  if Vorfall_2 then
    iLokaleVar := iLokaleVar + 1;  // du kummst hier nich rein
  if Vorfall_3 then
    iLokaleVar := iLokaleVar + 1;  // du kummst hier nich rein

  Wieso sollte iLokaleVar in dem Fall denn einen wert bekommen haben?
  Der Compiler weiss doch beim Compilieren nicht, was Deine Vorfall-Variablen für einen Wert haben

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

[jaenicke]

Zitat von uligerhardt:

Du meinst wie bei ARC, Zero based strings usw. usf.?

Das ist ja der Grund weshalb es beides für Win32 noch nicht gibt... weil es nicht so leicht ist das zu implementieren ohne bestehenden Code zu brechen.

Eine neue Plattform ist etwas anderes. Da steht ja dann ohnehin mindestens eine Code Review an, wenn man darauf umstellt...

[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.