Hallo,
Delphi-Quellcode:
property Count: Integer
property Items[const AIndex: Integer]: IAuto
Also hier wäre erst mal das aCount und das Array-Property
also jetzt mal den BubbleSort so hingeschludert.
Delphi-Quellcode:
var
i. j: Integer;
Auto_i: IAuto;
Auto_j: IAuto;
Auto_Temp: IAuto;
for i:= 0
to Count-1
do
begin
for j:= i+1
To Count-1
do
begin
Auto_i:= Items[i];
Auto_j:= Items[j];
if Auto_j.XXX<Auto_i.XXX
then
begin
Auto_Temp:= Auto_i;
Auto_i:= Auto_j;
Auto_j:= Auto_Temp;
end;
end;
end;
Das
XXX ist irgendein ein Vergleichskriterium.
Aber auch mir ist schleierhaft, was das soll ?
weder zum Sort-Üben noch zum Interface-Üben geeignet,
weil 2 Sachen gemischt werden
#Update#
Es muss natürlich das
< sein
Auto_j.XXX<Auto_i.XXX
Heiko