外部変形を考える　＠ｓｂ

atime = fftime.split; atuki = atime[1]; ahi = atime[2]; anen = atime.last

etime = ftime.split; tuki = etime[1]; hi = etime[2]; nen = etime.last

afile = File.atime(file).strftime("%Y\/%m\/%d")

mfile = File.mtime(file).strftime("%Y\/%m\/%d")

# フォルダフルパス取得　外部変形Rubyスクリプト



  require 'vr/vruby'

  frm=VRLocalScreen.newform

    def frm.construct

      move 250,180,50,50

      dirpath = selectDirectory(title="検索対象フォルダを選択して下さい。(ルートドライブ選択不可)",initialdir=read_profile).to_s

      write_profile dirpath

      print dirpath

    end

    

    def read_profile

      if FileTest::exist?( "jFile.ini" )

        ini = open( "jFile.ini", 'r' )

        begin

          while ini.gets

            chomp!

            if ~ /^Folder=(.*)$/

              folder = $1

            end

          end

        ensure

          ini.close

        end

      end

      folder

    end

    

    def write_profile( dirpath )

      if dirpath != nil

        ini = open( "jFile.ini", 'w' )

        ini.print "[jFile]\n"

        ini.print "Folder=" + dirpath + "\n"

      end

    end

  frm.create.show