198
Is it possible to change the header's visual appearance (EBN)

With PropertiesList1
	.BeginUpdate 
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.HeaderVisible = True
	.BackColorHeader = &H1000000
	.HeaderHeight = 22
	.EndUpdate 
End With
197
Is it possible to change the header's visual appearance

With PropertiesList1
	.BeginUpdate 
	.HeaderVisible = True
	.HeaderAppearance = 4
	.HeaderHeight = 22
	.EndUpdate 
End With
196
ImageSize property on 32 (specifies the size of control' icons/images/check-boxes/radio-buttons)

With PropertiesList1
	.BeginUpdate 
	.ImageSize = 32
	.DefaultItemHeight = 36
	.HeaderHeight = .DefaultItemHeight
	.Font.Size = 16
	.ToolTipFont.Size = PropertiesList1.Font.Size
	.FilterBarFont.Size = PropertiesList1.Font.Size
	.Indent = 26
	.DescriptionHeight = 96
	.DisplayBoolAs = 1
	.FilterBarPromptVisible = -1
	.HeaderVisible = True
	.Images "gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOq" & _
"NUqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlw" & _
"yV21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+C" & _
"MPo9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9" & _
"FEKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5" & _
"y7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIk" & _
"FgTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMt" & _
"NhCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/Xi" & _
"oW5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X" & _
"4VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT" & _
"6/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUV" & _
"DNKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJy" & _
"T8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5Wzlf" & _
"fEkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC" & _
"6I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8R" & _
"gH5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVW" & _
"RJNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA=="
	With .VisualAppearance
		.Add 1,"gBFLBCJwBAEHhEJAAEhABfICg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsOatVqjG5sYjcGC3La9cz3Pq/bpuDCbMxuaK1TrYXr1TTrcofBDldAxXRKDx" & _
"RDWVhLnYOw9i6XxzjuXprCaOoKB6EwbiCZZCGOdZYlcT4xHmbhMnwNxtn+G5bmqdZ7n4Pw/i+X5zm+dQ9g4CAFjsfAJheOI8HsDoWDWTB/lwSAQkmA5PEgRYoDyDwYFY" & _
"FoFmGCBmBqBphDgRJ0gOTIYBGRB/lyRh0iSCZbjYWJzgWDwIjYLoLmMCJGDKDJjBgWgqG6YhyhGHRzA2aJ1mCABOAiOJvhCZBJBYRoRmSCQmEqEQimkAZgg8TZnDCV4U" & _
"kmCUmBKZYJGYWoWCUUhiFMNZckNUh2GENoaGaGZmgmJhqhqZpGGIEx2GYIxSGGGJdggWJth2Z4JmYeoemeSZ2H6H4hGmQhihyTRHGYLg7CiCgmgqIpokoNoOiOaJ4jqA" & _
"ochqaZGgaCxpAoZoaiaaJqEmWIcGgShcnCJwqEqFoR3YOoFlgchflqNouiuawHmWSYqGkWZQhcatzmaOoumuSp2j6L5bBaKo0GQKRnGGCxqiyCwmkqMpsksNpOGUGI7A" & _
"0ew1G0Rxlg0PptgsZuDG2Sx2l6N5tnYNZZjUDRXDCVo5l2FoymqOpukuNpujubwLjmWY5k0ZwxkaFxYlWdp6j6b5Lnafo/nABQdg2FxcUsY5BkmXAkmeQpckwNRrkKTh" & _
"8CSHZBk4NwyC4KxxgMDwakOMZDn8GgwnGAo2C4cwthMcwmCcMoHBMHRehwTIghySYNksZwcH4HBMEsHx5hyPItiweYxnwSZEH4Mozn0fR+DMAo7EYJ50gkdZelKdNql2" & _
"UgJn0GIukwH4HicQRai2GI4mSVpNl0dZGledgNgcYpYDWUx3FsOQi5YV5anaTY3G6W53A2RxylydxFjiaxEFCCgBBAQ=="
		.Add 2,"gBFLBCJwBAEHhEJAAEhABcoFg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsLpOS5LNKsaxmWLYdhFdTxQi6LpvfA8BwXC6JY7heRYRbFbYxRjGNi1TS7G4" & _
"nGKd5WGuL4UHwI4VkaYxii8V4pgQMgVBQdQ5iCTYGi8T4vlWbJ3nuPg+l+H5AlSCg6ByPBoE8Ap3jqYxhBido5g0OgOGOGI4CsSpCCAcgcAuEokiEN5NCKfJ9DyTRjnS" & _
"cg1CEYxOBmBpPCgagdgcIZoHoGIFA4AxQkCAxKAgKBwgGSpIBCZhjF2E5UnQPQMiMCJBCIBwxkSQgsgo+JtDKT4ziiQw+k6EwAnsOgLnkHI+yCQ4iEuE4klkPhShEJBp" & _
"AoPgymOMoaDgHBjFMBgyD0HYTiCZSZhIIIGC4ChiHSew5kwM5omILZPiOBI0hwZw5kodIdA+M4Uj4PxOmMSJ9DuTQzmyZgviceZagaHVfj4awwmaAh2GUIYmCOEZZDaD" & _
"RDFGdwcg4EwyHMN4LBOaJbCoaZqgKH8qkMfIyD8DozDyfA7A0Coui0OpMmOZJdCsahKg6NooioChwmEMxLEoXJbDUTRXGSUgykyMgQG0GpPHMdI3D4TRCgSeQ0kmaw+l" & _
"GNAtCOZJVCiT5DhyRQwAqMg0EoDBBGEGAsASC5yiSCw+k4Mp6lWNQuksTpRjMTxDGzJwGmGMpDDKXYTECSAxl6Q5olkK4PgMMIVkASRMBMBgzEkaZEjsNALhIZA6AeQB" & _
"gk0ZJEgAAJ0CIAgODMNIsD6DRih9uYwFyAwfCUb5ijmbI+gwdxkk8MZMGeMpPCkDxzBiC5MHMPJLDSSROFMLIoBEQogEMFJPnENYQGgE4DCOaJfC7tYkhGTQ0kyWwyku" & _
"XpMiyRpKjKR4wngM4JmOWJACCdYtHMWw+Eych4nINYLAEYA8AgdAEEsQZajaQoog4GxPiMVIolcdxNG8XZVkmNoRwWRVBlFeFEeAZQJgnFiHgHwcAhjhHgGMSI5xki2C" & _
"yA4EQsA3i0HkBsLwKRFgAHcPkHopBJBcBeDUYI7xyDOHqKkWo2hLCsDIBIY4qQ5A8DoMMYwOAqCSBGKgU4yB2iDBwIgB4hxQgAAWNgBoAgsBdEcBUQ4sQ9A/HqD0JI8R" & _
"pBzH2OYVgahLBHFiJQJweQiDhDUE4SAARQAzFsG0EQwA6AOWSBkFgVAIBCHeGERQFQiCQHeFkC4vkiB8DyB4F4QxVDvGMNEOQexMjlBeOAKQiQLgfDA7QEAaRiBdEkH8" & _
"TI7AZiFBAGYBIABWjYBiGACioQ4C1A+AMMgWhfgxHgPsT4URIB0COKgPgjRwiAB8AYUArxBgCF6J4GY5hrAOCAPAAoGRRCsCIMEXATXfgAF8BMJwURuEQDgD4Q4OBoAe" & _
"HGFgLIwQrC2D0JoSQ+QvhrHoSgQI8AbDFGID8C4Ah6BQAQAASACwgCYCMAUMARAvCKAiAMCAokeCKBEOAKgCBoDaHuMsEAqwJDiACDURg8R6gPCyDofYWAhgoDIJ4ZAu" & _
"hoiGAYGgRoQw/A0GMMga4GwxiEDeIYYInATCDBQAoBAwAoDlA0KMBoVRGiDGwDQUYIRsgaGGDgM4LAwDWB8EcIA1APhjEgGQVwgRIgjFIIQHokgZA+CSEkLIKQSjHAwM" & _
"sCwDAsAEB2ABTIwRwD6A8CMToSxkAxE4HYIw+BsgbBEDAHYBwojCBoIYFgXSjABE4MsHIbQWhlGILQS4UhvBdAUKEEwHgxDAAABQQQUAhgKHiDwE4JS4A7BGLQZwCR4g" & _
"aBEMUYAqgKApHgGwVAIRNgvBMMQXImwZDtE4I8UIyAZCDCAE8AwrhgAdEEBACQLRCg4FEB4AYtA7CdEiPQMoJAMDNCkOMCAXAFDhH0D0Q4EgfAaGSK4NYzRUj9BuCgAg" & _
"swOBjB4Fqpw8B2ADAwE4A4Qx2DAE6JIaQPQGhAGKBcIQ5B5gHByKIFARwADbAyKUfgdBKBBGyEcVIAB/ijHoIoSA0gdBNl+OATYERZgBGSDYWIWAUCEGKA4FAhR7CIBt" & _
"YQGYZg4CMAiKEcAOwkBjHWE8Z4lQgA+DkBoTohwwCeAaMEEgBQCCABgHMRwQRhhMEWFQd4HwZgwDqFESItAbAGEANCpINAzANCCJkK4ah+heFYBURwsQrS2CsMYMoWGB" & _
"hYDWI0EInQgiApXaOVI1QFDsC8MUNoMBMA1HMJga4eh+BeAWOgNNowGjYzCGAAwax+iJBeBVT4gxoBIAGFsJFBxgBiGKFkKQ7g5DFFQEcAo4AzDDACKEQQLgCiJDYB0M" & _
"gRBCCQAgQEA=="
		.Add 3,"gBFLBCJwBAEHhEJAAEhABQ4Fg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsLpOS5LNKsaxmWLYdhFdTxQi6LpvfA8BwXC6JY7heRYRbFbYxRjGNi1TS7G4" & _
"nGKd5WGuL4UHwI4VkaYxii8V4pgQMgVBQdQ5iCTYGi8T4vlWbJ3nuPg+l+H5AlSCg6ByPBoE8Ap3jqYxhBido5g0OgOGOGI4CsSpCCAcgcAuEosiYN5NHMOJ+D4TpTnS" & _
"eQ7CEY4uBmBpPhgagdgcIZoHibIEyUBJZDQIJShoCgcCAcoyAQOYYlcZJ1D0DxDCiQgwEiAZMHEMJLFKPJ9D2DoDnidQ4k+Y5QmKEROBkIhKD0JIZDIS4TGUCQuEeEJj" & _
"nOIg8CuY4RkYNgwGMM5RllGpThDRYIGKZIpCkJFUH0PINyWcQ3CaaZCG+HBnEOTJhD8Tx4GoeQ/GcaZSHOH5nCmQhshoZhihYYwhiYA4RlkNoNEMUZ3ByDjwEsPxOnMa" & _
"J9DuDR6F6GYmCmKh0nANtMioP4Gg8aoSiIO5NhodociqaY6GaFYkEyOg8lsNRNTaUgykyMgQG0GpPiONJbD8DpDEyfA6k0KwOkWMQsGsAJU0SagwkoJQJDIPISCQCJTG" & _
"SUwyGaM4KkmMgtksHpFjAZ4TGCBAbgaSpcksdhNAMIJHHsD5TjSWWMAMOpwjyLwbk6cAz0KRJiDkDYzESCwiggcgcgYIQwCIEINCMCITj6TVxkMXp2j0cQLlCTo7E2F4" & _
"ymkMZdhMPJHDGHpLAyVg+k4UwrCCSIyByDJ8DuDY8CiWY0kiXAXC6QJwFKGIjCeJpjgyezjlyDw6klHx5myRoMGwZwbkcToTEiew4kwbQfEmUgPkOKJUD4DpTHSHQmgk" & _
"XI/ASTA1g0XIEDMTBimyfI7jSLYHEiUoPk0Fw/kadAsHGao8A0A5smEMJ2mNyg5gzJZwDgCpChyIZVyIZwFCMJEPASRkBqE+IcHInRcDxA2H4bIsx0AtDsIBpwZwYicD" & _
"6BscwDwUBgHCIYaIfgtiVH2O4WgUwJjEFeAEQA7y4hMCiBMS4aRdB9A4CYE4LxljyBMHcDItBxinDCLcTYmgejBFQ9UTg9gFBOEmAQTI7A4iZGMGkQAWQ7jYA2HIL8BR" & _
"AjDG4HcCwARbjZHiNoDw1nLDnGyNINQ+wjCpBMEgcovQUgICQJEcgWRuBvAyJ4d4ugpCUAINcHogxIgnDiM4N4axzD3F2JMTY/hRqYF6FsWIxhYAGGoAALQYgYirBwBE" & _
"BwpAjBEAAIEIYsA2gOHCMAGgXAACIDmMITAUgFABH0D0I4WwvhNFGMAOIvxRD2GKNcMA8gjAPDCPwBogRPAxA8PgRwZRICYDED8RAXQEghEAN8DIgwIBdB4JYWwMgtiQ" & _
"HoFQKAiRFguFKGwGQhglDsEOVwEQQRkCKBwOIHgSREDRBYHEXQcQdD7GIGARQHRxipBrMobgewDCUCADsEYWAzgMHKHQDQxxsDzA6EMfAeQHB4GQDkUYPA0iECiKoGgR" & _
"hcDdA2GMQA8AOCjDSPgHI4QnApAKBICwHg1A+BcAwcYsgbjGGQNkCIgRsA6EcBEWANADjsB0B8YYzQQDIGSBcEYZBCCPEkFIHQSgkgZAwG4IwBAbAYGGAgL4Ch4g8BOC" & _
"QAA2KKC0GcAke4AAXAFCoHkDw4xbBFEcJkE4JRSiEFeJYKQVRMgJHODwX4xAgC/AsIIZAeAHDRG0HYI40RKCLEGDUI4jAghwBWIceA+whCpHMFYZYOQxglDMHMBQGxYj" & _
"VHiAoBIPgfgHGwPsHYJRSB6A0IERQLhCjJHMA4OQoAoCOACLYGYSx8DpBQIMWQdRnDRH+DsE4fB3CeAmM67kAAXBFEIDYDI7wLBtEoEIfYNwjiUGGJQYQMAjCHEAO0C4" & _
"zxW29CoCgfIxR9AKA6J8BgUAIhDGMIoJ40hqgwCgKETgnBhhqCGI0AIqgZhGDANQDIlBDCRGkCoJISR0g1BSKQOgfAzBRG0DYHARh4DeDAOwANuw8ApCKKkYg/RPhjBs" & _
"H0J4yg5hPGWN0GwFBHQBFaDoQIURljFAoB4GgzRVzbBECQFQRQoguHGHANwDRdCKy8CgSIGwhhoDYJYYI1giBICSAEgI="
		.Add 4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjH" & _
"LUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKB" & _
"UrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo" & _
"3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDs" & _
"YYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoV" & _
"mWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoV" & _
"oWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZi" & _
"Se41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbh" & _
"FCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA=="
	End With
	.BackColorHeader = &H4c6c6c6
	.SelBackColor = &H4000000
	.SelForeColor = RGB(0,0,1)
	.Background(32) = -1
	.Background(0) = &H4000000
	.Background(1) = &H40000ff
	.Background(70) = &H1000000
	.Background(71) = &H2000000
	.Background(72) = &H3000000
	.Select PropertiesList1
	.Sort 
	.EndUpdate 
End With
195
ImageSize property on 16 (default) (specifies the size of control' icons/images/check-boxes/radio-buttons)

With PropertiesList1
	.BeginUpdate 
	.ImageSize = 16
	.DisplayBoolAs = 1
	.FilterBarPromptVisible = -1
	.HeaderVisible = True
	.Images "gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOq" & _
"NUqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlw" & _
"yV21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+C" & _
"MPo9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9" & _
"FEKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5" & _
"y7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIk" & _
"FgTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMt" & _
"NhCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/Xi" & _
"oW5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X" & _
"4VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT" & _
"6/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUV" & _
"DNKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJy" & _
"T8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5Wzlf" & _
"fEkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC" & _
"6I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8R" & _
"gH5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVW" & _
"RJNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA=="
	With .VisualAppearance
		.Add 4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjH" & _
"LUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKB" & _
"UrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo" & _
"3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDs" & _
"YYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoV" & _
"mWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoV" & _
"oWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZi" & _
"Se41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbh" & _
"FCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA=="
	End With
	.BackColorHeader = &H4c6c6c6
	.SelBackColor = &H4000000
	.SelForeColor = RGB(0,0,1)
	.Background(32) = -1
	.Background(0) = &H4000000
	.Background(1) = &H40000ff
	.Select PropertiesList1
	.Sort 
	.EndUpdate 
End With
194
How can I add property of button type

' ModalPropertyChange event - Fired when the properties browser is about to change a property's value using a modal dialog.
Private Sub PropertiesList1_ModalPropertyChange(ByVal Property As Object,Value As Variant,Cancel As Boolean)
	With PropertiesList1
		Debug.Print( .Property() )
	End With
End Sub

With PropertiesList1
	.BeginUpdate 
	.Add "Button","the button is always shown",-3
	.Add "EditButton","show on focus only",15
	.Add "EditPage","show on focus only",6
	.EndUpdate 
End With
193
Is it possible to decode/view the control's Layout property
With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	With CreateObject("Exontrol.Print")
		Debug.Print( .Decode64TextW(PropertiesList1.Layout) )
	End With
	.EndUpdate 
End With
192
Does your control supports scrolling by touching the screen

With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	.AutoDrag = 4112 ' AutoDragEnum.exAutoDragScrollOnShortTouch Or AutoDragEnum.exAutoDragScroll
	.EndUpdate 
End With
191
If I enabled the list filter on runtime, the user can click on [x] and close the filter text. Can I disabled this action

With PropertiesList1
	.BeginUpdate 
	.AllowMultipleValuesOnEnum = True
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = 1
	.EndUpdate 
End With
190
Is it possible to specify a different background/foreground color for the property from the cursor, aka hot item

With PropertiesList1
	.Select PropertiesList1
	.HotBackColor = RGB(0,0,255)
	.HotForeColor = RGB(255,255,255)
	.SelBackColor = RGB(0,0,128)
	.SelForeColor = RGB(255,255,255)
End With
189
My development environment does not have any Object,GetOcx,DefaultDispatch,GetControlUnknown,nativeObject, ... property, is there any alternative I can pass the component to PrintExt so I can get printed

With PropertiesList1
	.Select PropertiesList1
	.Template = "Dim p;p = CreateObject(`Exontrol.Print`);p.PrintExt = Me;p.AutoRelease = False;p.Preview();"
End With
188
How can I display checkboxes for flags values only

With PropertiesList1
	.BeginUpdate 
	.AllowMultipleValuesOnEnum = True
	With .Add("Nextevent",81,8)
		.AddValue 1,"Option A"
		.AddValue 2,"Option B"
		.AddValue 3,"Option C"
		.AddValue 4,"Option D"
		.AddValue 16,"Flag A"
		.AddValue 32,"Flag B"
		.AddValue 64,"Flag C"
		.AddValue 128,"Flag D"
	End With
	.Refresh 
	.EndUpdate 
End With
187
Is is possible to display a checkbox on ENUM types

With PropertiesList1
	.BeginUpdate 
	.AllowMultipleValuesOnEnum = True
	With .Add("Nextevent",5,8)
		.AddValue 1,"Flag A"
		.AddValue 2,"Flag B"
		.AddValue 4,"Flag C"
		.AddValue 8,"Flag D"
		.AddValue 16,"Flag E"
	End With
	.Refresh 
	.EndUpdate 
End With
186
Is it possible to display the full path in the EditFolder editor

With PropertiesList1
	With .Add("Folder","c:\",18)
		.Option(12) = "Current Folder"
		.Option(15) = False
		.Option(17) = True
	End With
End With
185
How can I include a "New Folder" button so user can create new folders when using the EditFolder form

With PropertiesList1
	.Add("Folder","",18).Option(16) = True
End With
184
Is it possible to show always the selection in the files/folders list in the EditFolder dialog
With PropertiesList1
	.Add("Folder","",18).Option(14) = True
End With
183
How can I hide the editbox in the EditFolder editor

With PropertiesList1
	.Add("Folder","",18).Option(15) = False
End With
182
How can I include the files in the in the EditFolder editor

With PropertiesList1
	.Add("Folder","",18).Option(13) = True
End With
181
Is it possible to change the caption in the EditFolder editor

With PropertiesList1
	.Add("Folder","",18).Option(12) = "Select a directory..."
End With
180
Is it possible to filter for properties that contains a specified text

With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = True
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.FilterBarPromptPattern = "back"
	.IncrementalSearch = 1
	.EndUpdate 
End With
179
How can I filter the properties at runtime

With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = True
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.FilterBarPromptPattern = "Back"
	.EndUpdate 
End With
178
Is it possible to change the caption being displayed in the filter bar

With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = True
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.EndUpdate 
End With
177
How can I enable the filter-prompt feature

With PropertiesList1
	.BeginUpdate 
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = True
	.EndUpdate 
End With
176
How do I specify the height of the control's header bar

With PropertiesList1
	.BeginUpdate 
	.HeaderVisible = True
	.HeaderHeight = 36
	.Select PropertiesList1
	.Sort True
	.EndUpdate 
End With
175
Is it possible to display a checkbox for ENUM types that allow BIT combinations

With PropertiesList1
	.BeginUpdate 
	.AllowMultipleValuesOnEnum = True
	.Select PropertiesList1
	.Sort True
	.FilterBarPromptVisible = True
	.FilterBarPromptPattern = "Inc"
	.EndUpdate 
End With
174
Can I add different EditFile entries with different filters

With PropertiesList1
	.BeginUpdate 
	.Add("Text File","text.txt",17).Option(9) = "Text Files (*.txt)|*.txt"
	.Add("INI File","text.ini",17).Option(9) = "INI Files (*.ini)|*.ini"
	.EndUpdate 
End With
173
Is it possible to expand items/entries when user types for searching properties

With PropertiesList1
	.BeginUpdate 
	.ExpandOnSearch = True
	.Select PropertiesList1
	.EndUpdate 
End With
172
Is it possible to show ticks on the slider control

With PropertiesList1
	.Add "Slider",50,16
	With .Add("Slider w/h ticks",50,16)
		.SliderStep = 10
		.SliderTickFrequency = 10
	End With
	.Refresh 
End With
171
How can I edit a number between a range or interval
With PropertiesList1
	.BeginUpdate 
	With .Add("Slider",50,16)
		.Numeric = True
		.SpinStep = 0
		.SliderWidth = 0
		.SliderStep = 0
		.SliderMin = 0
		.SliderMax = 100
	End With
End With
170
How can I edit a number between a range or interval
With PropertiesList1
	.BeginUpdate 
	With .Add("Slider","0.5",16)
		.NumericFloat = True
		.SpinStep = 0
		.SliderWidth = 0
		.SliderStep = 0
		.SliderMin = 0
		.SliderMax = 1
	End With
End With
169
How can I add a slider or track bar editor, with a fixed size

With PropertiesList1
	.BeginUpdate 
	.Add("Slider","0.5",16).SliderWidth = 48
	.EndUpdate 
End With
168
How can I add a slider or track bar editor, so it covers half of the cell
With PropertiesList1
	.BeginUpdate 
	.Add("Slider","0.5",16).SliderWidth = -50
	.EndUpdate 
End With
167
How can I add a slider or track bar editor, so it covers the full cell

With PropertiesList1
	.BeginUpdate 
	.Add("Slider","0.5",16).SliderWidth = -100
	.EndUpdate 
End With
166
How can I add a spin editor within a range or interval of float numbers

With PropertiesList1
	.BeginUpdate 
	.AllowSpin = True
	With .Add("Slider","0.5",16)
		.NumericFloat = True
		.SpinStep = ".01"
		.SliderWidth = 0
		.SliderMin = 0
		.SliderMax = 1
	End With
	.EndUpdate 
End With
165
How can I add a spin editor within a range or interval of numbers

With PropertiesList1
	.BeginUpdate 
	.AllowSpin = True
	With .Add("Slider",10,16)
		.Numeric = True
		.SliderWidth = 0
		.SliderMin = 5
		.SliderMax = 15
	End With
	.EndUpdate 
End With
164
Can I use your HTML format to display a property

With PropertiesList1
	.BeginUpdate 
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.SelBackColor = &H1000000
	.SelForeColor = RGB(0,0,0)
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.ColumnWidth(0) = 304
	With .Add("I1","link1",1)
		.HTMLName = "<br>text<off 4>subscript</off><off -4>sup<off -4>ers</off>cript</off> icons <img>1</img>, <img>2</img>, ... pictures <img>p1</i" & _
"mg>, <img>p2</img> <br><br>text <b>bold</b>, <i>italic</i>, <u>underline</u>, <s>strikeout</s>, ...<br><dotline>and so on...<br>" & _
" <a>anchor</a> or <a2>hyperlink</a><br><fgcolor=FF0000>fgcolor</fgcolor> or <bgcolor=00FF00>bgcolor</bgcolor>"
		.Height = 128
	End With
	With .Add("I2","link1",1)
		.HTMLName = "<sha ;;0>antialiasing</sha> format"
	End With
	.EndUpdate 
End With
163
How can I display I picture to a property

With PropertiesList1
	.BeginUpdate 
	.HTMLPicture("pic1") = "c:\exontrol\images\zipdisk.gif"
	.HTMLPicture("pic2") = "c:\exontrol\images\auction.gif"
	With .Add("Picture 1","link1",1)
		.HTMLName = "<img>pic1</img> <b>1</b>"
		.Height = 48
	End With
	.Add "Edit","text",1
	With .Add("Picture 2","link2",1)
		.HTMLName = "<img>pic2</img> <b>2</b>"
		.Height = 32
	End With
	.EndUpdate 
End With
162
How do I display an icon to a property

With PropertiesList1
	.DefaultItemHeight = 18
	.BeginUpdate 
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.Add("I1","link1",1).HTMLName = "<img>1</img> <b>1</b>"
	.Add "Edit","text",1
	.Add("I2","link1",1).HTMLName = "<img>2</img> <b>2</b>"
	.EndUpdate 
End With
161
How do I specify the height of a property

With PropertiesList1
	.BeginUpdate 
	.HTMLPicture("pic1") = "c:\exontrol\images\zipdisk.gif"
	.HTMLPicture("pic2") = "c:\exontrol\images\auction.gif"
	With .Add("Picture 1","link1",1)
		.HTMLName = "<img>pic1</img> <b>1</b>"
		.Height = 48
	End With
	.Add "Edit","text",1
	With .Add("Picture 2","link2",1)
		.HTMLName = "<img>pic2</img> <b>2</b>"
		.Height = 48
	End With
	.EndUpdate 
End With
160
How do I edit a float number

With PropertiesList1
	.BeginUpdate 
	.AllowSpin = True
	With .Add("Edit","0.5",1)
		.NumericFloat = True
		.SpinStep = "0.1"
	End With
	.EndUpdate 
End With
159
How do I change the step for a spin

With PropertiesList1
	.BeginUpdate 
	.AllowSpin = True
	.Add("Edit",10,1).SpinStep = 10
	.EndUpdate 
End With
158
How do I sort the items in a drop down editor

With PropertiesList1
	With .Add("Enum",1,8)
		.DropDownItems = 1
		.AddValue 1,"First choice"
		.AddValue 2,"Second choice"
		.AddValue 3,"Third choice"
		.SortItems 
	End With
	.Refresh 
End With
157
How do I specify the number of visible items in a drop down editor

With PropertiesList1
	With .Add("Enum",1,8)
		.DropDownItems = 1
		.AddValue 1,"First choice"
		.AddValue 2,"Second choice"
		.AddValue 3,"Third choice"
	End With
	.Refresh 
End With
156
How do I bold a property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).Bold = True
	.EndUpdate 
End With
155
How do I disable or enable a property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).Enabled = False
	.EndUpdate 
End With
154
How do I specify a tooltip for a property

With PropertiesList1
	.BeginUpdate 
	.AllowTooltip = True
	.Add("ToolTip","",1).ToolTip = "This is a bit of text that shows up when the user hovers the cursor"
	.EndUpdate 
End With
153
How do I specify the masking character

With PropertiesList1
	.BeginUpdate 
	With .Add("Edit",12,1)
		.Mask = "##"
		.MaskChar = 48
	End With
	.EndUpdate 
End With
152
How do I specify a mask

With PropertiesList1
	.BeginUpdate 
	.Add("Edit",12,1).Mask = "##"
	.EndUpdate 
End With
151
How do I edit a number

With PropertiesList1
	.BeginUpdate 
	.AllowSpin = True
	.Add("Edit",15,1).Numeric = True
	.EndUpdate 
End With
150
How do I change the foreground color for a cell

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).CellForeColor(0) = RGB(255,0,0)
	.EndUpdate 
