Skip to content

Commit 76c6c63

Browse files
authored
Add files via upload
1 parent 57e4fce commit 76c6c63

File tree

5 files changed

+186
-185
lines changed

5 files changed

+186
-185
lines changed

FileDialogDemo.twinproj

-22 Bytes
Binary file not shown.

tbShellTree.twinproj

60 Bytes
Binary file not shown.

ucShellBrowse.tbcontrol

Lines changed: 107 additions & 107 deletions
Large diffs are not rendered by default.

ucShellTree.tbcontrol

Lines changed: 75 additions & 75 deletions
Original file line numberDiff line numberDiff line change
@@ -1,76 +1,76 @@
1-
[
2-
{
3-
"AccessKeys": null,
4-
"Alignable": false,
5-
"Appearance": "vbAppear3d",
6-
"AutoRedraw": false,
7-
"BackColor": -2147483633,
8-
"BackStyle": "vbBFOpaque",
9-
"BorderStyle": "vbNoBorder",
10-
"CanGetFocus": true,
11-
"ClipBehavior": "vbClipUseRegion",
12-
"ClipControls": true,
13-
"ControlContainer": false,
14-
"DataBindingBehavior": "vbDataBindingNone",
15-
"DataSourceBehavior": "vbDataSourceNone",
16-
"DefaultCancel": false,
17-
"DrawMode": "vbCopyPen",
18-
"DrawStyle": "vbSolid",
19-
"DrawWidth": 1,
20-
"EditAtDesignTime": false,
21-
"Enabled": true,
22-
"FillColor": 0,
23-
"FillStyle": "vbFSTransparent",
24-
"FontBold": false,
25-
"FontItalic": false,
26-
"FontName": "Segoe UI",
27-
"FontSize": 8,
28-
"FontStrikethru": false,
29-
"FontTransparent": true,
30-
"FontUnderline": false,
31-
"ForeColor": -2147483630,
32-
"FormDesignerId": "{152922CC-D332-4D27-BEF0-7D0887461FEF}",
33-
"ForwardFocus": false,
34-
"HasDC": true,
35-
"Height": 47,
36-
"HitBehavior": "vbHitTestUseRegion",
37-
"Index": -1,
38-
"InvisibleAtRuntime": false,
39-
"KeyPreview": false,
40-
"Left": 0,
41-
"MaskColor": -2147483633,
42-
"MaskPicture": "",
43-
"MouseIcon": "",
44-
"MousePointer": "vbDefault",
45-
"Name": "myToolWindow",
46-
"OLEDropMode": "vbOLEDropNone",
47-
"Palette": "",
48-
"PaletteMode": "vbPaletteModeContainer",
49-
"Picture": "",
50-
"PictureDpiScaling": true,
51-
"Public": true,
52-
"ResizeToContainer": true,
53-
"RightToLeft": false,
54-
"ScaleHeight": 70.5,
55-
"ScaleLeft": 0,
56-
"ScaleMode": "vbPixels",
57-
"ScaleTop": 0,
58-
"ScaleWidth": 90,
59-
"Tag": null,
60-
"ToolboxBitmap": "AAABAAIAGBgAAAEACADIBgAAJgAAABAQAAABAAgAaAUAAO4GAAAoAAAAGAAAADAAAAABAAgAAAAAAKACAAAAAAAAAAAAAAABAAAAAAAAAAAAADU1NQAyODoANDo8ADc9PwA+Pj4ANEpQADpNUgBFRUUAS0tLAExMTABAWF4ASFteAFJSUgBVVVUAUVdZAFtdXQBfYmIAXmNlAEFxfwBjZGUAZmdnAGlpaQBxcXEAen19ALCxdwC6un8AQXOBAERzgABJd4MAYn2FAFWIlgBxhooAYY6aAESWqwBNmq0ATp60AF2ktABiobIAY6i2AGiquAB3q7gAcLK9AESpxgBOq8YARa7JAEmuyABJr8wAUazGAFWyzABWts8AXbPJAE651gBOv9wAUrbQAFW30gBat9AAVbnRAFO41ABautEAXrnRAF271gBfv9UAUb/bAGm8wQBztcQAdr7BAHa6zgB1vs8AeL/PAGO80wBrv9MATsHeAFLA2gBXwdkAUcHdAFXC3QBcxd8Af8DMAGLC1wBpwdYAYsLaAGXC2ABjxNsAacPYAGnF2gBtxtoAb8jbAG3I3ABywtQAfcLUAHjG1wBzxdgAecfZAH3H2QB2yNoAccrdAHTL3wB8ydsAecreAFTE4ABZxuEAXsniAGHJ4gBmzOMAZs3kAGnM4wBpz+UAds7gAHLP5AB5zuAAfs/iAG3Q5gB30OIAcdDlAHbT5wB80OIAe9HkAHvU5wB81OQActPoAHTT6AB31ukAe9XoAHzY6gCOnJ0Ag5qgAJOgoACVoaEAm6SlAIS3pgCBuKgAhLisAIe9rACIvLAAgrG5AJuwtACQs7oAo6OjAMHOsgCMxsYAi8jHAIDL2QCNyNkAiM7fAJDG1QCfy9IAkM7eAIfR3wCQ0N8ArNLUAK/V1wCx1NYAsNTfAILS5ACB1OUAhdTlAIjR4ACM0eEAjNThAIjV5wCL2ecAgNfpAIvX6ACD2usAitzsAJDS4QCR1+cAldXkAJjV4wCZ1uUAkdrnAJfZ5wCb2OcAntjmAJDZ6wCc3OkAoNXkAKrb5wCu3OYApN3qAKnd6QCt3ekAst/qALXf6ACP4e8AkuDtAJ3h7gCP4fAAlePwAJDk8gCV5PEAmuTxAJ3p9ACf7fgAoeHsAKTh7wCh5O4ArOHsALHh7AC84+0AvuXvAKHk8gCv4/AAoOjyAKHq9QCm6PUAoe72AKbt9gCp7PYAqO/4ALTl8QC07vIAse72AL/v8gCz7/gApfD4AK/x+ACy8PcAsfH4ALXz+QCz9voAtPb6ALv2+gC9+PwAx9TXAMzY2QDH3+IAxObuAMni6ADN5OsAx+fwAMnq8QDM6vEAzuzzAMzs9ADT7vQAw/T5AMP4+wDK+PsA3PD0ANn1+QDU+fwA3/j6AOPx9QDk8/UA4Pf5AOr2+ADu9vkA4vr8AOv6/AD0+foA+/z8AL+x/wDa0f8A////AAAA+/jw5LKVXlqRmeb0+Pv7+/v7/AAAAAAA6MeunmNQOzEzQ4+xtba2x7fI6fUAAAAArG5YVVRPPjcuLDE9UVNTU1VjqecAAAAAnHFxYGBVUjktKy80P0tLS0pPX7YAAAAAm3ebdGxhVTktKy80NUhIP0CCQq4AAAAAnI5OKignJSMiJDA0NUhISYMZhKkAAAAAnYcgDAcHBwYLHiY6ZEhISYUahqoAAAAAn4kYBQEFBQUIDx83TGRkZI2LjKoAAAAAq5KAEAkNDg4KBBs3TWZlZabjk60AAAAAusOWgBQIDQ4NAxM4Z2dmZ6jlla0AAAAAv8/Ul30WCgoKAxM8anBpaa3lla0AAAAAv8/d2piAEQoIAhxGcnhwcKe4kK0AAAAAwNjd3tSXgRYFAh1Qenx6eXubYbAAAAAAwdjd3d7t4ooXEiFcpKSkfHNtb8cAAAAAwtjd3t7v9eGIfilupby8pHt1sOoAAAAAwdje3t3u+bNFQURvusC/vKKayfgAAAAAwtje3t7u87RWR1yawM3BwKSc6fwAAAAAzdLe3t7v+cZXWV2gzNnQzaWg6fwAAAAAwtje3t7v+cZXWWKj0NzZ0rqj6fwAAAAAwtjd3u/5+sZhW5272t/c28Cj6/wAAAAAwtLe7vL58cNulMPV3+Dg3Mqv6vwAAAAAzdjg7+3RzKGcxdff4ODf3My77PwAAAAA0cLS19C+paSlwM7Nzs3MzMXL8PwAAAAA7dXR0c7KysrKysrKu7u7xNPr9/wAAMAABwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAAAAAAAAAAOjo6ADw8PAAzP0IAND9BADZBRABBQUEAREREAEpKSgBRUVEAVlZWAFFeYQBga2wAdXp6AHp6egB4fH0AQXOAAEV0gQBEd4YATnyIAGKcrQBHobkAU6m+AHSmsgBFq8cATq7KAEqvzQBQrscAU7fPAF+1zwBPvdsAVrrSAFC92gBSv9wAaLfIAGu7zwBtu80AcLvKAE7B3gBawNQAUMHdAFnC3QBhwNYAasHVAG7E1QBhxt8AacTaAGvH3ABvx90AdMHUAH7H1AB3xdgAecfaAHDJ3QB3yt4AeMvdAFXE4ABZxuEAXsniAGPM5ABry+IAas/lAHXO4gB30eMAcNLnAHbQ5QB50OEAfNDgAHnT5wB41OcAd9XpAH7W6AB+2esAjJeaAIm2nwCStpsAl7+mAJ6/owCCt8EAjsTUAIDL3ACXytMAn9XdAK/Q0gCl1NoAs9DSAIbT5ACL1eYAgNboAIba6gCG3O0AidrpAI7e7QCa1+YAn9fkAJnc5wCU3eoAlt/uAJrf7wCn1+MAoNbkAKTa5wCh2+gAr9/qAI3g7wCV4e8AluDwAJTk8QCZ4fEAmubxAJ/k8QCf5/QAnejzAJvr9QCd7fYAn+74AK7i7QC14+8AsuTuALbl7wCv5PAAouv1AKnt9gCh7/gAtufwALjl8AC66fIAvuz0AK/x+AC18/cAs/H4ALTz+QCz9voAtPf7AL3y+QC49fsAufj7AL34/ADJ0NIAwN7nAMTq8gDA7vYAyenxAMLw9wDD8fgAxfH5AML2+wDe8fYA0/b4ANH6/ADU+fwA2Pv9AN78/QDk8/cA6PT3AO73+QDq+/0A/9KxAP/l0QD///8AAAAAAC8DAABQBAAAcAYAAJAJAACwCgAAzwwAAPAOAAD/IBIA/z4xAP9cUQD/enEA/5eRAP+2sQD/1NEA////AAAAAAAvAA4AUAAXAHAAIQCQACsAsAA2AM8AQADwAEkA/xFaAP8xcAD/UYYA/3GcAP+RsgD/scgA/9HfAP///wAAAAAALwAgAFAANgBwAEwAkABiALAAeADPAI4A8ACkAP8RswD/Mb4A/1HHAP9x0QD/kdwA/7HlAP/R8AD///8AAAAAACwALwBLAFAAaQBwAIcAkAClALAAxADPAOEA8ADwEf8A8jH/APRR/wD2cf8A95H/APmx/wD70f8A////AAAAAAAbAC8ALQBQAD8AcABSAJAAYwCwAHYAzwCIAPAAmRH/AKYx/wC0Uf8AwnH/AM+R/wDcsf8A69H/AP///wAAAAAACAAvAA4AUAAVAHAAGwCQACEAsAAmAM8ALADwAD4R/wBYMf8AcVH/AIxx/wCmkf8Av7H/ANrR/wD///8AAACZjl4zI0+Lk5qampsAAACOVjUuKhwbHS41MDZdAAAAfD9CPi8fGBoeKCgnLAAAAHxDMiUiFhUZHiYmSksAAAB+TgwDBQMLFCE4JkxNAAAAflEPBwkJBxIpOThSVAAAAH9tUw0ICgYQLTs6ZWMAAAB/cYFTDQgCETxAPWZkAAAAjXKFgVUOARNBSEZFPgAAAI9zhYWUikkXWGhaRFcAAACQc4WFlmckMVtwa0d0AAAAkXuFhZd0KzRpenlZdQAAAJF7hYiYdixQboOAXHcAAACRe4iVnHQ3X4OJh2l9AAAAkXOShnBbYIKHh4NujAAAAAB6eW9samxsYmFieJMAAMADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAMADAAA=",
61-
"Top": 0,
62-
"Width": 60,
63-
"Windowless": false,
64-
"__IDEOptions": {
65-
"alignToGrid": false,
66-
"gridHeight": 10,
67-
"gridWidth": 10,
68-
"lockedControls": [],
69-
"showGrid": true,
70-
"showOutlines": false
71-
},
72-
"__lastUpdateMarker": 3157801722,
73-
"_className": "UserControl",
74-
"_clsid": "{33AD5010-6699-11CF-B70C-00AA0060D393}"
75-
}
1+
[
2+
{
3+
"AccessKeys": null,
4+
"Alignable": false,
5+
"Appearance": "vbAppear3d",
6+
"AutoRedraw": false,
7+
"BackColor": -2147483633,
8+
"BackStyle": "vbBFOpaque",
9+
"BorderStyle": "vbNoBorder",
10+
"CanGetFocus": true,
11+
"ClipBehavior": "vbClipUseRegion",
12+
"ClipControls": true,
13+
"ControlContainer": false,
14+
"DataBindingBehavior": "vbDataBindingNone",
15+
"DataSourceBehavior": "vbDataSourceNone",
16+
"DefaultCancel": false,
17+
"DrawMode": "vbCopyPen",
18+
"DrawStyle": "vbSolid",
19+
"DrawWidth": 1,
20+
"EditAtDesignTime": false,
21+
"Enabled": true,
22+
"FillColor": 0,
23+
"FillStyle": "vbFSTransparent",
24+
"FontBold": false,
25+
"FontItalic": false,
26+
"FontName": "Segoe UI",
27+
"FontSize": 8,
28+
"FontStrikethru": false,
29+
"FontTransparent": true,
30+
"FontUnderline": false,
31+
"ForeColor": -2147483630,
32+
"FormDesignerId": "{152922CC-D332-4D27-BEF0-7D0887461FEF}",
33+
"ForwardFocus": false,
34+
"HasDC": true,
35+
"Height": 47,
36+
"HitBehavior": "vbHitTestUseRegion",
37+
"Index": -1,
38+
"InvisibleAtRuntime": false,
39+
"KeyPreview": false,
40+
"Left": 0,
41+
"MaskColor": -2147483633,
42+
"MaskPicture": "",
43+
"MouseIcon": "",
44+
"MousePointer": "vbDefault",
45+
"Name": "myToolWindow",
46+
"OLEDropMode": "vbOLEDropNone",
47+
"Palette": "",
48+
"PaletteMode": "vbPaletteModeContainer",
49+
"Picture": "",
50+
"PictureDpiScaling": true,
51+
"Public": true,
52+
"ResizeToContainer": true,
53+
"RightToLeft": false,
54+
"ScaleHeight": 70.5,
55+
"ScaleLeft": 0,
56+
"ScaleMode": "vbPixels",
57+
"ScaleTop": 0,
58+
"ScaleWidth": 90,
59+
"Tag": null,
60+
"ToolboxBitmap": "AAABAAIAGBgAAAEACADIBgAAJgAAABAQAAABAAgAaAUAAO4GAAAoAAAAGAAAADAAAAABAAgAAAAAAKACAAAAAAAAAAAAAAABAAAAAAAAAAAAADU1NQAyODoANDo8ADc9PwA+Pj4ANEpQADpNUgBFRUUAS0tLAExMTABAWF4ASFteAFJSUgBVVVUAUVdZAFtdXQBfYmIAXmNlAEFxfwBjZGUAZmdnAGlpaQBxcXEAen19ALCxdwC6un8AQXOBAERzgABJd4MAYn2FAFWIlgBxhooAYY6aAESWqwBNmq0ATp60AF2ktABiobIAY6i2AGiquAB3q7gAcLK9AESpxgBOq8YARa7JAEmuyABJr8wAUazGAFWyzABWts8AXbPJAE651gBOv9wAUrbQAFW30gBat9AAVbnRAFO41ABautEAXrnRAF271gBfv9UAUb/bAGm8wQBztcQAdr7BAHa6zgB1vs8AeL/PAGO80wBrv9MATsHeAFLA2gBXwdkAUcHdAFXC3QBcxd8Af8DMAGLC1wBpwdYAYsLaAGXC2ABjxNsAacPYAGnF2gBtxtoAb8jbAG3I3ABywtQAfcLUAHjG1wBzxdgAecfZAH3H2QB2yNoAccrdAHTL3wB8ydsAecreAFTE4ABZxuEAXsniAGHJ4gBmzOMAZs3kAGnM4wBpz+UAds7gAHLP5AB5zuAAfs/iAG3Q5gB30OIAcdDlAHbT5wB80OIAe9HkAHvU5wB81OQActPoAHTT6AB31ukAe9XoAHzY6gCOnJ0Ag5qgAJOgoACVoaEAm6SlAIS3pgCBuKgAhLisAIe9rACIvLAAgrG5AJuwtACQs7oAo6OjAMHOsgCMxsYAi8jHAIDL2QCNyNkAiM7fAJDG1QCfy9IAkM7eAIfR3wCQ0N8ArNLUAK/V1wCx1NYAsNTfAILS5ACB1OUAhdTlAIjR4ACM0eEAjNThAIjV5wCL2ecAgNfpAIvX6ACD2usAitzsAJDS4QCR1+cAldXkAJjV4wCZ1uUAkdrnAJfZ5wCb2OcAntjmAJDZ6wCc3OkAoNXkAKrb5wCu3OYApN3qAKnd6QCt3ekAst/qALXf6ACP4e8AkuDtAJ3h7gCP4fAAlePwAJDk8gCV5PEAmuTxAJ3p9ACf7fgAoeHsAKTh7wCh5O4ArOHsALHh7AC84+0AvuXvAKHk8gCv4/AAoOjyAKHq9QCm6PUAoe72AKbt9gCp7PYAqO/4ALTl8QC07vIAse72AL/v8gCz7/gApfD4AK/x+ACy8PcAsfH4ALXz+QCz9voAtPb6ALv2+gC9+PwAx9TXAMzY2QDH3+IAxObuAMni6ADN5OsAx+fwAMnq8QDM6vEAzuzzAMzs9ADT7vQAw/T5AMP4+wDK+PsA3PD0ANn1+QDU+fwA3/j6AOPx9QDk8/UA4Pf5AOr2+ADu9vkA4vr8AOv6/AD0+foA+/z8AL+x/wDa0f8A////AAAA+/jw5LKVXlqRmeb0+Pv7+/v7/AAAAAAA6MeunmNQOzEzQ4+xtba2x7fI6fUAAAAArG5YVVRPPjcuLDE9UVNTU1VjqecAAAAAnHFxYGBVUjktKy80P0tLS0pPX7YAAAAAm3ebdGxhVTktKy80NUhIP0CCQq4AAAAAnI5OKignJSMiJDA0NUhISYMZhKkAAAAAnYcgDAcHBwYLHiY6ZEhISYUahqoAAAAAn4kYBQEFBQUIDx83TGRkZI2LjKoAAAAAq5KAEAkNDg4KBBs3TWZlZabjk60AAAAAusOWgBQIDQ4NAxM4Z2dmZ6jlla0AAAAAv8/Ul30WCgoKAxM8anBpaa3lla0AAAAAv8/d2piAEQoIAhxGcnhwcKe4kK0AAAAAwNjd3tSXgRYFAh1Qenx6eXubYbAAAAAAwdjd3d7t4ooXEiFcpKSkfHNtb8cAAAAAwtjd3t7v9eGIfilupby8pHt1sOoAAAAAwdje3t3u+bNFQURvusC/vKKayfgAAAAAwtje3t7u87RWR1yawM3BwKSc6fwAAAAAzdLe3t7v+cZXWV2gzNnQzaWg6fwAAAAAwtje3t7v+cZXWWKj0NzZ0rqj6fwAAAAAwtjd3u/5+sZhW5272t/c28Cj6/wAAAAAwtLe7vL58cNulMPV3+Dg3Mqv6vwAAAAAzdjg7+3RzKGcxdff4ODf3My77PwAAAAA0cLS19C+paSlwM7Nzs3MzMXL8PwAAAAA7dXR0c7KysrKysrKu7u7xNPr9/wAAMAABwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAAAAAAAAAAOjo6ADw8PAAzP0IAND9BADZBRABBQUEAREREAEpKSgBRUVEAVlZWAFFeYQBga2wAdXp6AHp6egB4fH0AQXOAAEV0gQBEd4YATnyIAGKcrQBHobkAU6m+AHSmsgBFq8cATq7KAEqvzQBQrscAU7fPAF+1zwBPvdsAVrrSAFC92gBSv9wAaLfIAGu7zwBtu80AcLvKAE7B3gBawNQAUMHdAFnC3QBhwNYAasHVAG7E1QBhxt8AacTaAGvH3ABvx90AdMHUAH7H1AB3xdgAecfaAHDJ3QB3yt4AeMvdAFXE4ABZxuEAXsniAGPM5ABry+IAas/lAHXO4gB30eMAcNLnAHbQ5QB50OEAfNDgAHnT5wB41OcAd9XpAH7W6AB+2esAjJeaAIm2nwCStpsAl7+mAJ6/owCCt8EAjsTUAIDL3ACXytMAn9XdAK/Q0gCl1NoAs9DSAIbT5ACL1eYAgNboAIba6gCG3O0AidrpAI7e7QCa1+YAn9fkAJnc5wCU3eoAlt/uAJrf7wCn1+MAoNbkAKTa5wCh2+gAr9/qAI3g7wCV4e8AluDwAJTk8QCZ4fEAmubxAJ/k8QCf5/QAnejzAJvr9QCd7fYAn+74AK7i7QC14+8AsuTuALbl7wCv5PAAouv1AKnt9gCh7/gAtufwALjl8AC66fIAvuz0AK/x+AC18/cAs/H4ALTz+QCz9voAtPf7AL3y+QC49fsAufj7AL34/ADJ0NIAwN7nAMTq8gDA7vYAyenxAMLw9wDD8fgAxfH5AML2+wDe8fYA0/b4ANH6/ADU+fwA2Pv9AN78/QDk8/cA6PT3AO73+QDq+/0A/9KxAP/l0QD///8AAAAAAC8DAABQBAAAcAYAAJAJAACwCgAAzwwAAPAOAAD/IBIA/z4xAP9cUQD/enEA/5eRAP+2sQD/1NEA////AAAAAAAvAA4AUAAXAHAAIQCQACsAsAA2AM8AQADwAEkA/xFaAP8xcAD/UYYA/3GcAP+RsgD/scgA/9HfAP///wAAAAAALwAgAFAANgBwAEwAkABiALAAeADPAI4A8ACkAP8RswD/Mb4A/1HHAP9x0QD/kdwA/7HlAP/R8AD///8AAAAAACwALwBLAFAAaQBwAIcAkAClALAAxADPAOEA8ADwEf8A8jH/APRR/wD2cf8A95H/APmx/wD70f8A////AAAAAAAbAC8ALQBQAD8AcABSAJAAYwCwAHYAzwCIAPAAmRH/AKYx/wC0Uf8AwnH/AM+R/wDcsf8A69H/AP///wAAAAAACAAvAA4AUAAVAHAAGwCQACEAsAAmAM8ALADwAD4R/wBYMf8AcVH/AIxx/wCmkf8Av7H/ANrR/wD///8AAACZjl4zI0+Lk5qampsAAACOVjUuKhwbHS41MDZdAAAAfD9CPi8fGBoeKCgnLAAAAHxDMiUiFhUZHiYmSksAAAB+TgwDBQMLFCE4JkxNAAAAflEPBwkJBxIpOThSVAAAAH9tUw0ICgYQLTs6ZWMAAAB/cYFTDQgCETxAPWZkAAAAjXKFgVUOARNBSEZFPgAAAI9zhYWUikkXWGhaRFcAAACQc4WFlmckMVtwa0d0AAAAkXuFhZd0KzRpenlZdQAAAJF7hYiYdixQboOAXHcAAACRe4iVnHQ3X4OJh2l9AAAAkXOShnBbYIKHh4NujAAAAAB6eW9samxsYmFieJMAAMADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAMADAAA=",
61+
"Top": 0,
62+
"Width": 60,
63+
"Windowless": false,
64+
"__IDEOptions": {
65+
"alignToGrid": false,
66+
"gridHeight": 10,
67+
"gridWidth": 10,
68+
"lockedControls": [],
69+
"showGrid": true,
70+
"showOutlines": false
71+
},
72+
"__lastUpdateMarker": 1991132022,
73+
"_className": "UserControl",
74+
"_clsid": "{33AD5010-6699-11CF-B70C-00AA0060D393}"
75+
}
7676
]

ucShellTree.twin

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -3,8 +3,7 @@
33
[ COMControl ]
44
Public Class ucShellTree
55
Option Explicit
6-
Private mItv As Long
7-
Private m_ScaleX As Single, m_ScaleY As Single
6+
87
Private Const mVersionStr As String = "Shell Tree Control 2.8 R1"
98
''*********************************************************************************************
109
'
@@ -97,7 +96,7 @@ Private Const mVersionStr As String = "Shell Tree Control 2.8 R1"
9796
' been fixed by syncing the check data before reporting it. .ExcludedPaths does
9897
' this too now.
9998
'
100-
'-(Bug fix) SelectedItems did not fill in the string array of paths. **TODO BEFORE RELEASE: TEST
99+
'-(Bug fix) SelectedItems did not fill in the string array of paths.
101100
'
102101
'-(Bug fix) Renamed items did not have their name updated in the TreeView (though the rename
103102
' itself succeeded)
@@ -371,6 +370,7 @@ Public Event ExitFocus()
371370

372371
Public Event DebugMessage(sMsg As String, iLevel As Integer)
373372

373+
Private m_ScaleX As Single, m_ScaleY As Single
374374
Private bLoadDone As Boolean
375375
Private pDTH As IDropTargetHelper
376376
Private Const CLSID_DragDropHelper = "{4657278A-411B-11D2-839A-00C04FD918D0}"
@@ -3676,6 +3676,7 @@ Public Property Let AlwaysShowExtendedVerbs(bVal As Boolean): mAlwaysShowExtVerb
36763676
Public Property Get ShowHiddenItems() As ST_HDN_PREF: ShowHiddenItems = m_HiddenPref: End Property
36773677
Public Property Let ShowHiddenItems(lVal As ST_HDN_PREF): m_HiddenPref = lVal: End Property
36783678
Public Property Get ShowSuperHidden() As ST_SPRHDN_PREF: ShowSuperHidden = m_SuperHiddenPref: End Property
3679+
Attribute ShowSuperHidden.VB_Description = "Show protected operating system files (marked Hidden+System)"
36793680
Public Property Let ShowSuperHidden(lVal As ST_SPRHDN_PREF): m_SuperHiddenPref = lVal: End Property
36803681
Public Property Get ShowFavorites() As Boolean: ShowFavorites = mFavorites: End Property
36813682
Attribute ShowFavorites.VB_Description = "Show the 'Favorites' link group at the top like Explorer."

0 commit comments

Comments
 (0)