Ich hab das just mit so etwas gelöst, was es auch bei Java gibt. Nämlich einer Art "Wrapper-Klasse". Mit dem Code sieht man, dass es einfacher ist, als es zunächst klingt:
Delphi-Quellcode:
type
TInteger = class(TObject)
public
value: Integer;
constructor Create(val: Integer);
end;
var
IntArray: array[0..15] of TInteger;
.
.
.
constructor TInteger.Create(val: Integer);
begin
inherited Create;
value := val;
end;
Hat den Nachteil, dass man bei einer Wertzuweisung erst ein Objekt createn muss, aber wenn es gelöscht werden soll, so kann man es via:
FreeAndNil(IntArray[index]);
machen, und dann ergibt (auch wenn noch kein Objekt an "index" created wurde) ein "Assigned(IntArray[index])" = false. Und
tädäää, schon weisst du, dass kein Wert drin ist.
Und das ist
so traumhaft objektorientiert, dass jeder Lehrer/Prof. Freudensprünge machen müsste
.
gruss,
dizzy
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel