Es ist eigentlich nicht schwer. Die Items fangen bei 0 an und hören z.B. bei 255 auf --> das letzte Item hat die höchste Zahl (255).
Delphi-Quellcode:
for i := 0
to isbListe.Items.Count - 1
do
begin
gbMaxi.Caption := IntToStr(max(StrToInt(isbListe.Items[i]), -1));
// Hier wird ganz einfach das höchste Item in ein Label mit dem Namen "gbMaxi" geschrieben. IsbListe ist die ListBox.
// max - Siehe OH
end;