File: test_filebrowser.sp

package info (click to toggle)
sitplus 1.0.3-3
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 23,636 kB
  • sloc: cpp: 34,437; ansic: 7,957; xml: 1,141; yacc: 326; lisp: 235; lex: 167; makefile: 107; sh: 5
file content (40 lines) | stat: -rwxr-xr-x 1,133 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
type test_filebrowser
name "test_filebrowser"

create file_browser dirs -p $SP_DATA_DIR$ -t d
create widget_choice slddirs_full -l "Full path"
create widget_choice slddirs_names -l "File names"
connect dirs paths slddirs_full options
connect dirs files slddirs_names options

create file_browser files -p $SP_DATA_DIR$ -t a
create widget_choice sldfiles_full -l "Full path"
create widget_choice sldfiles_names -l "File names"
connect files paths sldfiles_full options
connect files files sldfiles_names options

create widget_filepicker pick -t d -l "Pick a directory" -v $SP_DATA_DIR$
connect pick value dirs path
connect pick value files path

create widget_checkbox chk -l "Press to refresh"
connect chk value dirs refresh
connect chk value files refresh

begin_gui_layout
	layout_begin vbox
		component pick
		component chk
		layout_begin hbox
			layout_begin vbox "Directories"
				component slddirs_full
				component slddirs_names
			layout_end
			layout_begin vbox "Files"
				component sldfiles_full
				component sldfiles_names
			layout_end
		layout_end
	layout_end
end_gui_layout