tlist - itemindex selber setzten

[meisteralex]

Hi Leute:
habe einen array von dem ich manche elemente (also nicht alle) in eine liste setzte, wenn sie entsprechenden kriterien entsprechen.
nun möchte ich aber, dass sie dort den selben index haben wie im array, sprich, wenn ein arrayelement nicht dem listenkriterium entsprich , soll auch dieser listindex in der liste ausgelassen werden
ich möchte also quasi bei list1.additem den index nicht hochzählen lassen, sondern selber setzten

[dahead]

das wird nicht gehen, es sei denn du fügst leere items zur liste.

ich würde dir empfehlen einfach (via records z.b.) den ItemIndex der ersten Liste mit zu speichern um später darauf zuzugreifen.

[meisteralex]

hmmm, einde codebeispiel vielleicht ?

[dahead]

da ich deine routinen nicht kenne, kann ich dazu schlecht ein beispiel machen. außerdem wüsste ich nicht zu welcher methode?

theoretisch:

Delphi-Quellcode:

TDatenInfo = record
  Data: String; // oder was auch immer
  ID: Integer; // dein alter itemindex
end;

TDatenInfoArray = Array of TDatenInfo;

Sobald du nun ein Item in deine vorherige Liste geaddet hast, erhöhst du hier die Array Größe und übergibst die Infos an das Record.
Am besten wäre es du verwendest SetLength nur einmalig vor dem adden aller items (da es sonst recht lange dauern kann).

[meisteralex]

hmm also quasi sowas wie nen zuordnungsarray ?

setlength(integerarray,maxneuerindex);
integerarray[alterindex] := neuerindex;

wäre ja das gleiche oder ?

[dahead]

Zitat von meisteralex:

hmm also quasi sowas wie nen zuordnungsarray ?

ja.

Zitat von meisteralex:

setlength(integerarray,maxneuerindex);
integerarray[alterindex] := neuerindex;
wäre ja das gleiche oder ?

wie meinst du das?

---

nochmal eine frage: was für daten willst du speichern/anzeigen? sind es strings? könntest du nicht auf die liste verzichten, indem du den Items bspw. eine Eigenschaft á la fVisible: Boolean verpasst und sie dann einfach beim anzeigen in der (nehme mal an:) ListView übergehst?

[Grishnak]

Ich denke, dass es mit einer TList klappen könnte:

Anfangs per "MyList.Count := Length(MyArray)" die Anzahl der Listenelemente setzen (die dann alle leer sind!)

Die einzelnen Items dann per "MyList.Insert()" einfügen. Hier kannst du die Einfügeposition selbst angeben!