Einzelnen Beitrag anzeigen

Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#1

Und noch was: Arrayausgabe in ein TV

  Alt 10. Mär 2005, 19:35
Hi,
hab schon wieder ein problem...

Ich habe ein Array und in dem Array ist ein weiteres array.
nun will ich das array als parent nodes in ein TV ausgeben und das array in dem array soll pro index als child des parent angelegt werden.

momentan ist die funktion folgende:

Delphi-Quellcode:
procedure TForm1.UpdateDetailAuswahl;
var
        i,j: integer;
begin
        Form1.DetailAuswahl.Items.Clear;

        for i := 0 to high( TProduktion ) do
        begin
                with Form1.DetailAuswahl.Items do
                begin
                        Add(nil, TProduktion[i].Name);

                        for j := 0 to high( TProduktion[i].Maschinen ) do
                        begin
                                AddChild( Form1.DetailAuswahl.Items.Item[i], TProduktion[i].Maschinen[j].Name);
                        end;

                end;
        end;
end;
Problem:
Er kommt mit den items durcheinander und würfelt die childs irgendwo anders rein wo er nicht soll (wird ein child hinzugefügt stimmt das item[i] nichtmehr, da dies dann in ein child verweist)

Ich habe schon versucht:
  • Eine Variable, die mitzählt wieviele Childs hinzugefügt wurden und dann item[i+step].
    Problem: Wird die Funktion nochmal aufgerufen (update halt) gibts chaos
  • 2 Schleifen in denen getrennt parents und childs angelegt werden.
    Problem: Auch hier kommt er nach dem einfügen des childs durcheinander

ist diesmal n dummes logisches problem, hab allein schon lange gebraucht bis ich den fehler gefunden hatte...über tipps wie ich das array + unter-array ausgeben kann wäre ich sehr dankbar

air
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat