Record ist nicht vollständig definiert

[SirThornberry]

zum Beispiel so:

Delphi-Quellcode:

type
  TDPTreeItems = class(TObject)
  private
    fChilds  : TList;
    fNodeName: String;
    function GetItem(AIndex: Integer): TDPTreeItems;
  public
    constructor Create();
    destructor Destroy(); override;

    function Add(): Integer;
    function Count(): Integer;
    procedure Clear();
    procedure Delete(AIndex: Integer);

    property Childs[AIndex: Integer]: TDPTreeItems read GetItem;
    property NodeName: String read fNodeName write fNodeName;
  end;
[...]

function TDPTreeItems.Add: Integer;
var
  lItem : TDPTreeItems;
begin
  lItem := TDPTreeItems.Create();
  result := fChilds.Add(lItem);
end;

procedure TDPTreeItems.Clear;
var
  lCount  : Integer;
begin
  for lCount := Count - 1 downto 0 do
    TObject(Childs[lCount]).Free;
  fChilds.Clear;
end;

function TDPTreeItems.Count: Integer;
begin
  result := fChilds.Count;
end;

constructor TDPTreeItems.Create;
begin
  inherited Create;
  fChilds := TList.Create;
end;

procedure TDPTreeItems.Delete(AIndex: Integer);
begin
  Childs[AIndex].Free;
  fChilds.Delete(AIndex);
end;

destructor TDPTreeItems.Destroy;
begin
  Clear();
  fChilds.Free;
  inherited Destroy;
end;

function TDPTreeItems.GetItem(AIndex: Integer): TDPTreeItems;
begin
  result := TDPTreeItems(fChilds.Items[AIndex]);
end;

Eine Insert-Methode etc. hinzuzufügen dürfte nicht das Problem sein.
Vorteil: Wenn du zum setzen von "NodeName" eine SetMethode hinterlegst kannst du noch sicherstellen das es kein anderes Node mit gleichem Namen gibt etc.

[gsh]

Danke für das Beispiel.
Ich werd dann morgen versuchen es einzubauen.

[Michael Habbe]

Zitat von SirThornberry:

zum Beispiel so:
... einiges an nützlichem Source Eine Insert-Methode etc. hinzuzufügen dürfte nicht das Problem sein.
Vorteil: Wenn du zum setzen von "NodeName" eine SetMethode hinterlegst kannst du noch sicherstellen das es kein anderes Node mit gleichem Namen gibt etc.

Wäre das nicht auch was für die CodeLibrary?!?

[SirThornberry]

ist eigentlich grundwissen der objectorientierten Programmierung.

[Dax]

Imho nein. Dort steht schon die dpCollection, und, naja, wie man mit Listen arbeitet, Bäume usw sollte schon etwas sein, was jeder ohne nachzuschlagen beherrscht. Zumindest sehe ich das so

[Michael Habbe]

Zitat von SirThornberry:

ist eigentlich grundwissen der objectorientierten Programmierung.

Demnach dürfte wohl einiges aus dem Raster fallen.....

Zitat von Dax:

Imho nein. Dort steht schon die dpCollection, und, naja, wie man mit Listen arbeitet, Bäume usw sollte schon etwas sein, was jeder ohne nachzuschlagen beherrscht. Zumindest sehe ich das so

Hm, meiner einer beherrscht schon viel, ohne es nachzuschlagen. Und wenn ich es schon einmal gebraucht habe, kann ichs natürlich in meinen Quellen nachschlagen.

Mag schon sein, dass man die dpCollection hierfür nutzen kann, nur stehen in der CodeLibrary nicht auch Dinge drin, um den Anfänger/Fortgeschrittenen/Profi auf den richtigen Weg zu bringen?

Geht es in der CodeLibrary nicht auch um grundlegende Dinge?

War aber auch nur ein Vorschlag.