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;
 | 
			
		||||
 | 
			
		||||
  if (toolbar || toolwin())
 | 
			
		||||
 | 
			
		||||
@ -401,7 +401,7 @@ break;
 | 
			
		||||
      const int col = cid - FIRST_FIELD;
 | 
			
		||||
      TMask_field* f = field(cid);
 | 
			
		||||
      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
 | 
			
		||||
      }
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user