Array-Element löschen

[alzaimar]

Wenn Du Move verwendest, geht es noch schneller und ist weniger Code = weniger anfällig:

Delphi-Quellcode:

procedure TFeldliste.DeleteField(Index: Integer);
var i,l : integer;
begin
  L := length(FListe);
  if index < L-1 Then 
    move (fListe[Index + 1], fListe [Index], SizeOf (Fliste[0])* (L - Index - 1));
  setlength(Fliste, length(fliste)-1);
End;

Aber ehrlich, ich verstehe nicht, was hier viele 'Experten' gegen eine TList haben. Das ist doch schnell genug und macht das alles schon. Ich kenne nicht allzuviele Anwendungen, die so zeitkritisch sind, das man sich ein TExtremelyFastList bauen müsste.

Wenn ich die vorgefertigten Klassen von Delphi nehme, habe ich doch ein paar Sorgen weniger, weil das schonmal funktioniert... Und wenn ich Performanceprobleme bekomme, dann nehme ich mir einen Profiler. Der zeigt mir die Bottlenecks. Wenn TList der Bösewicht ist, wird ausgetauscht. Aber nur dann...

[Robert_G]

Zitat:

Zitat von r2c2

Zitat:

Zitat von Robert_G

TList selbst ist ja auch nur ein Array, nur halt in einer verwendbaren Kapselung... :)

Wirklich? Ich dachte immer n List funktioniert über Pointer: Jedes Item hat n Pointer auf das vorherige und das nächste...

TList ist KEINE linked List! ;)

@Topic
Das geht so:

Delphi-Quellcode:

TObjectList.Remove(DeinObject);

Damit wird es auch automatisch freigegeben, solange OwnsObjects True ist. (In meinem BeispielCode ist es True. ;) )
Falls du nur über Index darauf zugreifst könnte man sich eine Ankürzung machen und das hier noch hinzufügen:

Delphi-Quellcode:

   TFeldDingslist = class(TObjectList)
   ...
   public
   ...
      procedure Remove(aIndex: Integer); virtual;
   ...
implementation
...
procedure Remove(aIndex: Integer);
begin
   Remove(Items[aIndex]);
end;

[r2c2]

[quote="Robert_G"]

Zitat:

Zitat von r2c2

Zitat:

Zitat von Robert_G

TList selbst ist ja auch nur ein Array, nur halt in einer verwendbaren Kapselung... :)

Wirklich? Ich dachte immer n List funktioniert über Pointer: Jedes Item hat n Pointer auf das vorherige und das nächste...

TList ist KEINE linked List! ;)
quote]
Gut, dann hab ich wirklich was verpeilt. Das muss ich mir dann nochmal angucken.

mfg

Christian

[Robert_G]

Zitat:

Zitat von alzaimar

Aber ehrlich, ich verstehe nicht, was hier viele 'Experten' gegen eine TList haben. Das ist doch schnell genug und macht das alles schon. Ich kenne nicht allzuviele Anwendungen, die so zeitkritisch sind, das man sich ein TExtremelyFastList bauen müsste.

Moin,
ich glaube hier hat keiner was gegen TList gesagt, außer ich in der letzten Zeile des Beitrages hinter dem Link. ;)
Ich habe eigentlich nur aus 2 Gründen etwas gegen TList a) sie steht in Classes.pas und b) sie hat ihre Methoden nicht virtual.
Ich selbst verwende sie nicht sondern eigene Implementierungen, die auf entweder Array oder Listen bzw. Baum -basiert sind.
Da ich diese aber nicht rausrücken will ( :P ) denke ich dass eine TList-Ableitung hier prima ihren Job erfüllt. ;)

[Marphy]

Hallo,

Zitat:

Zitat von alzaimar

Und wenn ich Performanceprobleme bekomme, dann nehme ich mir einen Profiler. Der zeigt mir die Bottlenecks.

Mal wieder ein wenig OT, frage nur ganz kurz... :mrgreen: Wo kann ich einen günstigen Profiler kaufen bzw. herunterladen? D.h. könnt ihr mir ein paar (Delphi-)Profiler nennen? Danke!

Gruß, Marco :angel2: