Zitat von
anfänger123:
geht das auch noch irgendwie anders
man könnte die "
function Max(const A, B: Integer): Integer;" benutzen ... (
uses Math)
Delphi-Quellcode:
uses
Math
...
var
maxwert
...
for i := 0 to Box.Items.Count-1 do maxwert := Max(StrToInt(Box.Items[i]),maxwert);
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.