Rinominata la maschera di gestione stampa su dischetti da tfilepr a bagn004
git-svn-id: svn://10.65.10.50/trunk@94 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									3067a41d90
								
							
						
					
					
						commit
						2f6ed34fe3
					
				
							
								
								
									
										60
									
								
								include/bagn004.uml
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										60
									
								
								include/bagn004.uml
									
									
									
									
									
										Executable file
									
								
							| @ -0,0 +1,60 @@ | |||||||
|  | 
 | ||||||
|  | // | ||||||
|  | // tfilepr.uml | ||||||
|  | // | ||||||
|  | 
 | ||||||
|  | #include <tfilepr.h> | ||||||
|  | 
 | ||||||
|  | PAGE "Stampa su disco" -1 -1 55 13 | ||||||
|  | 
 | ||||||
|  | RADIOBUTTON F_FORMATO_DISCO  18 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 2 2 "Formato dischetto" | ||||||
|  |   HELP "Scegli il tipo di dischetto che intendi utilizzare" | ||||||
|  |   ITEM "1|360" | ||||||
|  |   ITEM "2|1,2" | ||||||
|  |   ITEM "3|720" | ||||||
|  |   ITEM "4|1,44" | ||||||
|  |   ITEM "5|2,88" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | LIST F_DRIVE 2 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 27 2 "Drive destinazione " | ||||||
|  |   HELP "Scegliere il drive di destinazione della stampa" | ||||||
|  |   ITEM "1|A:" | ||||||
|  |   ITEM "2|B:" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | STRING F_FILE_DESTINAZIONE 13 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 27 4 "Nome file " | ||||||
|  |   HELP "Assegna il nome del file che verra' generato" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | STRING F_LABEL 12 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 27 5 "Etichetta  " | ||||||
|  |   HELP "Etichetta che verra' assegnata ai dischetti" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | BOOLEAN F_FORMATTA | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 27 7 " Formatta dischetti" | ||||||
|  |   HELP "Formatta ogni dischetto prima di scriverlo" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | BUTTON DLG_OK 9 3 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 14 10 "" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | BUTTON DLG_CANCEL 9 3 | ||||||
|  | BEGIN | ||||||
|  |   PROMPT 30 10 "" | ||||||
|  | END | ||||||
|  | 
 | ||||||
|  | ENDPAGE | ||||||
|  | 
 | ||||||
|  | ENDMASK | ||||||
|  | 
 | ||||||
| @ -760,12 +760,6 @@ WINDOW TMask::read_page(TScanner& scanner, bool toolbar) | |||||||
|     } |     } | ||||||
|   } |   } | ||||||
| 
 | 
 | ||||||
|   if (mode() == MODE_SEARCH) |  | ||||||
|   { |  | ||||||
|     title.insert("RICERCA: ", 0); |  | ||||||
|     r.bottom = 12; |  | ||||||
|   } |  | ||||||
| 
 |  | ||||||
|   WINDOW w; |   WINDOW w; | ||||||
| 
 | 
 | ||||||
|   if (toolbar || toolwin()) |   if (toolbar || toolwin()) | ||||||
|  | |||||||
| @ -401,7 +401,7 @@ break; | |||||||
|       const int col = cid - FIRST_FIELD; |       const int col = cid - FIRST_FIELD; | ||||||
|       TMask_field* f = field(cid); |       TMask_field* f = field(cid); | ||||||
|       src = row(rec).get(col);                  // Set value for cell
 |       src = row(rec).get(col);                  // Set value for cell
 | ||||||
|       if (src && *src && f->class_id() == CLASS_REAL_FIELD) |       if (src && *src && (f->class_id()==CLASS_REAL_FIELD || f->class_id()==CLASS_DATE_FIELD)) | ||||||
|       { |       { | ||||||
|         src = f->picture_data(src, FALSE);      // Get formatted string
 |         src = f->picture_data(src, FALSE);      // Get formatted string
 | ||||||
|       } |       } | ||||||
|  | |||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user