Something akin to:
Max := Int (Math.Log10 (High (Files)/ 3.0 - 0.1)) *
BiasPositon;
Above assumes Max is a Float need to convert to Integer otherwise :)
Glenn Crouch, <mailto:gl...@esbconsult.com> mailto:gl...@esbconsult.com
ESB Consultancy, <http://www.esbconsult.com/> http://www.esbconsult.com
Follow us on Twitter: http://twitter.com/esbglenn
Home of ESBPCS and ESB Calculators
Kalgoorlie-Boulder, Western Australia
From: delphi-boun...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz] On
Behalf Of Ross Levis
Sent: Tuesday, 11 January 2011 9:25 am
To: 'NZ Borland Developers Group - Delphi List'
Subject: [DUG] Maths problem for the day
Convert the following into one line.
if High(Files) < 30 then Max := Bias.Position
else if High(Files) < 300 then Max := Bias.Position*2
else if High(Files) < 3000 then Max := Bias.Position*3
else if High(Files) < 30000 then Max := Bias.Position*4
etc
I think there must be a way. Probably using the Power function, but I can't
get my head around it.
_______________________________________________
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
