Einzelnen Beitrag anzeigen

Benutzerbild von dizzy
dizzy

Registriert seit: 26. Nov 2003
Ort: Lünen
1.932 Beiträge
 
Delphi 7 Enterprise
 
#12

Re: Wie erkenne ich ob eine Zelle im array gefüllt ist?

  Alt 20. Apr 2004, 01:27
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
  Mit Zitat antworten Zitat