End With
149
How do I change the foreground color for a cell

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).CellForeColor(1) = RGB(255,0,0)
	.EndUpdate 
End With
148
How do I change the background color for a cell

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).CellBackColor(0) = RGB(255,0,0)
	.EndUpdate 
End With
147
How do I change the background color for a cell

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).CellBackColor(1) = RGB(255,0,0)
	.EndUpdate 
End With
146
How do I change the background color for a property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).BackColor = RGB(255,0,0)
	.EndUpdate 
End With
145
How do I change the foreground color for a property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).ForeColor = RGB(255,0,0)
	.EndUpdate 
End With
144
How do I associate an extra data to a property

With PropertiesList1
	.BeginUpdate 
	.Add("Color",255,2).UserData = "your data"
	.EndUpdate 
End With
143
How do I get the caption of the property, as it is displayed in the browser

With PropertiesList1
	.BeginUpdate 
	.Add("Color",255,2).ID = 12345
	.Add(.Property("Color").DisplayValue,"",-1).Bold = True
	.EndUpdate 
End With
142
How do I get the value of the property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).ID = 12345
	.Add(.Property("Edit").Value,"",-1).Bold = True
	.EndUpdate 
End With
141
How do I make a property read only
With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).Locked = True
	.EndUpdate 
End With
140
How do I specify a description for a property

