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