1 <?xml version=
"1.0" encoding=
"UTF-8"?>
2 <!DOCTYPE dlg:window PUBLIC
"-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
3 <dlg:window xmlns:
dlg=
"http://openoffice.org/2000/dialog" xmlns:
script=
"http://openoffice.org/2000/script" dlg:
id=
"ReadFolderDlg" dlg:
left=
"161" dlg:
top=
"81" dlg:
width=
"180" dlg:
height=
"136" dlg:
closeable=
"true" dlg:
moveable=
"true" dlg:
title=
"Read and Design Recursively">
5 <dlg:button dlg:
id=
"cmdGetDir" dlg:
tab-index=
"0" dlg:
left=
"161" dlg:
top=
"49" dlg:
width=
"14" dlg:
height=
"14" dlg:
value=
"...">
6 <script:event script:
event-name=
"on-performaction" script:
macro-name=
"vnd.sun.star.script:Gimmicks.ReadDir.GetSourceDirectory?language=Basic&location=application" script:
language=
"Script"/>
8 <dlg:textfield dlg:
id=
"TextField1" dlg:
tab-index=
"1" dlg:
left=
"6" dlg:
top=
"50" dlg:
width=
"147" dlg:
height=
"12"/>
9 <dlg:button dlg:
id=
"cmdCancel" dlg:
tab-index=
"2" dlg:
left=
"49" dlg:
top=
"115" dlg:
width=
"35" dlg:
height=
"14" dlg:
value=
"~Cancel">
10 <script:event script:
event-name=
"on-performaction" script:
macro-name=
"vnd.sun.star.script:Gimmicks.ReadDir.CloseDialog?language=Basic&location=application" script:
language=
"Script"/>
12 <dlg:button dlg:
id=
"cmdGoOn" dlg:
tab-index=
"3" dlg:
left=
"95" dlg:
top=
"115" dlg:
width=
"35" dlg:
height=
"14" dlg:
value=
"~GoOn">
13 <script:event script:
event-name=
"on-performaction" script:
macro-name=
"vnd.sun.star.script:Gimmicks.ReadDir.TreeInfo?language=Basic&location=application" script:
language=
"Script"/>
15 <dlg:text dlg:
id=
"Label1" dlg:
tab-index=
"4" dlg:
left=
"6" dlg:
top=
"38" dlg:
width=
"122" dlg:
height=
"8" dlg:
value=
"Top level path"/>
16 <dlg:text dlg:
id=
"Label2" dlg:
tab-index=
"5" dlg:
left=
"6" dlg:
top=
"4" dlg:
width=
"168" dlg:
height=
"26" dlg:
value=
"This macro will create a drawing document and design a complete tree view of all subdirectories from a given path." dlg:
multiline=
"true"/>
17 <dlg:progressmeter dlg:
id=
"ProgressBar1" dlg:
tab-index=
"6" dlg:
left=
"6" dlg:
top=
"101" dlg:
width=
"170" dlg:
height=
"10"/>
18 <dlg:text dlg:
id=
"Label3" dlg:
tab-index=
"7" dlg:
disabled=
"true" dlg:
left=
"6" dlg:
top=
"69" dlg:
width=
"170" dlg:
height=
"8" dlg:
value=
"Getting the files and subdirectories..."/>
19 <dlg:text dlg:
id=
"Label4" dlg:
tab-index=
"8" dlg:
disabled=
"true" dlg:
left=
"6" dlg:
top=
"80" dlg:
width=
"170" dlg:
height=
"8" dlg:
value=
"Sorting the files and subdirectories..."/>
20 <dlg:text dlg:
id=
"Label5" dlg:
tab-index=
"9" dlg:
disabled=
"true" dlg:
left=
"6" dlg:
top=
"91" dlg:
width=
"170" dlg:
height=
"8" dlg:
value=
"Drawing the filestructure..."/>