With PropertiesList1
	.BeginUpdate 
	.Add("Edit","text",1).Description = "This is just a description"
	.SelectedProperty = .Property("Edit")
	.EndUpdate 
End With
139
How do I get the identifer of the property

With PropertiesList1
	.Add("Edit","text",1).ID = 12345
	.Add(.Property("Edit").ID,"",-1).Bold = True
	.Refresh 
End With
138
How do I get the type of the property
With PropertiesList1
	.Add "Edit","text",1
	.Add(.Property("Edit").Type,"",-1).Bold = True
	.Refresh 
End With
137
How do I get the name of the property

With PropertiesList1
	.Add "Edit","text",1
	.Add(.Property("Edit").Name,"",-1).Bold = True
	.Refresh 
End With
136
How do I select a folder

With PropertiesList1
	.Add "Folder","",18
	.Refresh 
End With
135
How do I select a file

With PropertiesList1
	.Add "File","",17
	.Refresh 
End With
134
How do I slider or trackbar editor

With PropertiesList1
	.Add "Slider",50,16
	.Refresh 
End With
133
How do I add a button

With PropertiesList1
	.Add "Button","Aaa",15
	.Refresh 
End With
132
How do I add a check box editor

With PropertiesList1
	.Add "Check",True,14
	.Refresh 
