![]()  | 
	
 
  | 
| 
		 
			 
			#1  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Имеется запись  
		
	
		
		
		
		
		
	
		
		
	
	
	Код: 
	v0:=v1-(v1*1/100);  | 
| 
		 
			 
			#2  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Сделал так 
		
	
		
		
		
		
		
	
		
		
	
	
	Код: 
	v0:=v1-simpleroundto((v1*1/100), -2);  | 
| 
		 
			 
			#3  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 почитай про 
		
	
		
		
		
		
			
		
		
		
		
		
			http://www.delphibasics.ru/Format.php а проще FloatToStrF p.s. тем более если округление используется, например, один раз, то подключать модуль Math как-то не очень Последний раз редактировалось Mrak, 17.02.2014 в 11:07.  |