Problem mit Klasse und EInvalidPointer

[apoc]

Also ich habe eine Klasse in einer Unit, mein Problem ist das ich einen EInvalidPointer-Fehler bekomme ohne ersichtlichen Grund. In meiner Hauptunit tue ich nicht viel ich lege ein neues Objekt der Klasse an und führe eine Funktion der Klasse aus. Ich bekomme auch eine Warnung das das Objekt möglicherweise nicht Initialisiert wurde, aber ich möchte/brauche und habe keinen Konstruktor/Dekonstruktor ?!

Diese Funktion legt die größe eines Dynamischen Arrays von einem Record fest. Das Funktioniert nur wenn ich das Array in "public" anlege, warum ? wenn ich es als private anlege funktioniert es nicht. Dabei sollte es eigendlich private sein und das die Funktion als public definiert ist sollte doch wohl auch keine Probleme machen. Ich frage mich weshalb da Object Pascal einen unterschied macht.

So, also wenn ich es als public definiere komme ich wenigstens ans ende der Funktion erst wenn ich aus der Funktion wieder zurück zur Hauptunit springe kommt der Fehler und das Programm bricht ab. Also eigendlich ist es eine procedure und sie scheint auch zu funktionieren.