End With
131
How do I add a color editor

With PropertiesList1
	.Add "Color",255,13
	.Refresh 
End With
130
How do I add a new object properties inside the control

With PropertiesList1
	.BeginUpdate 
	.Add "MySelf 1",PropertiesList1,12
	.Add "MySelf 2",PropertiesList1,12
	.EndUpdate 
End With
129
How do I add a new objects inside the control

With PropertiesList1
	.BeginUpdate 
	.Add "MySelf",PropertiesList1,12
	.EndUpdate 
End With
128
How do I add a drop down editor with some predefined values

With PropertiesList1
	With .Add("DropDown","Aaa",11)
		.AddValue 1,"First choice"
		.AddValue 2,"Second choice"
		.AddValue 3,"Third choice"
	End With
	.Refresh 
End With
127
How do I add a password editor

With PropertiesList1
	.Add "Password","pass",10
	.Refresh 
End With
126
How do I add a date picker editor

With PropertiesList1
	.Add "Date","1/1/2001",9
	.Refresh 
End With
125
How do I add a drop down editor with some predefined values

With PropertiesList1
	With .Add("Enum",1,8)
		.AddValue 1,"First choice"
		.AddValue 2,"Second choice"
		.AddValue 3,"Third choice"
	End With
	.Refresh 
