TStringList x64 nicht nil

[venice2]

Zitat:

vielleicht auch eine Einstellungssache

Ok! Habe dann wohl immer glück gehabt wobei ich schon sagte das Alle Warnungen eingeschaltet sind.

Seltsam nur das die x86 Anwendung das klaglos hinnimmt und alles läuft hingegen die x64 nicht.
Kein Beinbruch List := nil; davor zu setzen mir viel das nur auf.

Muss da jetzt nicht weiter drauf rumreiten dann ist es halt so!

[p80286]

Wenn Du jede Variable initialisierst weißt Du woran Du bist.

Gruß
K-H

[venice2]

Zitat von p80286:

Wenn Du jede Variable initialisierst weißt Du woran Du bist.

Gruß
K-H

Eigentlich schon abgeschlossen aber Bitte Bilder sagen mehr als Worte.
Also ich denke mal das es mit Delphi nicht immer nachzuvollziehen ist was der Compiler eigentlich macht.
nil oder doch nicht nil

Mir ging es darum das es eine Nachweisbare Unstimmigkeit gibt.
Das hat mit Glück nichts zu tun es ist immer so. Da soll dann jemand durchblicken, daher auch meine Frage.

[Uwe Raabe]

Zitat von venice2:

Das hat mit Glück nichts zu tun es ist immer so.

Ist es nicht! Lass mal dieses Programm laufen. Gerne auch mal mit DEBUG und RELEASE spielen und mal mit und ohne Debugger laufen lassen.

Delphi-Quellcode:

Program Project634;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils,
  System.Classes;

procedure TestList;
var
  List: TStringList;
begin
  if List = nil then
    Writeln('List = nil')
  else
    Writeln('List <> nil');
end;

procedure SetList();
var
  List: TStringList;
begin
  List := TStringList.Create;
  try

  finally
    List.Free;
  end;
end;

procedure ClearList();
var
  List: TStringList;
begin
  List := nil;
end;

procedure Main();
begin
  TestList;
  SetList;
  TestList;
  ClearList;
  TestList;
end;

begin
  try
    Main;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
  Readln;
end.

[venice2]

@Uwe
Welche Delphi Version? 10.3 oder Delphi 2010!
Das ist der Unterschied.

32Bit bitte mit Delphi 2010 nicht mit 10.3

[Uwe Raabe]

Zitat von venice2:

Welche Delphi Version? 10.3 oder Delphi 2010!
Das ist der Unterschied.

32Bit bitte mit Delphi 2010 nicht mit 10.3

Habe ich leider nicht zur Hand.

[venice2]

Zitat von Uwe Raabe:

Zitat von venice2:

Welche Delphi Version? 10.3 oder Delphi 2010!
Das ist der Unterschied.

32Bit bitte mit Delphi 2010 nicht mit 10.3

Habe ich leider nicht zur Hand.

Mit 10.3 wird es wohl funktionieren da hier 32Bit und 64Bit mit der selben Anwendung erstellt werden.

Und ja ich werde bei 64Bit in der Zukunft darauf achten alles vorher zu initialisieren.

Delphi-Quellcode:

procedure TestList;
var
  List: TStringList;
begin
  if List = nil then
    Writeln('List = nil')
  else
    Writeln('List <> nil');
end;

Ist immer NIL! Beim ersten Aufruf von TestList Egal wie oft ich die Anwendung starte (D2010)
Wie schon gesagt hat mit Glück nichts zu tun das ist so gegeben.
Unter D2010 scheint eine Initialisierung nicht nötig zu sein darauf wollte ich hinaus.

Zitat:

Jedes andere von Dir beobachtete Verhalten ist als rein zufällig zu beurteilen.

Dann teste den Anhang. Wenn du bei 1000 Aufrufen ein anderes Ergebnis bekommst sage bescheid.

[sahimba]

Es ist ganz ausdrücklich dokumentiert, dass lokale Variablen NICHT initialisiert sind.
Jedes andere von Dir beobachtete Verhalten ist als rein zufällig zu beurteilen.