document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2.  
  3. \'No es necesario que exista la palabra Director
  4. \'Esta clase podría llamarse Concesionaria, Garage,etc
  5.  
  6. Private AutoConstructor As AutoBuilder
  7.  
  8. Public Sub construtAuto()
  9.  
  10.   AutoConstructor.crearAuto()
  11.   AutoConstructor.buildMarca()  
  12.   AutoConstructor.buildModelo()
  13.   AutoConstructor.buildMotor()
  14.   AutoConstructor.buildPuerta()
  15.  
  16. End
  17.  
  18. Public Sub setAutoBuilder(ab As AutoBuilder)
  19.  
  20.   AutoConstructor = ab
  21.  
  22. End
  23.  
  24. Public Function getAuto() As Auto
  25.  
  26.   Return AutoConstructor.getAuto()
  27.  
  28. End
');