End With
124
How do I add a boolean editor

With PropertiesList1
	.Add "Boolean",True,7
	.Refresh 
End With
123
How do I add a button or a page editor

With PropertiesList1
	.Add "Page","",6
	.Refresh 
End With
122
How do I add a picture editor

With PropertiesList1
	.Add "Picture",,5
	.Refresh 
End With
121
How do I add a font editor

With PropertiesList1
	.Add "Font","Arial",4
	.Refresh 
End With
120
How do I add a font editor

With PropertiesList1
	.Add "Font","Arial",3
	.Refresh 
End With
119
How do I add a color editor

With PropertiesList1
	.Add "Color",255,2
	.Refresh 
End With
118
How do I add an edit

With PropertiesList1
	.Add "Edit","text",1
	.Refresh 
End With
117
How do I specify the character sets being included in the font editor

With PropertiesList1
	.Option(7) = "0"
	.Add "Font","Arial",4
	.Refresh 
End With
116
How do I show or hide the bottom scroll bar in the drop down date picker calendar editor

With PropertiesList1
	.Option(6) = False
	.Add "Date","1/1/2001",9
	.Refresh 
End With
115
How do highlight the "Today" date is the drop down date picker calendar editor

With PropertiesList1
	.Option(5) = True
	.Add "Date","1/1/2001",9
	.Refresh 
