Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#21

Re: TObjectList - Sort crash (D7)

  Alt 10. Feb 2009, 22:21
Moin Zusammen,

auch wenn der Ursprung des Threads schon recht alt ist, vielleicht liest es ja mal jemand, der ein Problem hat, wie der der TE.

Ich frage mich, warum die Methode MyNewItem als Funktion ausgeführt ist, da ja der Rückgabewert nicht verwendet wird.

So würde ich es mal probieren:

Delphi-Quellcode:
procedure TMyItemList.NewMyItem(a1,a2,a3:Integer);

var
  tmi : TMyItem;

begin
  tmi := TMyItem.Create(Self)
  tmi.V1 := a1;
  tmi.V2 := a2;
  tmi.V3 := a3;
  Self.Add(tmi);
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat