fsupselector.form

来自「Gambas is a graphical development enviro」· FORM 代码 · 共 90 行

# Gambas Form File 1.0

{ FSupSelector Form
  Move(104,305,560,424)
  Text = ("")
  { Splitter HSplit
    Move(8,32,504,272)
    { TreeExplorer TreeView
      Move(0,40,184,200)
      Sorted = True
      Root = False
    }
    { Panel1 Panel
      Move(200,16,296,240)
      Arrangement = Arrange.Fill
      { ivExplorer IconView Explorer
        Move(32,0,184,208)
        Font = Font["8"]
        Arrangement = IconView.LeftRight
        GridX = 128
        WordWrap = True
      }
      { cvExplorer ColumnView Explorer
        Move(8,56,280,184)
        Font = Font["8"]
        Sorted = True
      }
    }
  }
  { cboLook ComboBox
    Move(72,0,304,24)
    Text = (" ")
  }
  { lblLook Label
    Move(0,0,64,24)
    Text = ("Look in")
  }
  { pnlButton Panel
    Move(384,0,96,24)
    { btnParent ToolButton
      Move(24,0,24,24)
      ToolTip = ("Parent directory")
      Text = ("")
      Picture = Picture["img/16/parent.png"]
    }
    { btnRefresh ToolButton
      Move(72,0,24,24)
      ToolTip = ("Refresh")
      Text = ("")
      Picture = Picture["img/16/refresh.png"]
    }
    { btnTypeList ToolButton
      Move(0,0,24,24)
      Text = ("")
    }
    { btnNewDir ToolButton
      Move(48,0,24,24)
      ToolTip = ("New directory")
      Text = ("")
      Picture = Picture["img/16/newdir.png"]
    }
  }
  { pnlFile Panel
    Move(0,328,528,56)
    { txtFile TextBox
      Move(128,0,328,24)
      Text = ("")
    }
    { cboFilter ComboBox
      Move(128,32,328,24)
      ToolTip = ("Select a filter")
      Text = (" ")
      ReadOnly = True
    }
    { lblFile TextLabel
      Move(0,0,128,24)
      Text = ("")
    }
    { lblFilter TextLabel
      Move(0,32,128,24)
      Text = ("Filters")
    }
  }
  { imgTimer #Timer
    #X = 504
    #Y = 352
    Delay = 25
  }
}