End With
114
How do I show or hide the "Today" button is the drop down date picker calendar editor

With PropertiesList1
	.Option(4) = False
	.Add "Date","1/1/2001",9
	.Refresh 
End With
113
How to specify the first day of the week in the drop down date picker calendar editor

With PropertiesList1
	.Option(3) = 1
	.Add "Date","1/1/2001",9
	.Refresh 
End With
112
How to specifies the shortcut for the weekdays to be displayed in the drop down date picker calendar editor

With PropertiesList1
	.Option(2) = "Du Lu Ma Mi Jo Vi Si"
	.Add "Date","1/1/2001",9
	.Refresh 
End With
111
How can I change the name of the months in the drop down date picker calendar editor

With PropertiesList1
	.Option(1) = "Janvier Février Mars Avril Mai Juin Juillet Août Septembre Octobre Novembre Décembre"
	.Add "Date","1/1/2001",9
	.Refresh 
End With
110
Can I change the "Today" caption being displayed in the drop down date picker calendar editor

With PropertiesList1
	.Option(0) = "Azi"
	.Add "Date","1/1/2001",9
	.Refresh 
End With
109
How can I open the drop down editors, using a different than F4 key
With PropertiesList1
	.EditOnSelect = False
	.EditOnKey = 113
	.Select PropertiesList1
