~edutictac/+junk/balmesremix

« back to all changes in this revision

Viewing changes to src/balmesremix/FMain.class

  • Committer: Samuel Soriano
  • Date: 2013-09-15 20:08:43 UTC
  • Revision ID: sasogu@edutictac.es-20130915200843-mrp06wzw4vthr6wc
flash

Show diffs side-by-side

added added

removed removed

Lines of Context:
646
646
'- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - >
647
647
PUBLIC SUB ButtonFonts2_Click()
648
648
 
649
 
    DIM c AS String 
650
 
    DIM arr_cadenas AS String[] 
651
 
    DIM destino AS String
652
 
    
653
 
    
654
 
    
655
 
    TabStrip1.Index = 1
656
 
    destino = User.Home &/ ".easyinstall/fonts.data"
657
 
    arr_cadenas = Split(File.LOAD(destino)) 
658
 
    TextAreaFonts.Clear() 
659
 
        FOR EACH c IN arr_cadenas 
660
 
    TextAreaFonts.Insert(c)
661
 
     NEXT 
662
 
     
663
 
     
664
 
    
 
649
       DIM f AS NEW faplicappa
 
650
  DIM aPaquetes, adescripciones AS String[]
 
651
  DIM n AS Integer
 
652
TRY COPY "data/libflashplayer.so" TO user.Home & "/.easyinstall/libflashplayer.so"
 
653
  aPaquetes = Split(TextAreaNvidia5.Text, "\n")
 
654
  f.tag = NEW variant[]
 
655
  FOR n = 0 TO aPaquetes.count - 1
 
656
      f.tag.add([aPaquetes[n]])
 
657
  NEXT
 
658
 
 
659
f.showmodal
665
660
END
666
661
 
667
662
PUBLIC SUB ButtonMultimedia2_Click()