Patch level : 12.0 nopatch
Files correlati : ba3.exe ba3400a.msk Commento: modificato programma di test maschere
This commit is contained in:
		
							parent
							
								
									324c587781
								
							
						
					
					
						commit
						f05abe3f14
					
				@ -52,26 +52,24 @@ bool TTestrel_application::user_destroy()
 | 
			
		||||
// Testmask
 | 
			
		||||
///////////////////////////////////////////////////////////
 | 
			
		||||
 | 
			
		||||
class TTest_application : public TApplication
 | 
			
		||||
class TTest_application : public TSkeleton_application
 | 
			
		||||
{
 | 
			
		||||
  const char* _maskname;
 | 
			
		||||
 | 
			
		||||
protected:
 | 
			
		||||
  bool create() { return menu(0); }
 | 
			
		||||
  bool destroy() { return TRUE; }
 | 
			
		||||
  bool menu(MENU_TAG);
 | 
			
		||||
  void main_loop();
 | 
			
		||||
 | 
			
		||||
public:
 | 
			
		||||
  TTest_application(const char* name) : _maskname(name) {}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
bool TTest_application::menu(MENU_TAG)
 | 
			
		||||
void TTest_application::main_loop()
 | 
			
		||||
{            
 | 
			
		||||
  if (*_maskname)
 | 
			
		||||
  {
 | 
			
		||||
    TMask m(_maskname);
 | 
			
		||||
    KEY k = m.run();
 | 
			
		||||
    if (k == K_QUIT) stop_run();
 | 
			
		||||
 | 
			
		||||
		while (m.run() == K_ENTER);
 | 
			
		||||
  }
 | 
			
		||||
  else
 | 
			
		||||
  {        
 | 
			
		||||
@ -83,8 +81,6 @@ bool TTest_application::menu(MENU_TAG)
 | 
			
		||||
      m.run();
 | 
			
		||||
    }
 | 
			
		||||
  }
 | 
			
		||||
 | 
			
		||||
  return FALSE;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
///////////////////////////////////////////////////////////
 | 
			
		||||
 | 
			
		||||
@ -4,7 +4,7 @@ PAGE "Richiesta" -1 -1 76 12
 | 
			
		||||
 | 
			
		||||
STRING F_NOME 50
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 3 3 "Nome maschera"
 | 
			
		||||
  PROMPT 3 3 "Maschera "
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_OK 10 2
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user