End With
108
How do I display the color properties as RGB

With PropertiesList1
	.BeginUpdate 
	.DisplayColorAs = 1
	.Add "Red",255,2
	.Add "Blue",16711680,2
	.EndUpdate 
End With
107
How do I get the list of properties being listed as a string

With PropertiesList1
	.Select PropertiesList1
	.Add(" _ toString _ ",.ToString(0),15).Bold = True
	.Sort True
End With
106
How can I display a picture to a property

With PropertiesList1
	.DefaultItemHeight = 48
	.HTMLPicture("pic1") = "c:\exontrol\images\zipdisk.gif"
	.HTMLPicture("pic2") = "c:\exontrol\images\auction.gif"
	.Add("Picture 1","link1",1).HTMLName = "Pic <img>pic1</img> or <img>pic2</img>"
	.Refresh 
End With
105
How do I show or hide the properties with multiple parameters

With PropertiesList1
	.ShowMultipleParams = False
	.Select PropertiesList1
End With
104
How can I add a hyperlink or anchor element

With PropertiesList1
	.BackColor = RGB(255,255,255)
	.SelBackColor = .BackColor
	.SelForeColor = .ForeColor
	.Add("Link 1","link1",1).HTMLName = "Link <a1>one</s>"
	.Refresh 
End With
103
Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions, after the user clicks it

With PropertiesList1
	.SelBackColor = RGB(255,128,255)
	.FormatAnchor(False) = "<b><u><fgcolor=880000> </fgcolor></u></b>"
	.Add("Link 1","link1",1).HTMLName = "Link <a1>one</s>"
	.Refresh 
End With
102
Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions

With PropertiesList1
	.SelBackColor = RGB(255,128,255)
	.FormatAnchor(True) = "<b><u> </u></b>"
	.Add("Link 1","link1",1).HTMLName = "Link <a1>one</s>"
	.Refresh 
End With
101
How do I specify the indentation of the child items relative to their parents

With PropertiesList1
	.AutoIndent = False
	.Indent = 8
	.Select PropertiesList1
	.ExpandAll 
End With