Array neue Function zuweisen

[JasonDX]

Zitat:

Zitat von Sascha_OW

aber in einer TList kann man da nicht nur StringsSpeichern, dann hat man bei integern immer das nervige Strtoint

StrToInt wirst du nie verwenden müssen, wenn du keine Strings darin Speicherst ;)
In TList werden lediglich Pointer gespeichert. Wenn du dies ändern möchtest, kannst du die Klasse ableiten und die Benötigten Funktionen überschreiben:

Delphi-Quellcode:

TMyIntegerList = class(TList)
protected
  function Get(Index: Integer): Integer;
  procedure Put(Index: Integer; Item: Integer);
public
  function Add(Item: Integer): Integer;
  function IndexOf(Item: Integer): Integer;
  procedure Insert(Index: Integer; Item: Integer);
  function Remove(Item: Integer): Integer;
  property Items[Index: Integer]: Integer read Get write Put; default;
end;

//...

function TMyIntegerList.Get(Index: Integer): Integer;
begin
  result := Integer(inherited Get(Index));
end;

Nachdem das ganze ziemlich nur aus inherited-Aufrufen und Typecasts besteht haste mit wenig Schreibarbeit deine eigene Liste mit relativ hoher Funktionalität.

greetz
Mike

[alcaeus]

Zitat:

Zitat von JasonDX

Wenn du dies ändern möchtest, kannst du die Klasse ableiten und die Benötigten Funktionen überschreiben

Ach menno....keine Fantasie diese Jugend von Heute. Warum soll ich mir selbst die Arbeit machen, wenn sie auch der Compiler erledigen kann?

Ich empfehle dir mal einen Blick auf die TList-Templates: http://www.delphipraxis.net/internal...ct.php?t=56879

Wenn du Delphi nicht sehr gut kannst, dann belasse es bei der Verwendung der Templates, und versuche nicht, den Rest dahinter zu verstehn. Es sind einfach nur jede Menge Compilerswitches, die es dir ersparen, die Klasse selbst abzuleiten. Einfach den Listentypen definieren, die Datei einbinden, und gut is :)

Greetz
alcaeus