Aggiunto recarray.h e modificate le set_notify
git-svn-id: svn://10.65.10.50/trunk@4008 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									edd3ea61d2
								
							
						
					
					
						commit
						16e977654f
					
				| @ -2,6 +2,10 @@ | ||||
| #include <relation.h> | ||||
| #endif | ||||
| 
 | ||||
| #ifndef __RECARRAY_H | ||||
| #include <recarray.h> | ||||
| #endif | ||||
| 
 | ||||
| /////////////////////////////////////////////////////////////
 | ||||
| // definizione dell'oggetto Effetto con la classe TEffetto // 
 | ||||
| /////////////////////////////////////////////////////////////
 | ||||
|  | ||||
| @ -119,19 +119,25 @@ bool Creazione_Effetti_da_EC::Gen_Handler(TMask_field& f, KEY k) | ||||
| 
 | ||||
| bool Creazione_Effetti_da_EC::Gen_Notify(TSheet_field& sheet, int r, KEY k) | ||||
| { | ||||
|   if (k == K_CTRL + K_DEL) | ||||
|     return TRUE; | ||||
|   if (k == K_INS) | ||||
|   { | ||||
|     if (app().get_res().is_zero()) | ||||
|     { | ||||
|       warning_box("Residuo da ripartire gia' annullato"); | ||||
|       return FALSE; | ||||
|     } | ||||
|     else | ||||
|       return TRUE; | ||||
|   } | ||||
|    | ||||
|   TToken_string & row = sheet.row(r); | ||||
|   const real importo(row.get(1)); | ||||
|   static real old_rata; | ||||
| 
 | ||||
|   switch (k) | ||||
|   { | ||||
|   case K_INS: | ||||
|     if (app().get_res().is_zero()) | ||||
|     { | ||||
|       warning_box("Residuo da ripartire gia' annullato"); | ||||
|       return FALSE; | ||||
|     } | ||||
|     break; | ||||
|   case K_SPACE: | ||||
|     old_rata = importo; | ||||
|     break; | ||||
|  | ||||
| @ -876,7 +876,7 @@ bool TVariazione_distinte::impdist_notify(TSheet_field& s, int r, KEY key) | ||||
| {             | ||||
|   if (s.to_check(key, TRUE))  | ||||
|     calcola_totale(); | ||||
|   if (key == K_INS) // se si vuole aggiungere una riga alla sheet degli effetti nella distinta
 | ||||
|   if (key == K_CTRL + K_INS) // se si vuole aggiungere una riga alla sheet degli effetti nella distinta
 | ||||
|     aggiungi();   | ||||
|   return TRUE; | ||||
| } | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user