Ich benutze für die selection einer Lisbox ein variantes record. In diesen kann man aber keine dynamischen Arrays selbst benutzen, da der Compiler zur lafuzeit nicht weiß welche variante genommen wurde. Man muss den Speicehr selbst verwalten. Ich habe nun das variante Record folgendermaßen festgelegt:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| TDynIntArray = array of Integer; PDynIntArray = ^TDynIntArray;
LBSelection = record case MultiSel: Boolean of False: (Index: Integer); True: (Indexes: PDynIntArray); end; |
Aber das mit dem selbstzuverwaltenden Speicher kann ich nicht.... d.h. ich wollte fragen ob da ein
Free(LBSEL1.Indexes) am Ende reicht, oder wie das zu machen ist ??
.: Es wird der Tag kommen, an dem wir es nicht mehr ändern können :.