| changeset 346 | fc1e0a4f152c |
| parent 337 | a46abb65eb0c |
| child 351 | 29bc9c36ad5f |
| 345:fa39c61be4de | 346:fc1e0a4f152c |
|---|---|
161 str(n, Result) |
161 str(n, Result) |
162 end; |
162 end; |
163 |
163 |
164 function FloatToStr(n: Double): shortstring; |
164 function FloatToStr(n: Double): shortstring; |
165 begin |
165 begin |
166 str(n:5:5, Result) |
166 //str(n:5:5, Result) |
167 str(n, Result) |
|
167 end; |
168 end; |
168 |
169 |
169 {$IFNDEF FPC} |
170 {$IFNDEF FPC} |
170 function arctan2(const Y, X: Double): Double; |
171 function arctan2(const Y, X: Double): Double; |
171 asm |
172 asm |