Max := Bias.Position * Trunc(Log10(Math.Max(10, High(Files) * 10 div 3)));

> That was my point, the original describes exactly what was intended. One
> liners generally don't and tend to introduce errors

The "etc" kind of throws a spanner in the works. But yes, the
following is slightly more readable:

var Magnitude: Integer;

Magnitude := High(Files) * 10 div 3;
if Magnitude < 10 then Magnitude := 10;
Max := Bias.Position * Trunc(Log10(Magnitude));

Cheers,
Karl
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject: 
unsubscribe

Reply via email to