Ini Datei nach schlüsseln sortiert und in Stringgrid eintragen dauert zu lange?

[Blup]

Ich versteh nicht wo eigentlich das Problem mit doppelten Namen ist?

Delphi-Quellcode:

TMyPerson = class(TObject)
  Nr: Integer;
  Name: string;
  NachName: string;
  Kostenstelle: string;
  Punkte: Integer;
end;

function ComparePersonByNachName(AItem1, AItem2: Pointer);
begin
  Result := AnsiCompareText(TMyPerson(AItem1).Name, TMyPerson(AItem2).Name);
end;

function ComparePersonByNr(AItem1, AItem2: Pointer);
begin
  Result := TMyPerson(AItem1).Nr - TMyPerson(AItem2).Nr;
end;

function ComparePerson(AItem1, AItem2: Pointer);
begin
  Result := ComparePersonByNachName(AItem1, AItemn2);
  if Result <> 0 then Exit;
  Result := ComparePersonByNr(AItem1, AItemn2);
end;

FMyPersonList: TObjectList;
{...}
PersonenEinlesen;
FMyPersonList.Sort(ComparePerson);
PersonenAusgeben;

[DeddyH]

Das Problem besteht, wenn man lediglich die Namen in einer ListBox o.ä. vorhält, dann weiß man bei Click auf einen mehrfach vorhandenen nicht, welcher gemeint ist. Daher würde ich wie schon angedeutet zumindest die Personalnummer, aber besser noch das ganze Personenobjekt in TStrings.Items.Objects ablegen.

[Uwe Raabe]

Liege ich da jetzt so falsch oder warum war mir nach drei Sätzen klar, daß man sowas viel einfacher mit TClientDataSet und TDbGrid implementiert (wenn man denn nicht auf eine richtige Datenbank gehen will)? Selbst wenn ich gleichzeitig mehrere unterschiedlich sortierte Listen darstellen will, lässt sich das damit relativ unproblematisch lösen.

[DeddyH]

*Pfh*, das ist doch was für Warmduscher, ein bisschen muss es schon noch weh tun