439. How can I change the background appearance (ebn) for the filter field in the bottom part of the drop down portion
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BeginUpdate
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.FilterForVisible = .T.
.FilterForBackColor = 0x1000000
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.Columns.Add("Default")
with .Items
.AddItem("Item 1")
.AddItem("Item 2")
.AddItem("Item 3")
.AddItem("Item 4")
.AddItem("Item 5")
endwith
.EndUpdate
endwith
|
438. How can I change the background color for the filter field in the bottom part of the drop down portion
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BeginUpdate
.FilterForVisible = .T.
.FilterForBackColor = RGB(240,240,240)
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.Columns.Add("Default")
with .Items
.AddItem("Item 1")
.AddItem("Item 2")
.AddItem("Item 3")
.AddItem("Item 4")
.AddItem("Item 5")
endwith
.EndUpdate
endwith
|
437. How can I display a filter field in the bottom part of the drop down portion
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BeginUpdate
.FilterForVisible = .T.
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.Columns.Add("Default")
with .Items
.AddItem("Item 1")
.AddItem("Item 2")
.AddItem("Item 3")
.AddItem("Item 4")
.AddItem("Item 5")
endwith
.EndUpdate
endwith
|
436. Does your control support RightToLeft property for RTL languages or right to left
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BeginUpdate
.LinesAtRoot = -1
with .Columns.Add("P1")
.Def(0) = .T.
.PartialCheck = .T.
endwith
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
.RightToLeft = .T.
.EndUpdate
endwith
|
435. Is there any way to display the vertical scroll bar on the left side, as I want to align my data to the right
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BeginUpdate
with .Columns
.Add("C1")
.Add("C2")
.Add("C3")
.Add("C4")
.Add("C5")
.Add("C6")
.Add("C7")
.Add("C8")
endwith
.RightToLeft = .T.
.EndUpdate
endwith
|
434. Can I display the cell's check box after the text
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Column")
.Def(0) = .T.
.Def(34) = "caption,check"
endwith
with .Items
.DefaultItem = .AddItem("Caption 1")
.CellHasCheckBox(0,0) = .T.
.DefaultItem = .AddItem("Caption 2")
.CellHasCheckBox(0,0) = .T.
endwith
endwith
|
433. Can I change the order of the parts in the cell, as checkbox after the text, and so on
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Column").Def(34) = "caption,check,icon,icons,picture"
with .Items
h = .AddItem("Text")
.DefaultItem = h
.CellImage(0,0) = 1
.DefaultItem = h
.CellHasCheckBox(0,0) = .T.
endwith
endwith
|
432. Can I have an image displayed after the text. Can I get that effect without using HTML content
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Column").Def(34) = "caption,icon,check,icons,picture"
with .Items
h = .AddItem("Text")
.DefaultItem = h
.CellImage(0,0) = 1
endwith
endwith
|
431. How can I display the column using currency format and enlarge the font for certain values
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Currency")
.Def(17) = 1
endwith
with .Items
.AddItem("1.23")
.AddItem("2.34")
.AddItem("9.94")
.AddItem("11.94")
.AddItem("1000")
endwith
endwith
|
430. How can I get the number of occurrences of a specified string in the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("")
with .Columns.Add("occurrences")
.ComputedField = "lower(%0) count 'o'"
endwith
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1 oooof the root")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"Child 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
429. How can I display dates in my format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Date")
.Def(17) = 1
endwith
with .Items
.AddItem({^2001-1-21})
.AddItem({^2002-2-22})
.AddItem({^2003-3-13})
.AddItem({^2004-4-24})
endwith
endwith
|
428. How can I display dates in short format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Items
.AddItem({^2001-1-1})
.AddItem({^2002-2-2})
.AddItem({^2003-3-3})
.AddItem({^2004-4-4})
endwith
endwith
|
427. How can I display dates in long format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Items
.AddItem({^2001-1-1})
.AddItem({^2002-2-2})
.AddItem({^2003-3-3})
.AddItem({^2004-4-4})
endwith
endwith
|
426. How can I display only the right part of the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("")
with .Columns.Add("Right")
.ComputedField = "%0 right 2"
endwith
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"SChild 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
425. How can I display only the left part of the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("")
.Columns.Add("Left").ComputedField = "%0 left 2"
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"SChild 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
424. How can I display true or false instead 0 and -1
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. with .Items .AddItem(.T.) .AddItem(.F.) .AddItem(.T.) .AddItem(0) .AddItem(1) endwith endwith |
423. How can I display icons or images instead numbers
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
with .Columns.Add("Icons")
.Def(17) = 1
endwith
with .Items
.AddItem(1)
.AddItem(2)
.AddItem(3)
endwith
endwith
|
422. How can I display the column using currency
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Items
.AddItem("1.23")
.AddItem("2.34")
.AddItem("0")
.AddItem(5)
.AddItem("10000.99")
endwith
endwith
|
421. How can I display the currency only for not empty cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Currency").ComputedField = "len(%0) ? currency(dbl(%0)) : ''"
with .Items
.AddItem("1.23")
.AddItem("2.34")
.AddItem("0")
.DefaultItem = .AddItem()
.ItemBackColor(0) = RGB(255,128,128)
.AddItem("10000.99")
endwith
endwith
|
420. Is there a function to display the number of days between two date including the number of hours
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Start").Width = 32
.Columns.Add("End")
var_s = "2:=((1:=int(0:= date(%1)-date(%0))) = 0 ? '' : str(=:1) + ' day(s)') + ( 3:=round(24*(=:0-floor("
var_s = var_s + "=:0))) ? (len(=:2) ? ' and ' : '') + =:3 + ' hour(s)' : '' )"
.Columns.Add("Duration").ComputedField = var_s
with .Items
h = .AddItem({^2001-1-11})
.DefaultItem = h
.CellCaption(0,1) = {^2001-1-14}
h = .AddItem({^2002-2-22 12:00:00})
.DefaultItem = h
.CellCaption(0,1) = {^2002-3-14 13:00:00}
h = .AddItem({^2003-3-13})
.DefaultItem = h
.CellCaption(0,1) = {^2003-4-11 11:00:00}
endwith
endwith
|
419. Is there a function to display the number of days between two date including the number of hours
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Start")
.Columns.Add("End")
var_s = ""+chr(34)+"D "+chr(34)+" + int(date(%1)-date(%0)) + "+chr(34)+" H "+chr(34)+" + round(24*(date(%1)-date(%0) - floor(date(%1)-date(%0))))"
.Columns.Add("Duration").ComputedField = var_s
with .Items
h = .AddItem({^2001-1-11})
.DefaultItem = h
.CellCaption(0,1) = {^2001-1-14 23:00:00}
h = .AddItem({^2002-2-22 12:00:00})
.DefaultItem = h
.CellCaption(0,1) = {^2002-3-14 13:00:00}
h = .AddItem({^2003-3-13})
.DefaultItem = h
.CellCaption(0,1) = {^2003-4-11 11:00:00}
endwith
endwith
|
418. How can I display the number of days between two dates
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Start")
.Columns.Add("End")
.Columns.Add("Duration").ComputedField = "(date(%1)-date(%0)) + ' days'"
with .Items
h = .AddItem({^2001-1-11})
.DefaultItem = h
.CellCaption(0,1) = {^2001-1-14}
h = .AddItem({^2002-2-22})
.DefaultItem = h
.CellCaption(0,1) = {^2002-3-14}
h = .AddItem({^2003-3-13})
.DefaultItem = h
.CellCaption(0,1) = {^2003-4-11}
endwith
endwith
|
417. How can I get second part of the date
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Second").ComputedField = "sec(date(%0))"
with .Items
.AddItem({^2001-1-11 10:10:00})
.AddItem({^2002-2-22 11:01:22})
.AddItem({^2003-3-13 12:23:01})
.AddItem({^2004-4-14 13:11:59})
endwith
endwith
|
416. How can I get minute part of the date
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Minute").ComputedField = "min(date(%0))"
with .Items
.AddItem({^2001-1-11 10:10:00})
.AddItem({^2002-2-22 11:01:00})
.AddItem({^2003-3-13 12:23:00})
.AddItem({^2004-4-14 13:11:00})
endwith
endwith
|
415. How can I check the hour part only so I know it was afternoon
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("hour(%0)>=12").Bold = .T.
.Columns.Add("Date")
.Columns.Add("Hour").ComputedField = "hour(%0)"
with .Items
.AddItem({^2001-1-11 10:00:00})
.AddItem({^2002-2-22 11:00:00})
.AddItem({^2003-3-13 12:00:00})
.AddItem({^2004-4-14 13:00:00})
endwith
endwith
|
414. What about a function to get the day in the week, or days since Sunday
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("WeekDay").ComputedField = "weekday(%0)"
with .Items
.AddItem({^2001-1-11 10:00:00})
.AddItem({^2002-2-22 11:00:00})
.AddItem({^2003-3-13 12:00:00})
.AddItem({^2004-4-14 13:00:00})
endwith
endwith
|
413. Is there any function to get the day of the year or number of days since January 1st
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Day since January 1st").ComputedField = "yearday(%0)"
with .Items
.AddItem({^2001-1-11 10:00:00})
.AddItem({^2002-2-22 11:00:00})
.AddItem({^2003-3-13 12:00:00})
.AddItem({^2004-4-14 13:00:00})
endwith
endwith
|
412. How can I display only the day of the date
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Day").ComputedField = "day(%0)"
with .Items
.AddItem({^2001-1-11 10:00:00})
.AddItem({^2002-2-22 11:00:00})
.AddItem({^2003-3-13 12:00:00})
.AddItem({^2004-4-14 13:00:00})
endwith
endwith
|
411. How can I display only the month of the date
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Month").ComputedField = "month(%0)"
with .Items
.AddItem({^2001-1-1 10:00:00})
.AddItem({^2002-2-2 11:00:00})
.AddItem({^2003-3-3 12:00:00})
.AddItem({^2004-4-4 13:00:00})
endwith
endwith
|
410. How can I get only the year part from a date expression
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Year").ComputedField = "year(%0)"
with .Items
.AddItem({^2001-1-1 10:00:00})
.AddItem({^2002-2-2 11:00:00})
.AddItem({^2003-3-3 12:00:00})
.AddItem({^2004-4-4 13:00:00})
endwith
endwith
|
409. Can I convert the expression to date
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Date").ComputedField = "date(dbl(%0))"
with .Items
.AddItem("-1.98")
.AddItem("30000.99")
.AddItem("3561.23")
.AddItem("1232.34")
endwith
endwith
|
408. Can I convert the expression to a number, double or float
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Number + 2").ComputedField = "dbl(%0)+2"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
407. How can I display dates in long format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("LongFormat").ComputedField = "longdate(%0)"
with .Items
.AddItem({^2001-1-1 10:00:00})
.AddItem({^2002-2-2 11:00:00})
.AddItem({^2003-3-3 12:00:00})
.AddItem({^2004-4-4 13:00:00})
endwith
endwith
|
406. How can I display dates in short format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("ShortFormat").ComputedField = "shortdate(%0)"
with .Items
.AddItem({^2001-1-1 10:00:00})
.AddItem({^2002-2-2 11:00:00})
.AddItem({^2003-3-3 12:00:00})
.AddItem({^2004-4-4 13:00:00})
endwith
endwith
|
405. How can I display the time only of a date expression
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Date")
.Columns.Add("Time").ComputedField = "'time is:' + time(date(%0))"
with .Items
.AddItem({^2001-1-1 10:00:00})
.AddItem({^2002-2-2 11:00:00})
.AddItem({^2003-3-3 12:00:00})
.AddItem({^2004-4-4 13:00:00})
endwith
endwith
|
404. Is there any function to display currencies, or money formatted as in the control panel
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Currency").ComputedField = "currency(dbl(%0))"
with .Items
.AddItem("1.23")
.AddItem("2.34")
.AddItem("10000.99")
endwith
endwith
|
403. How can I convert the expression to a string so I can look into the date string expression for month's name
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Str").ComputedField = "str(%0) + ' AA'"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
402. Can I display the absolute value or positive part of the number
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Abs").ComputedField = "abs(%0)"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
401. Is there any function to get largest number with no fraction part that is not greater than the value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Floor").ComputedField = "floor(%0)"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
400. Is there any function to round the values base on the .5 value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Round").ComputedField = "round(%0)"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
399. How can I get or display the integer part of the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Number")
.Columns.Add("Int").ComputedField = "int(%0)"
with .Items
.AddItem("-1.98")
.AddItem("0.99")
.AddItem("1.23")
.AddItem("2.34")
endwith
endwith
|
398. How can I display names as proper ( first leter of the word must be in uppercase, and the rest in lowercase )
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("").ComputedField = "proper(%0)"
with .Items
h = .AddItem("root")
.InsertItem(h,0,"child child")
.InsertItem(h,0,"child child")
.InsertItem(h,0,"child child")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
397. Is there any option to display cells in uppercase
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("").ComputedField = "upper(%0)"
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"Chld 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
396. Is there any option to display cells in lowercase
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("").ComputedField = "lower(%0)"
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"Chld 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
395. How can I mark the cells that has a specified type, ie strings only
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("type(%0) = 8").ForeColor = RGB(255,0,0)
.Columns.Add("")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,2)
.InsertItem(h,0,"Chld 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
394. How can I bold the items that contains data or those who displays empty strings
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("not len(%1)=0").Bold = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
hC = .InsertItem(h,0,"Child 2")
.DefaultItem = hC
.CellCaption(0,1) = "1"
.InsertItem(h,0,"Child 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
393. Can I change the background color for items or cells that contains a specified string
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 contains 'hi'").BackColor = RGB(255,0,0)
.Columns.Add("")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"Chld 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
392. Is there any option to change the fore color for cells or items that ends with a specified string
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 endwith '22'").ForeColor = RGB(255,0,0)
.Columns.Add("")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 1.22")
.InsertItem(h,0,"Child 2.22")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
391. How can I highlight the cells or items that starts with a specified string
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 startwith 'C'").Underline = .T.
.Columns.Add("")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.InsertItem(h,0,"SChild 3")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
390. How can I change the background color or the visual appearance using ebn for a particular column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
with .Columns
.Add("Column 1")
.Add("Column 2").Def(7) = 16777216
.Add("Column 3").Def(7) = 16777471
.Add("Column 4")
endwith
endwith
|
389. How can I change the background color for a particular column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns
.Add("Column 1")
.Add("Column 2").Def(7) = 8439039
.Add("Column 3")
endwith
endwith
|
388. Does your control support prompt feature
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.AutoComplete = .F.
.Columns.Add("Column 1").Prompt = "<img>1</img><i><fgcolor=808080>type to search</fgcolor></i>"
.Items.AddItem(0)
.Items.AddItem(1)
.Items.AddItem(2)
endwith
|
387. How can I display the column's header using multiple lines
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .T.
.HeaderHeight = 128
.HeaderSingleLine = .F.
.Columns.Add("This is just a column that should break the header.").Width = 32
.Columns.Add("This is just another column that should break the header.")
endwith
|
386. How can I sort the value gets listed in the drop down filter window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.MarkSearchColumn = .F.
.Description(0) = ""
.Description(1) = ""
.Description(2) = ""
with .Columns.Add("P1")
.DisplayFilterButton = .T.
.DisplayFilterPattern = .F.
.FilterList = 16
endwith
with .Columns.Add("P2")
.DisplayFilterButton = .T.
.DisplayFilterPattern = .F.
.FilterList = 32
endwith
with .Items
h = .AddItem("Z3")
.DefaultItem = h
.CellCaption(0,1) = "C"
.DefaultItem = .InsertItem(h,0,"Z1")
.CellCaption(0,1) = "B"
.DefaultItem = .InsertItem(h,0,"Z2")
.CellCaption(0,1) = "A"
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
385. Is there any property to disable the popup/context menu being shown when the user does a right click in the control's label area
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default").AllowEditContextMenu = .F.
.Items.AddItem(0)
.Items.AddItem(1)
.Items.AddItem(2)
endwith
|
384. How can I align the text/caption on the scroll bar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .ColumnAutoResize = .T. .ScrollPartCaption(1,512) = "left" .ScrollPartCaptionAlignment(1,512) = 0 .ScrollPartCaption(1,128) = "right" .ScrollPartCaptionAlignment(1,128) = 2 .ColumnAutoResize = .F. .Columns.Add(1) .Columns.Add(2) .Columns.Add(3) .Columns.Add(4) .Columns.Add(5) .Columns.Add(6) endwith |
383. Does you control support RTL languages or if there is a property RightToLeft
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.RightToLeft = .T.
.ItemsAllowSizing = -1
.DrawGridLines = 1
.LinesAtRoot = -1
.ScrollBySingleLine = .T.
.DefaultItemHeight = 64
.ColumnAutoResize = .T.
with .Columns.Add("Column")
.Alignment = 2
.HeaderAlignment = 2
.EditAlignment = 2
endwith
with .Items
.AddItem("Item 1")
.DefaultItem = .InsertItem(.AddItem("Parent"),0,"Item 2")
.ItemHeight(0) = 48
.AddItem("Item 3")
.DefaultItem = .ItemByIndex(1)
.ExpandItem(0) = .T.
endwith
endwith
|
382. How do I enable resizing all the items at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .T.
.ItemsAllowSizing = 1
.DrawGridLines = 1
.Columns.Add("Column")
.Items.AddItem("Item 1")
with .Items
.DefaultItem = .AddItem("Item 2")
.ItemHeight(0) = 48
endwith
.Items.AddItem("Item 3")
endwith
|
381. How can I remove the filter
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
.ClearFilter
endwith
|
380. How do I display the icons being selected in the control's label
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Column")
with .Items
.DefaultItem = .AddItem("Image 1")
.CellImage(0,0) = 1
.DefaultItem = .AddItem("Image 2")
.CellImage(0,0) = 2
.DefaultItem = .AddItem("Image 3")
.CellImage(0,0) = 3
endwith
.AssignEditImageOnSelect(0) = .T.
.Value = "Image 2"
endwith
|
379. How do I select a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
.Value = "Root 1.1"
endwith
|
378. How do I select a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
.Select(1) = "Root 1.2"
endwith
|
377. How do change the visual appearance for the drop down border, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn") .DropDownBorder = 16777216 endwith |
376. How do I remove the drop down's border
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .DropDownBorder = 0 endwith |
375. How can I change the foreground color for edit controls
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ForeColorEdit = RGB(255,0,0)
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
.Select(0) = "Root 1.1"
endwith
|
374. How can I change the background color for edit controls
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BackColorEdit = RGB(255,0,0)
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
.Select(0) = "Root 1.1"
endwith
|
373. How can I hide the drop down buttons when the control loses the focus
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.HideDropDownButton = .T.
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
endwith
|
372. How can I ensure that the drop down portions doesn't show partial items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.IntegralHeight = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
endwith
|
371. How can I close the drop down window when user double clicks it
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.CloseOnDblClk = .T.
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
endwith
|
370. How do I get the handle of the drop down window
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .Columns.Add(0) endwith |
369. How do I specify the height of the control's label
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LabelHeight = 34
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
368. The control selects the portion of text that doesn't match with the selected item. How can I avoid that
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AutoSelect = .F.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
367. How can I show the drop down window as soon as user starts typing in the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AutoDropDown = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
366. How do I change the text in the edit or label area
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
.EditText(0) = "Test"
endwith
|
365. How do I lock or make read-only the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Locked = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
364. How do I let user to resize only the height of the drop down window, at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AllowSizeGrip = .T.
.AllowHResize = .F.
.MinWidthList = 100
.MinHeightList = 100
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
363. How do I let user to resize only the width of the drop down window, at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AllowSizeGrip = .T.
.AllowVResize = .F.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
362. How do I let user to resize the drop down window, at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AllowSizeGrip = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
361. How do I specify the height of the drop down window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.HeightList() = 400
.MinWidthList = 100
.AllowSizeGrip = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
360. How do I specify the minimum height of the drop down window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MinHeightList = 100
.AllowSizeGrip = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
359. How do I specify the width of the drop down window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.WidthList() = 100
.AllowSizeGrip = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
358. How do I specify the minimum width of the drop down window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MinWidthList = 100
.AllowSizeGrip = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
357. I have multiple columns, how can I display a single edit in the control's label
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SingleEdit = .T.
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
.DefaultItem = .AddItem("Item 1")
.CellCaption(0,1) = "SubItem 1"
.DefaultItem = .AddItem("Item 2")
.CellCaption(0,1) = "SubItem 2"
.DefaultItem = .AddItem("Item 3")
.CellCaption(0,1) = "SubItem 3"
endwith
endwith
|
356. How do I turn off the auto complete feature
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AutoComplete = .F.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.AddItem("Item 2")
endwith
endwith
|
355. The control supports three styles: Simple, DropDown and DropDownList. How can I change the style
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .Style = 2 endwith |
354. Is there any option to align the header to the left and the data to the right
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Left").Alignment = 0
with .Columns.Add("Right")
.Alignment = 2
.HeaderAlignment = 2
.EditAlignment = 2
endwith
with .Items
.DefaultItem = .AddItem("left")
.CellCaption(0,1) = "right"
endwith
endwith
|
353. How do I change the control's border, using your EBN files
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn") .Appearance = 16777216 endwith |
352. Can I change the default border of the tooltip, using your EBN files
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Background(64) = 0x1000000
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
351. Can I change the background color for the tooltip
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
.Background(65) = RGB(255,0,0)
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
350. Does the tooltip support HTML format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
var_s = "<font Tahoma;11>T</font>his is an HTML <b>tooltip</b> assigned to a <fgcolor=FF0000>column</fgco"
var_s = var_s + "lor>"
.Columns.Add("tootip").ToolTip = var_s
endwith
|
349. Can I change the forecolor for the tooltip
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
.Background(66) = RGB(255,0,0)
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
348. Can I change the foreground color for the tooltip
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
.Columns.Add("tootip").ToolTip = "<fgcolor=FF0000>this is a tooltip assigned to a column</fgcolor>"
endwith
|
347. How can I merge cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.DrawGridLines = -1
.MarkSearchColumn = .F.
.Columns.Add("C1")
.Columns.Add("C2")
.Columns.Add("C3")
with .Items
h = .AddItem("this cell merges the first two columns")
.DefaultItem = h
.CellMerge(0,0) = 1
h = .AddItem()
.DefaultItem = h
.CellCaption(0,1) = "this cell merges the last two columns"
.DefaultItem = h
.CellMerge(0,1) = 2
h = .AddItem("this cell merges the all three columns")
.DefaultItem = h
.CellMerge(0,0) = 1
.DefaultItem = h
.CellMerge(0,0) = 2
h = .AddItem("this draws a divider item")
.DefaultItem = h
.ItemDivider(0) = 0
endwith
endwith
|
346. How can I merge cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem("This is bit of text merges all cells in the item")
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.CellHAlignment(0,0) = 1
endwith
endwith
|
345. Can I select an item giving its general position
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
344. How can I change the color for separator / dividers items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.ScrollBySingleLine = .F.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem()
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.ItemDividerLine(0) = 4
.DefaultItem = h
.ItemDividerLineAlignment(0) = 1
.DefaultItem = h
.ItemHeight(0) = 6
.DefaultItem = h
.SelectableItem(0) = .F.
h = .AddItem("Cell 2")
.DefaultItem = h
var_s1 = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s1 = var_s1 + " lines."
.CellCaption(0,1) = var_s1
.DefaultItem = h
.CellSingleLine(0,1) = .F.
endwith
endwith
|
343. How can I add separator - dividers items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.ScrollBySingleLine = .F.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem()
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.ItemDividerLine(0) = 4
.DefaultItem = h
.ItemDividerLineAlignment(0) = 1
.DefaultItem = h
.ItemHeight(0) = 6
.DefaultItem = h
.SelectableItem(0) = .F.
h = .AddItem("Cell 2")
.DefaultItem = h
var_s1 = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s1 = var_s1 + " lines."
.CellCaption(0,1) = var_s1
.DefaultItem = h
.CellSingleLine(0,1) = .F.
endwith
endwith
|
342. Can I change the style of the line being displayed by a divider item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.ScrollBySingleLine = .F.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem("This is bit of text that's displayed on the entire item, divider.")
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.ItemDividerLine(0) = 4
.DefaultItem = h
.CellHAlignment(0,0) = 1
.DefaultItem = h
.ItemHeight(0) = 24
endwith
endwith
|
341. Can I remove the line being displayed by a divider item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem("This is bit of text that's displayed on the entire item, divider.")
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.ItemDividerLine(0) = 0
.DefaultItem = h
.CellHAlignment(0,0) = 1
endwith
endwith
|
340. How can I display a divider item, merging all cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.TreeColumnIndex = -1
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
h = .AddItem("This is bit of text that's displayed on the entire item, divider.")
.DefaultItem = h
.ItemDivider(0) = 0
.DefaultItem = h
.CellHAlignment(0,0) = 1
endwith
endwith
|
339. How can I fix or lock items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.LockedItemCount(0) = 1
.DefaultItem = .LockedItem(0,0)
.CellCaption(0,0) = "This is a locked item, fixed to the top side of the control."
.DefaultItem = .LockedItem(0,0)
.ItemBackColor(0) = RGB(196,196,186)
.LockedItemCount(2) = 2
.DefaultItem = .LockedItem(2,0)
.CellCaption(0,0) = "This is a locked item, fixed to the top side of the control."
.DefaultItem = .LockedItem(2,0)
.ItemBackColor(0) = RGB(196,196,186)
.DefaultItem = .LockedItem(2,1)
.CellCaption(0,0) = "This is a locked item, fixed to the top side of the control."
.DefaultItem = .LockedItem(2,1)
.ItemBackColor(0) = RGB(186,186,186)
endwith
endwith
|
338. How can I fix or lock an item on the bottom side of the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.LockedItemCount(2) = 1
.DefaultItem = .LockedItem(2,0)
.CellCaption(0,0) = "This is a locked item, fixed to the bottom side of the control."
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
337. How can I fix or lock an item on the top of the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.LockedItemCount(0) = 1
.DefaultItem = .LockedItem(0,0)
.CellCaption(0,0) = "This is a locked item, fixed to the top side of the control."
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
336. Is there any function to limit the height of the items when I display it using multiple lines
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollBySingleLine = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
var_s = "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple"
var_s = var_s + " lines."
.CellCaption(0,1) = var_s
.DefaultItem = h
.CellSingleLine(0,1) = .F.
.DefaultItem = h
.ItemMaxHeight(0) = 48
endwith
endwith
|
335. Why I cannot center my cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.TreeColumnIndex = -1
.DrawGridLines = -2
.Columns.Add("Default").Alignment = 1
.Items.AddItem("item 1")
.Items.AddItem("item 2")
.Items.AddItem("item 3")
endwith
|
334. How can I align the cell to the left, center or to the right
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.TreeColumnIndex = -1
.DrawGridLines = -2
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("left")
.CellHAlignment(0,0) = 0
.DefaultItem = .AddItem("center")
.CellHAlignment(0,0) = 1
.DefaultItem = .AddItem("right")
.CellHAlignment(0,0) = 2
endwith
endwith
|
333. How do I apply HTML format to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.TreeColumnIndex = -1
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.HTMLPicture("p1") = "c:\exontrol\images\zipdisk.gif"
.HTMLPicture("p2") = "c:\exontrol\images\auction.gif"
.Columns.Add("Default")
with .Items
h = .AddItem("The following item shows some of the HTML format supported:")
.DefaultItem = h
.CellHAlignment(0,0) = 1
var_s1 = "<br>text icons <img>1</img>, <img>2</img>, ... pictures <img>p1</img>, <img>p2</img> <br><br>tex"
var_s1 = var_s1 + "t <b>bold</b>, <i>italic</i>, <u>underline</u>, <s>strikeout</s>, ...<br><dotline>and so on...<b"
var_s1 = var_s1 + "r> <a>anchor</a> or <a2>hyperlink</a><br><fgcolor=FF0000>fgcolor</fgcolor> or <bgcolor=00FF00>bg"
var_s1 = var_s1 + "color</bgcolor> "
h = .AddItem(var_s1)
.DefaultItem = h
.CellCaptionFormat(0,0) = 1
.DefaultItem = h
.CellSingleLine(0,0) = .F.
endwith
endwith
|
332. How can I change the font for a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
.Items.AddItem("std font")
with .Items
.DefaultItem = .AddItem("this <font tahoma;12>is a bit of text with</font> a different font")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
331. How can I change the font for a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
.Items.AddItem("default font")
f = CreateObject("StdFont")
with f
.Name = "Tahoma"
.Size = 12
endwith
with .Items
.DefaultItem = .AddItem("new font")
.CellFont(0,0) = f
endwith
endwith
|
330. How can I change the font for entire item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
.Items.AddItem("default font")
f = CreateObject("StdFont")
with f
.Name = "Tahoma"
.Size = 12
endwith
with .Items
.DefaultItem = .AddItem("new font")
.ItemFont(0) = f
endwith
endwith
|
329. How do I vertically align a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.DrawGridLines = -2
.Columns.Add("MultipleLine").Def(16) = .F.
.Columns.Add("VAlign")
with .Items
h = .AddItem("This is a bit of long text that should break the line")
.DefaultItem = h
.CellCaption(0,1) = "top"
.DefaultItem = h
.CellVAlignment(0,1) = 0
h = .AddItem("This is a bit of long text that should break the line")
.DefaultItem = h
.CellCaption(0,1) = "middle"
.DefaultItem = h
.CellVAlignment(0,1) = 1
h = .AddItem("This is a bit of long text that should break the line")
.DefaultItem = h
.CellCaption(0,1) = "bottom"
.DefaultItem = h
.CellVAlignment(0,1) = 2
endwith
endwith
|
328. How can I change the position of an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.AddItem("Item 1")
.AddItem("Item 2")
.DefaultItem = .AddItem("Item 3")
.ItemPosition(0) = 0
endwith
endwith
|
327. How do I find an item based on a path
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.DefaultItem = .InsertItem(h,0,"Child 2")
.ItemData(0) = 1234
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .FindPath("Root 1\Child 1")
.ItemBold(0) = .T.
endwith
endwith
|
326. How do I find an item based on my extra data
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.DefaultItem = .InsertItem(h,0,"Child 2")
.ItemData(0) = 1234
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
325. How do I find an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .FindItem("Child 2",0)
.ItemBold(0) = .T.
endwith
endwith
|
324. How can I insert a hyperlink or an anchor element
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
with .Items
.DefaultItem = .AddItem("Just an <a1>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
with .Items
.DefaultItem = .AddItem("Just another <a2>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
323. How do I find the index of the item based on its handle
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemByIndex(.ItemToIndex(h))
.ItemBold(0) = .T.
endwith
endwith
|
322. How do I find the handle of the item based on its index
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemByIndex(1)
.ItemBold(0) = .T.
endwith
endwith
|
321. How can I find the cell being clicked in a radio group
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.SelBackColor = RGB(255,255,128)
.SelForeColor = RGB(0,0,0)
.Columns.Add("C1")
.Columns.Add("C2")
.Columns.Add("C3")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Radio 1"
.DefaultItem = h
.CellHasRadioButton(0,1) = .T.
.DefaultItem = h
.CellRadioGroup(0,1) = 1234
.DefaultItem = h
.CellCaption(0,2) = "Radio 2"
.DefaultItem = h
.CellHasRadioButton(0,2) = .T.
.DefaultItem = h
.CellRadioGroup(0,2) = 1234
.DefaultItem = h
.CellState(0,1) = 1
.CellBold(0,.CellChecked(1234)) = .T.
endwith
endwith
|
320. Can I add a +/- ( expand / collapse ) buttons to each item, so I can load the child items later
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("parent item with no child items")
.ItemHasChildren(0) = .T.
.AddItem("next item")
endwith
endwith
|
319. Can I let the user to resize at runtime the specified item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollBySingleLine = .T.
.DrawGridLines = -2
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("resizable item")
.ItemAllowSizing(0) = .T.
.AddItem("not resizable item")
endwith
endwith
|
318. How can I change the size ( width, height ) of the picture
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.DefaultItem = h
.CellPicture(0,0) = thisform.ComboBox1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.DefaultItem = h
.CellPictureWidth(0,0) = 24
.DefaultItem = h
.CellPictureHeight(0,0) = 24
.DefaultItem = h
.ItemHeight(0) = 32
h = .AddItem("Root 2")
.DefaultItem = h
.CellPicture(0,0) = thisform.ComboBox1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.DefaultItem = h
.ItemHeight(0) = 48
endwith
endwith
|
317. How can I find the number or the count of selected items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemChild(h)
.SelectItem(0) = .T.
.DefaultItem = .NextSiblingItem(.ItemChild(h))
.SelectItem(0) = .T.
.AddItem(.SelectCount)
endwith
endwith
|
316. How do I unselect an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = h
.SelectItem(0) = .F.
endwith
endwith
|
315. How do I find the selected item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = h
.SelectItem(0) = .T.
.DefaultItem = .SelectedItem(0)
.ItemBold(0) = .T.
endwith
endwith
|
314. How do I un select all items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
313. How do I select multiple items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemChild(h)
.SelectItem(0) = .T.
.DefaultItem = .NextSiblingItem(.ItemChild(h))
.SelectItem(0) = .T.
endwith
endwith
|
312. How do I select all items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
311. How do I select an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = h
.SelectItem(0) = .T.
endwith
endwith
|
310. Can I display a button with some picture or icon inside
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.HTMLPicture("p1") = "c:\exontrol\images\zipdisk.gif"
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = " Button <img>p1</img> "
.DefaultItem = h
.CellCaptionFormat(0,1) = 1
.DefaultItem = h
.CellHAlignment(0,1) = 2
.DefaultItem = h
.CellHasButton(0,1) = .T.
.DefaultItem = h
.ItemHeight(0) = 48
endwith
endwith
|
309. Can I display a button with some picture or icon inside
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = " Button <img>1</img> "
.DefaultItem = h
.CellCaptionFormat(0,1) = 1
.DefaultItem = h
.CellHAlignment(0,1) = 2
.DefaultItem = h
.CellHasButton(0,1) = .T.
endwith
endwith
|
308. Can I display a button with some icon inside
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = " <img>1</img> "
.DefaultItem = h
.CellCaptionFormat(0,1) = 1
.DefaultItem = h
.CellHAlignment(0,1) = 2
.DefaultItem = h
.CellHasButton(0,1) = .T.
endwith
endwith
|
307. How can I assign multiple icon/picture to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.HTMLPicture("p1") = "c:\exontrol\images\zipdisk.gif"
.HTMLPicture("p2") = "c:\exontrol\images\auction.gif"
.Columns.Add("Default")
with .Items
h = .AddItem("text <img>p1</img> another picture <img>p2</img> and so on")
.DefaultItem = h
.CellCaptionFormat(0,0) = 1
.DefaultItem = h
.CellPicture(0,0) = thisform.ComboBox1.ExecuteTemplate("loadpicture(`c:\exontrol\images\colorize.gif`)")
.DefaultItem = h
.ItemHeight(0) = 48
.AddItem("Root 2")
endwith
endwith
|
306. How can I assign an icon/picture to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.DefaultItem = h
.CellPicture(0,0) = thisform.ComboBox1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
.DefaultItem = h
.ItemHeight(0) = 48
.AddItem("Root 2")
endwith
endwith
|
305. How can I assign multiple icons/pictures to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Default")
with .Items
h = .AddItem("Root <img>1</img> 1, <img>2</img>, ... and so on ")
.DefaultItem = h
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
304. How can I assign multiple icons/pictures to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.DefaultItem = h
.CellImages(0,0) = "1,2,3"
endwith
endwith
|
303. How can I assign an icon/picture to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.DefaultItem = h
.CellImage(0,0) = 1
.DefaultItem = .InsertItem(h,0,"Child 1")
.CellImage(0,0) = 2
.DefaultItem = .InsertItem(h,0,"Child 2")
.CellImage(0,0) = 3
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
302. How can I get the handle of an item based on the handle of the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .CellItem(.ItemCell(h,0))
.ItemBold(0) = .T.
endwith
endwith
|
301. How can I display a button inside the item or cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = " Button 1 "
.DefaultItem = h
.CellHAlignment(0,1) = 2
.DefaultItem = h
.CellHasButton(0,1) = .T.
h = .AddItem("Cell 2")
.DefaultItem = h
.CellCaption(0,1) = " Button 2 "
.DefaultItem = h
.CellHAlignment(0,1) = 1
.DefaultItem = h
.CellHasButton(0,1) = .T.
endwith
endwith
|
300. How can I change the state of a radio button
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.SelBackColor = RGB(255,255,128)
.SelForeColor = RGB(0,0,0)
.Columns.Add("C1")
.Columns.Add("C2")
.Columns.Add("C3")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Radio 1"
.DefaultItem = h
.CellHasRadioButton(0,1) = .T.
.DefaultItem = h
.CellRadioGroup(0,1) = 1234
.DefaultItem = h
.CellCaption(0,2) = "Radio 2"
.DefaultItem = h
.CellHasRadioButton(0,2) = .T.
.DefaultItem = h
.CellRadioGroup(0,2) = 1234
.DefaultItem = h
.CellState(0,1) = 1
endwith
endwith
|
299. How can I assign a radio button to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.MarkSearchColumn = .F.
.SelBackColor = RGB(255,255,128)
.SelForeColor = RGB(0,0,0)
.Columns.Add("C1")
.Columns.Add("C2")
.Columns.Add("C3")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Radio 1"
.DefaultItem = h
.CellHasRadioButton(0,1) = .T.
.DefaultItem = h
.CellRadioGroup(0,1) = 1234
.DefaultItem = h
.CellCaption(0,2) = "Radio 2"
.DefaultItem = h
.CellHasRadioButton(0,2) = .T.
.DefaultItem = h
.CellRadioGroup(0,2) = 1234
.DefaultItem = h
.CellState(0,1) = 1
endwith
endwith
|
298. How can I change the state of a checkbox
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Check Box"
.DefaultItem = h
.CellHasCheckBox(0,1) = .T.
.DefaultItem = h
.CellState(0,1) = 1
endwith
endwith
|
297. How can I assign a checkbox to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Check Box"
.DefaultItem = h
.CellHasCheckBox(0,1) = .T.
endwith
endwith
|
296. How can I display an item or a cell on multiple lines
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollBySingleLine = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "This is bit of text that's shown on multiple lines"
.DefaultItem = h
.CellSingleLine(0,1) = .F.
endwith
endwith
|
295. How can I assign a tooltip to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "tooltip"
.DefaultItem = h
.CellToolTip(0,1) = "This is bit of text that's shown when the user hovers the cell"
endwith
endwith
|
294. How can I associate an extra data to a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = h
.CellData(0,1) = "your extra data"
endwith
endwith
|
293. How do I enable or disable a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = h
.CellEnabled(0,1) = .F.
endwith
endwith
|
292. How do I change the cell's foreground color
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = h
.CellForeColor(0,1) = RGB(255,0,0)
endwith
endwith
|
291. How do I change the visual effect for the cell, using your EBN files
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = h
.CellBackColor(0,1) = 0x1000000
endwith
endwith
|
290. How do I change the cell's background color
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = h
.CellBackColor(0,1) = RGB(255,0,0)
endwith
endwith
|
289. How do I change the caption or value for a particular cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
.DefaultItem = .AddItem("Cell 1")
.CellCaption(0,1) = "Cell 2"
endwith
endwith
|
288. How do I get the handle of the cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.CellBold(0,.ItemCell(h,0)) = .T.
endwith
endwith
|
287. How do I retrieve the focused item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .FocusItem
.ItemBold(0) = .T.
endwith
endwith
|
286. How do I get the number or count of child items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.AddItem(.ChildCount(h))
endwith
endwith
|
285. How do I enumerate the visible items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2")
.DefaultItem = .FirstVisibleItem
.ItemBold(0) = .T.
.DefaultItem = .NextVisibleItem(.FirstVisibleItem)
.ItemBold(0) = .T.
endwith
endwith
|
284. How do I enumerate the siblings items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2")
.DefaultItem = .NextSiblingItem(.FirstVisibleItem)
.ItemBold(0) = .T.
.DefaultItem = .PrevSiblingItem(.NextSiblingItem(.FirstVisibleItem))
.ItemBold(0) = .T.
endwith
endwith
|
283. How do I get the parent item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemParent(.ItemChild(h))
.ItemBold(0) = .T.
endwith
endwith
|
282. How do I get the first child item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.DefaultItem = .ItemChild(h)
.ItemBold(0) = .T.
endwith
endwith
|
281. How do I enumerate the root items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = .RootItem(0)
.ItemBold(0) = .T.
.DefaultItem = .RootItem(1)
.ItemUnderline(0) = .T.
endwith
endwith
|
280. I have a hierarchy, how can I count the number of root items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.AddItem(.RootCount)
endwith
endwith
|
279. How can I make an item unselectable, or not selectable
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
with .Items
h = .AddItem("unselectable - you can't get selected")
.DefaultItem = h
.SelectableItem(0) = .F.
.AddItem("selectable")
endwith
endwith
|
278. How can I hide or show an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
with .Items
h = .AddItem("hidden")
.DefaultItem = h
.ItemHeight(0) = 0
.DefaultItem = h
.SelectableItem(0) = .F.
.AddItem("visible")
endwith
endwith
|
277. How can I change the height for all items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.DefaultItemHeight = 32
.Columns.Add("Column")
.Items.AddItem("One")
.Items.AddItem("Two")
endwith
|
276. How do I change the height of an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollBySingleLine = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("height")
.ItemHeight(0) = 128
endwith
.Items.AddItem("enabled")
endwith
|
275. How do I disable or enable an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("disabled")
.EnableItem(0) = .F.
endwith
.Items.AddItem("enabled")
endwith
|
274. How do I display as strikeout a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("strikeout")
.CellStrikeOut(0,0) = .T.
endwith
endwith
|
273. How do I display as strikeout a cell or an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("gets <s>strikeout</s> only a portion of text")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
272. How do I display as strikeout an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("strikeout")
.ItemStrikeOut(0) = .T.
endwith
endwith
|
271. How do I underline a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("underline")
.CellUnderline(0,0) = .T.
endwith
endwith
|
270. How do I underline a cell or an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("gets <u>underline</u> only a portion of text")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
269. How do I underline an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("underline")
.ItemUnderline(0) = .T.
endwith
endwith
|
268. How do I display as italic a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("italic")
.CellItalic(0,0) = .T.
endwith
endwith
|
267. How do I display as italic a cell or an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("gets <i>italic</i> only a portion of text")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
266. How do I display as italic an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("italic")
.ItemItalic(0) = .T.
endwith
endwith
|
265. How do I bold a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("bold")
.CellBold(0,0) = .T.
endwith
endwith
|
264. How do I bold a cell or an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("gets <b>bold</b> only a portion of text")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
263. How do I bold an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("bold")
.ItemBold(0) = .T.
endwith
endwith
|
262. How do I change the foreground color for the item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
hC = .InsertItem(h,0,"Child 1")
.DefaultItem = hC
.ItemForeColor(0) = RGB(255,0,0)
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
261. How do I change the visual appearance for the item, using your EBN technology
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
hC = .InsertItem(h,0,"Child 1")
.DefaultItem = hC
.ItemBackColor(0) = 0x1000000
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
260. How do I change the background color for the item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
hC = .InsertItem(h,0,"Child 1")
.DefaultItem = hC
.ItemBackColor(0) = RGB(255,0,0)
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
259. How do I expand or collapse an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
258. How do I associate an extra data to an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
.DefaultItem = .AddItem("item")
.ItemData(0) = "your extra data"
endwith
endwith
|
257. How do I get the number or count of items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
.Items.AddItem(0.ItemCount)
endwith
|
256. How do I programmatically edit a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. endwith |
255. How can I change at runtime the parent of the item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Columns.Add("Default")
with .Items
hP = .AddItem("Root")
hC = .AddItem("Child")
.SetParent(hC,hP)
endwith
endwith
|
254. How can I sort the items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
.Columns.Item("Default").SortOrder = 2
endwith
|
253. How do I sort the child items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
.SortChildren(h,0,.F.)
endwith
endwith
|
252. How can I ensure or scroll the control so the item fits the control's client area
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
h = .Items.AddItem("item")
endwith
|
251. How can I remove or delete all items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
.Items.AddItem("removed item")
.Items.RemoveAllItems
endwith
|
250. How can I remove or delete an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
h = .Items.AddItem("removed item")
.Items.RemoveItem(h)
endwith
|
249. How can I add or insert child items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
h = .AddItem("Cell 1")
.DefaultItem = h
.CellCaption(0,1) = "Cell 2"
.DefaultItem = .InsertItem(h,0,"Cell 3")
.CellCaption(0,1) = "Cell 4"
.DefaultItem = .InsertItem(h,0,"Cell 5")
.CellCaption(0,1) = "Cell 6"
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
248. How can I add or insert a child item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Columns.Add("Default")
with .Items
.InsertItem(.AddItem("root"),0,"child")
endwith
endwith
|
247. How can I add or insert an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("C2")
with .Items
.DefaultItem = .AddItem("Cell 1")
.CellCaption(0,1) = "Cell 2"
h = .AddItem("Cell 3")
.DefaultItem = h
.CellCaption(0,1) = "Cell 4"
endwith
endwith
|
246. How can I add or insert an item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Default")
.Items.AddItem("new item")
endwith
|
245. How can I get the columns as they are shown in the control's sortbar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. var_Object = .Columns.ItemBySortPosition(0) endwith |
244. How can I access the properties of a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("A")
.Columns.Item("A").HeaderBold = .T.
endwith
|
243. How can I remove all the columns
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .Columns.Clear endwith |
242. How can I remove a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Remove("A")
endwith
|
241. How can I get the number or the count of columns
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. var_Count = .Columns.Count endwith |
240. How can I change the font for all cells in the entire column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
f = CreateObject("StdFont")
with f
.Name = "Tahoma"
.Size = 12
endwith
with .ConditionalFormats.Add("1")
.Font = f
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
239. How can I change the background color for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.BackColor = RGB(255,0,0)
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
238. How can I change the foreground color for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.ForeColor = RGB(255,0,0)
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
237. How can I show as strikeout all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.StrikeOut = .T.
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
236. How can I underline all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.Underline = .T.
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
235. How can I show in italic all data in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.Italic = .T.
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
234. How can I bold the entire column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_ConditionalFormat = .ConditionalFormats.Add("1")
with var_ConditionalFormat
.Bold = .T.
.ApplyTo = 0
endwith
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
233. How can I display a computed column and highlight some values that are negative or less than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("A")
.Columns.Add("B")
.Columns.Add("(A+B)*1.19").ComputedField = "(%0 + %1) * 1.19"
with .Items
.DefaultItem = .AddItem(1)
.CellCaption(0,1) = 2
endwith
with .Items
.DefaultItem = .AddItem(10)
.CellCaption(0,1) = 20
endwith
var_ConditionalFormat = .ConditionalFormats.Add("%2 > 10")
with var_ConditionalFormat
.Bold = .T.
.ForeColor = RGB(255,0,0)
.ApplyTo = 2
endwith
endwith
|
232. Can I display a computed column so it displays the VAT, or SUM
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("A")
.Columns.Add("B")
.Columns.Add("(A+B)*1.19").ComputedField = "(%0 + %1) * 1.19"
with .Items
.DefaultItem = .AddItem(1)
.CellCaption(0,1) = 2
endwith
with .Items
.DefaultItem = .AddItem(10)
.CellCaption(0,1) = 20
endwith
endwith
|
231. How can I show a column that adds values in the cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("A")
.Columns.Add("B")
.Columns.Add("A+B").ComputedField = "%0 + %1"
with .Items
.DefaultItem = .AddItem(1)
.CellCaption(0,1) = 2
endwith
with .Items
.DefaultItem = .AddItem(10)
.CellCaption(0,1) = 20
endwith
endwith
|
230. Is there any function to filter the control's data as I type, so the items being displayed include the typed characters
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_Column = .Columns.Add("Filter")
with var_Column
.FilterOnType = .T.
.DisplayFilterButton = .T.
.AutoSearch = 1
endwith
.Items.AddItem("Canada")
.Items.AddItem("USA")
endwith
|
229. Is there any function to filter the control's data as I type, something like filter on type
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_Column = .Columns.Add("Filter")
with var_Column
.FilterOnType = .T.
.DisplayFilterButton = .T.
endwith
.Items.AddItem("Canada")
.Items.AddItem("USA")
endwith
|
228. How can I programmatically filter a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Filter")
.DisplayFilterButton = .T.
.FilterType = 2
endwith
.Items.AddItem()
.Items.AddItem("not empty")
.ApplyFilter
endwith
|
227. How can I show or display the control's filter
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Filter").DisplayFilterButton = .T.
endwith
|
226. How can I customize the items being displayed in the drop down filter window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Custom Filter")
.DisplayFilterButton = .T.
.DisplayFilterPattern = .F.
var_s = "Excel Spreadsheets (*.xls )||*.xls|||Word Documents||*.doc|||Powerpoint Presentations||*.pps|||T"
var_s = var_s + "ext Documents (*.log,*.txt)||*.txt|*.log"
.CustomFilter = var_s
.FilterType = 3
.Filter = "*.xls"
endwith
.Items.AddItem("excel.xls")
.Items.AddItem("word.doc")
.Items.AddItem("pp.pps")
.Items.AddItem("text.txt")
.ApplyFilter
endwith
|
225. How can I change the order or the position of the columns in the sort bar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SortBarVisible = .T.
.SortBarColumnWidth = 48
.Columns.Add("C1").SortOrder = 1
.Columns.Add("C2").SortOrder = 2
.Columns.Item("C2").SortPosition = 0
endwith
|
224. How do I arrange my columns on multiple levels
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("S").Width = 32
.Columns.Add("Level 2").LevelKey = 1
.Columns.Add("Level 3").LevelKey = 1
.Columns.Add("Level 4").LevelKey = 1
.Columns.Add("Level 1").LevelKey = "2"
.Columns.Add("Level 2").LevelKey = "2"
.Columns.Add("Level 3").LevelKey = "2"
.Columns.Add("Level 4").LevelKey = "2"
.Columns.Add("E").Width = 32
endwith
|
223. How do I arrange my columns on multiple lines
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.HeaderHeight = 32
.Columns.Add("").HTMLCaption = "Line 1<br>Line 2"
endwith
|
222. How can I display all cells using HTML format
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("HTML").Def(17) = 1
var_s = "<font ;12>T</font>his <b>is</b> an <a>html</a> <font Tahoma><fgcolor=FF0000>text</fgcolor></font"
var_s = var_s + ">."
.Items.AddItem(var_s)
endwith
|
221. How can I display all cells using multiple lines
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("MultipleLine").Def(16) = .F.
.Columns.Add("SingleLine").Def(16) = .T.
with .Items
.DefaultItem = .AddItem("This is a bit of long text that should break the line")
.CellCaption(0,1) = "this is a bit of long text that's displayed on a single line"
endwith
endwith
|
220. How do change the vertical alignment for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("MultipleLine").Def(16) = .F.
.Columns.Add("VAlign").Def(6) = 2
with .Items
.DefaultItem = .AddItem("This is a bit of long text that should break the line")
.CellCaption(0,1) = "bottom"
endwith
with .Items
.DefaultItem = .AddItem("This is a bit of long text that should break the line")
.CellCaption(0,1) = "bottom"
endwith
endwith
|
219. How do change the foreground color for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("ForeColor").Def(5) = 255
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
218. How do change the background color for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("BackColor").Def(4) = 255
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
217. How do I show buttons for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Button")
.Def(2) = .T.
.Def(3) = .T.
endwith
.Items.AddItem(" Button 1 ")
.Items.AddItem(" Button 2 ")
endwith
|
216. How do I show buttons for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Button").Def(2) = .T.
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
215. How do I display radio buttons for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Radio").Def(1) = .T.
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
214. How do I display checkboxes for all cells in the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Check").Def(0) = .T.
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
213. How can I display a tooltip when the cursor hovers the column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("tooltip").ToolTip = "This is a bit of text that is shown when user hovers the column."
endwith
|
212. Is there any function to assign a key to a column instead using its name or capion
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Data").Key = "DKey"
.Columns.Item("DKey").Caption = "new caption"
endwith
|
211. Is there any function to assign any extra data to a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Data").Data = "your extra data"
endwith
|
210. By default, the column gets sorted descending, when I first click its header. How can I change so the column gets sorted ascending when the user first clicks the column's header
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Sort").DefaultSortOrder = .T.
endwith
|
209. How can I specify the maximum width for the column, if I use WidthAutoResize property
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Auto")
.WidthAutoResize = .T.
.MinWidthAutoResize = 32
.MaxWidthAutoResize = 128
endwith
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
208. How can I specify the minimum width for the column, if I use WidthAutoResize property
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Auto")
.WidthAutoResize = .T.
.MinWidthAutoResize = 32
endwith
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
207. Is there any option to resize the column based on its data, captions
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("A").WidthAutoResize = .T.
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
206. How can I align the icon in the column's header in the center
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
with .Columns.Add("")
.HeaderImage = 1
.HeaderImageAlignment = 1
endwith
endwith
|
205. How do I align the icon in the column's header to the right
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
with .Columns.Add("ColumnName")
.HeaderImage = 1
.HeaderImageAlignment = 2
endwith
endwith
|
204. How do I show or hide the sorting icons, but still need sorting
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Sorted").SortOrder = 1
.Columns.Item(0).DisplaySortIcon = .F.
endwith
|
203. How do I enable or disable the entire column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1")
.Columns.Add("Disabled").Enabled = .F.
with .Items
.DefaultItem = .AddItem(0)
.CellCaption(0,1) = "0.1"
endwith
with .Items
.DefaultItem = .AddItem(1)
.CellCaption(0,1) = "1.1"
endwith
endwith
|
202. How do I disable drag and drop columns
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("C1").AllowDragging = .F.
.Columns.Add("C2").AllowDragging = .F.
endwith
|
201. How do I disable resizing a column at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Unsizable").AllowSizing = .F.
.Columns.Add("C2")
.Columns.Add("C3")
.Columns.Add("C4")
endwith
|
200. How can I align the column to the right, and its caption too
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Column")
.Alignment = 2
.HeaderAlignment = 2
endwith
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
199. How can I align the column to the right
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column").Alignment = 2
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
198. How do I change the column's caption
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column").Caption = "new caption"
endwith
|
197. Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions, after the user clicks it
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FormatAnchor(.F.) = "<b><u><fgcolor=880000> </fgcolor></u></b>"
.Columns.Add("Column")
with .Items
.DefaultItem = .AddItem("Just an <a1>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
with .Items
.DefaultItem = .AddItem("Just another <a2>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
.Items.AddItem("next item")
endwith
|
196. Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FormatAnchor(.T.) = "<b><u><fgcolor=FF0000> </fgcolor></u></b>"
.Columns.Add("Column")
with .Items
.DefaultItem = .AddItem("Just an <a1>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
with .Items
.DefaultItem = .AddItem("Just another <a2>anchor</a> element ...")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
195. Can I change the font for the tooltip
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.ToolTipWidth = 364
.Columns.Add("tootip").ToolTip = "<br><font Tahoma;14>this</font> is a tooltip assigned to a column<br>"
endwith
|
194. Can I change the font for the tooltip
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
with .ToolTipFont
.Name = "Tahoma"
.Size = 14
endwith
.ToolTipWidth = 364
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
193. Can I change the order of the buttons in the scroll bar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .ScrollOrderParts(1) = "t,l,r" .ScrollOrderParts(0) = "t,l,r" endwith |
192. The thumb size seems to be very small. Can I make it bigger
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .F.
.Columns.Add("C1").Width = 256
.Columns.Add("C2").Width = 256
.Columns.Add("C3").Width = 256
.ScrollThumbSize(1) = 64
endwith
|
191. How can I display my text on the scroll bar, using a different font
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollPartCaption(1,256) = "This is <s><font Tahoma;12> just </font></s> text"
.ColumnAutoResize = .F.
.ScrollHeight = 20
.Columns.Add("C1").Width = 256
.Columns.Add("C2").Width = 256
.Columns.Add("C3").Width = 256
endwith
|
190. How can I display my text on the scroll bar, using a different font
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollPartCaption(1,256) = "This is just a text"
.ScrollFont(1).Size = 12
.ColumnAutoResize = .F.
.ScrollHeight = 20
.Columns.Add("C1").Width = 256
.Columns.Add("C2").Width = 256
.Columns.Add("C3").Width = 256
endwith
|
189. How can I display my text on the scroll bar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollPartCaption(1,256) = "this is just a text"
.ColumnAutoResize = .F.
.Columns.Add("C1").Width = 256
.Columns.Add("C2").Width = 256
.Columns.Add("C3").Width = 256
endwith
|
188. How do I enlarge or change the size of the control's scrollbars
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .ScrollHeight = 18 .ScrollWidth = 18 .ScrollButtonWidth = 18 .ScrollButtonHeight = 18 endwith |
187. How do I assign a tooltip to a scrollbar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollToolTip(1) = "This is a tooltip being shown when you click and drag the thumb in the horizontal scroll bar"
.ColumnAutoResize = .F.
.Columns.Add("C1").Width = 256
.Columns.Add("C2").Width = 256
.Columns.Add("C3").Width = 256
endwith
|
186. How do I assign an icon to the button in the scrollbar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/" var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/" var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx" var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN" var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" .Images(var_s) .ScrollPartVisible(1,32768) = .T. .ScrollPartCaption(1,32768) = "<img>1</img>" .ScrollHeight = 18 .ScrollButtonWidth = 18 endwith |
185. I need to add a button in the scroll bar. Is this possible
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .ScrollPartVisible(1,32768) = .T. .ScrollPartCaption(1,32768) = "1" endwith |
184. Can I display an additional buttons in the scroll bar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .ScrollPartVisible(1,32768) = .T. .ScrollPartVisible(1,16384) = .T. .ScrollPartVisible(1,1) = .T. .ScrollPartVisible(1,2) = .T. endwith |
183. How can I display a custom size picture to a cell or item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.DefaultItemHeight = 48
.Columns.Add("C1")
with .Items
.DefaultItem = .AddItem("Text")
.CellPicture(0,0) = thisform.ComboBox1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
endwith
endwith
|
182. How can I display a multiple pictures to a cell or item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.DefaultItemHeight = 48
.HTMLPicture("pic1") = "c:\exontrol\images\zipdisk.gif"
.HTMLPicture("pic2") = "c:\exontrol\images\auction.gif"
.Columns.Add("C1")
with .Items
.DefaultItem = .AddItem("<img>pic1</img> Text <img>pic2</img> another text ...")
.CellCaptionFormat(0,0) = 1
endwith
endwith
|
181. How do I change the column's foreground color for numbers between an interval - Range
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .ConditionalFormats.Add("%0 >= 2 and %0 <= 10")
.Bold = .T.
.ForeColor = RGB(255,0,0)
.ApplyTo = 1
endwith
.Columns.Add("N1")
.Columns.Add("N2")
with .Items
.DefaultItem = .AddItem(1)
.CellCaption(0,1) = 2
endwith
with .Items
.DefaultItem = .AddItem(3)
.CellCaption(0,1) = 3
endwith
with .Items
.DefaultItem = .AddItem(10)
.CellCaption(0,1) = 11
endwith
with .Items
.DefaultItem = .AddItem(13)
.CellCaption(0,1) = 31
endwith
.SearchColumnIndex = 1
endwith
|
180. How do I change the item's foreground color for numbers between an interval - Range
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 >= 2 and %0 <= 10").ForeColor = RGB(255,0,0)
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
179. How do I change the item's background color for numbers less than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 < 10").BackColor = RGB(255,0,0)
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
178. How do I underline the numbers greater than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 >= 10").Underline = .T.
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
177. How do I highlight in italic the numbers greater than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 >= 10").StrikeOut = .T.
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
176. How do I highlight in italic the numbers greater than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 >= 10").Italic = .T.
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
175. How do I highlight in bold the numbers greater than a value
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ConditionalFormats.Add("%0 >= 10").Bold = .T.
.Columns.Add("Numbers")
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(10)
.Items.AddItem(20)
endwith
|
174. Can I use your EBN files to change the visual appearance for +/- expand - collapse buttons
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.LinesAtRoot = 1
.HasButtons = 4
.HasButtonsCustom(0) = 16777216
.HasButtonsCustom(1) = 33554432
.Columns.Add("Column")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2")
.InsertItem(h,0,"Child")
endwith
endwith
|
173. Can I use your EBN files to change the visual appearance for radio buttons
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.RadioImage(0) = 16777216
.RadioImage(1) = 33554432
.Columns.Add("Radio").Def(1) = .T.
with .Items
.AddItem("Radio 1")
.DefaultItem = .AddItem("Radio 2")
.CellState(0,0) = 1
.AddItem("Radio 3")
endwith
endwith
|
172. Can I use your EBN files to change the visual appearance for checkbox cells
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.CheckImage(0) = 16777216
.CheckImage(1) = 33554432
.Columns.Add("Check").Def(0) = .T.
with .Items
.AddItem("Check 1")
.DefaultItem = .AddItem("Check 2")
.CellState(0,0) = 1
endwith
endwith
|
171. How do I change the visual aspect for thumb parts in the scroll bars, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
.Background(388) = 0x1000000
.Background(389) = 0x2000000
.Background(391) = 0x3000000
.Background(260) = 0x1000000
.Background(261) = 0x2000000
.Background(263) = 0x3000000
.ColumnAutoResize = .F.
.ScrollBySingleLine = .T.
.Columns.Add("S").Width = 483
with .Items
.DefaultItem = .AddItem("Item 1")
.ItemHeight(0) = 248
endwith
.Items.AddItem("Item 2")
endwith
|
170. How do I change the visual aspect only for the thumb in the scroll bar, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
.Background(388) = 0x1000000
.Background(389) = 0x2000000
.Background(391) = 0x3000000
.ColumnAutoResize = .F.
.Columns.Add("S").Width = 483
endwith
|
169. I've seen that you can change the visual appearance for the scroll bar. How can I do that
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
.Background(324) = 0x1000000
.Background(325) = 0x2000000
.Background(327) = 0x3000000
.Background(404) = RGB(240,240,240)
.Background(276) = RGB(240,240,240)
.Background(511) = RGB(240,240,240)
.Columns.Add("S").Width = 32
.Columns.Add("Level 1").LevelKey = 1
.Columns.Add("Level 2").LevelKey = 1
.Columns.Add("Level 3").LevelKey = 1
.Columns.Add("E1").Width = 32
.Columns.Add("E2").Width = 32
.Columns.Add("E3").Width = 32
.Columns.Add("E4").Width = 32
.ColumnAutoResize = .F.
endwith
|
168. Is there any option to highligth the column from the cursor - point
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Background(32) = 0x1000000
.Columns.Add("S").Width = 32
.Columns.Add("Level 1").LevelKey = 1
.Columns.Add("Level 2").LevelKey = 1
.Columns.Add("Level 3").LevelKey = 1
.Columns.Add("E1").Width = 32
.Columns.Add("E2").Width = 32
.Columns.Add("E3").Width = 32
.Columns.Add("E4").Width = 32
endwith
|
167. How do I change the visual aspect of selected item in the drop down filter window, using your EBN technology
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Background(20) = 0x1000000
.Background(21) = RGB(255,20,20)
.Columns.Add("Filter").DisplayFilterButton = .T.
endwith
|
166. How do I change the visual aspect of the drop down calendar window, that shows up if I click the drop down filter button, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.Background(8) = 0x1000000
.Background(9) = 0x1000000
.Background(10) = 0x2000000
.Background(11) = 0x1000000
.Background(12) = RGB(230,230,230)
.Background(13) = RGB(230,230,230)
.Background(14) = 0x1000000
with .Columns.Add("Date")
.FilterType = 4
.DisplayFilterButton = .T.
.DisplayFilterDate = .T.
endwith
endwith
|
165. How do I change the visual aspect of the close button in the filter bar, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Background(1) = 0x1000000
.Columns.Add("Filter").FilterType = 1
.ApplyFilter
endwith
|
164. How do I change the visual aspect of buttons in the cell, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
.Background(2) = 0x1000000
.Background(3) = 0x2000000
.SelForeColor = RGB(0,0,0)
.ShowFocusRect = .F.
.Columns.Add("Column 1").Def(2) = .T.
.Items.AddItem("Button 1")
.Items.AddItem("Button 2")
.Columns.Add("Column 2")
endwith
|
163. How do I change the visual aspect of the drop down filter button, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.Background(0) = 0x1000000
.Columns.Add("Filter").DisplayFilterButton = .T.
endwith
|
162. Is there any function to get the control's data in your x-script format / template
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem(0)
endwith
|
161. How do I enable resizing the columns at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnsAllowSizing = .T.
.MarkSearchColumn = .F.
.HeaderVisible = .F.
.Columns.Add("Column 1")
.Columns.Add("Column 2")
.DrawGridLines = 2
with .Items
.DefaultItem = .AddItem("Item 1")
.CellCaption(0,1) = "Sub Item 1"
endwith
with .Items
.DefaultItem = .AddItem("Item 2")
.CellCaption(0,1) = "Sub Item 2"
endwith
endwith
|
160. How do I enable resizing ( changing the height ) the items at runtime
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ItemsAllowSizing = .T.
.ScrollBySingleLine = .T.
.Columns.Add("Column")
.Items.AddItem("Item 1")
with .Items
.DefaultItem = .AddItem("Item 2")
.ItemHeight(0) = 48
endwith
.Items.AddItem("Item 3")
endwith
|
159. How can I sort by multiple columns
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SingleSort = .F.
.Columns.Add("C1").SortOrder = 1
.Columns.Add("C2").SortOrder = 2
.Columns.Add("C3").SortOrder = 1
endwith
|
158. How can I add several columns to control's sort bar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SortBarVisible = .T.
.SortBarColumnWidth = 48
.Columns.Add("C1").SortOrder = 1
.Columns.Add("C2").SortOrder = 2
endwith
|
157. How can I change the width of the columns being displayed in the sort bar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SortBarVisible = .T.
.SortBarColumnWidth = 48
.Columns.Add("C1").SortOrder = 1
.Columns.Add("C2").SortOrder = 2
endwith
|
156. How can I change the height of the sort bar's
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .SortBarVisible = .T. .SortBarHeight = 48 endwith |
155. How can I change the sort bar's foreground color
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .SortBarVisible = .T. .ForeColorSortBar = RGB(255,0,0) endwith |
154. How can I change the visual appearance of the control's sort bar, using EBN files
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn") .VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn") .SortBarVisible = .T. .BackColorSortBar = 0x1000000 .BackColorSortBarCaption = 0x2000000 .Appearance = 0 endwith |
153. How can I change the sort bar's background color
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .SortBarVisible = .T. .BackColorSortBar = RGB(255,0,0) .BackColorSortBarCaption = RGB(128,0,0) endwith |
152. How can I change the default caption being displayed in the control's sort bar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .SortBarVisible = .T. .SortBarCaption = "new caption" endwith |
151. How can I show the locked / fixed items on the bottom side of the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ShowLockedItems = .T.
.Columns.Add("Column")
with .Items
.LockedItemCount(1) = 2
.DefaultItem = .LockedItem(1,0)
.CellCaption(0,0) = "locked item 1"
.DefaultItem = .LockedItem(1,1)
.CellCaption(0,0) = "locked item 2"
.AddItem("un-locked item")
endwith
endwith
|
150. How can I show the locked / fixed items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ShowLockedItems = .T.
.Columns.Add("Column")
with .Items
.LockedItemCount(0) = 2
.DefaultItem = .LockedItem(0,0)
.CellCaption(0,0) = "locked item 1"
.DefaultItem = .LockedItem(0,1)
.CellCaption(0,0) = "locked item 2"
.AddItem("un-locked item")
endwith
endwith
|
149. How can I hide the locked / fixed items
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ShowLockedItems = .F.
.Columns.Add("Column")
with .Items
.LockedItemCount(0) = 1
.DefaultItem = .LockedItem(0,0)
.CellCaption(0,0) = "locked item"
.AddItem("un-locked item")
endwith
endwith
|
148. How can I show the control's sort bar
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .SortBarVisible = .T. endwith |
147. How can I change the header's background color, when multiple levels are displayed
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BackColorLevelHeader = RGB(250,0,0)
.Columns.Add("S").Width = 32
.Columns.Add("Level 1").LevelKey = 1
.Columns.Add("Level 2").LevelKey = 1
.Columns.Add("Level 3").LevelKey = 1
endwith
|
146. Can I programmatically scroll the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(3)
endwith
|
145. How do I disable expanding or collapsing an item when user presses the arrow keys
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Columns.Add("Column 1")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
144. How do I expand automatically the items while user types characters to searching for something ( incremental searching )
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ExpandOnSearch = .T.
.LinesAtRoot = -1
.AutoSearch = .T.
.Columns.Add("Column").AutoSearch = 1
with .Items
.InsertItem(.InsertItem(.AddItem("text"),0,"some text"),0,"another text")
.InsertItem(.InsertItem(.AddItem("text"),0,"some text"),0,"another text")
endwith
endwith
|
143. Can I programmatically scroll the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(3)
endwith
|
142. Do you have some function to load data from a safe array
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem(0)
endwith
|
141. Do you have some function to retrieve all items to a safe array
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
.Items.AddItem(2)
.Items.AddItem(3)
endwith
|
140. How can still display the selected items when the control loses the focus
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
with .Items
.AddItem("Item 3")
.AddItem("Item 1")
.DefaultItem = .AddItem("Item 2")
.SelectItem(0) = .T.
endwith
endwith
|
139. How can I hide a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Hidden").Visible = .F.
.Columns.Add("2")
.Columns.Add("3")
.Columns.Add("4")
.Columns.Add("5")
endwith
|
138. How can I ensure that a column is visible and fits the control's client area
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .F.
.Columns.Add("1").Width = 128
.Columns.Add("2").Width = 128
.Columns.Add("3").Width = 128
.Columns.Add("4").Width = 128
.Columns.Add("5").Width = 128
endwith
|
137. I've seen that the width of the tooltip is variable. Can I make it larger
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipWidth = 328
.Columns.Add("tootip").ToolTip = "this is a tooltip that should be very very very very very very very long"
endwith
|
136. How do I disable showing the tooltip for all control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 0
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
135. How do I let the tooltip being displayed longer
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipPopDelay = 10000
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
134. How do I show the tooltip quicker
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ToolTipDelay = 1
.Columns.Add("tootip").ToolTip = "this is a tooltip assigned to a column"
endwith
|
133. How do I change the caption being displayed in the control's filter bar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarCaption = "your filter caption"
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
132. How do I disable expanding or collapsing an item when user double clicks it
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = -1
.Indent = 13
.Columns.Add("Column 1")
with .Items
h = .AddItem("Root")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
endwith
endwith
|
131. How do I search case sensitive, using your incremental search feature
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AutoSearch = .T.
.ASCIILower = ""
with .Columns
.Add("exStartWith").AutoSearch = 0
.Add("exContains").AutoSearch = 1
endwith
with .Items
.DefaultItem = .AddItem("text")
.CellCaption(0,1) = "another text"
endwith
with .Items
.DefaultItem = .AddItem("text")
.CellCaption(0,1) = "another text"
endwith
endwith
|
130. How do I disable the control
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .Enabled = .F. endwith |
129. How do I enable the incremental search feature within a column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.AutoSearch = .T.
with .Columns
.Add("exStartWith").AutoSearch = 0
.Add("exContains").AutoSearch = 1
endwith
with .Items
.DefaultItem = .AddItem("text")
.CellCaption(0,1) = "another text"
endwith
with .Items
.DefaultItem = .AddItem("text")
.CellCaption(0,1) = "another text"
endwith
endwith
|
128. How do I call your x-script language
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .ExecuteTemplate("Columns.Add(`Column`)")
.HeaderStrikeOut = .T.
.HeaderBold = .T.
endwith
endwith
|
127. How do I call your x-script language
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .Template = "Columns.Add(`Column`).HTMLCaption = `<b>C</b>olumn`" endwith |
126. How do I show alternate rows in different background color
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.BackColorAlternate = RGB(240,240,240)
.Columns.Add("Column")
with .Items
.AddItem("Item 1")
.AddItem("Item 2")
.AddItem("Item 3")
.AddItem("Item 4")
.AddItem("Item 5")
endwith
endwith
|
125. How do I enlarge the drop down filter window
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarDropDownHeight = "-320"
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterBarDropDownWidth = "-320"
endwith
.Items.AddItem("Item 1")
.Items.AddItem("Item 2")
endwith
|
124. How do I filter programatically the control
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 3
.Filter = "Item*"
endwith
.Items.AddItem("Item 1")
.Items.AddItem("")
.Items.AddItem("Item 2")
.ApplyFilter
endwith
|
123. How do I change the font of the control's filterbar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarFont.Size = 20
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
122. Can I apply an EBN skin to the control's filter bar so I can change its visual appearance
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.FilterBarBackColor = 0x1000000
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
121. How do I change the background color of the control's filterbar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarBackColor = RGB(240,240,240)
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
120. How do I change the foreground color of the control's filterbar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarForeColor = RGB(255,0,0)
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
119. How do I change the height of the control's filterbar
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FilterBarHeight = 32
with .Columns.Add("Column")
.DisplayFilterButton = .T.
.FilterType = 1
endwith
.ApplyFilter
endwith
|
118. How do select only a portion of text when the control starts editing a cell
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SelStart = 1
.SelLength = 1
.Columns.Add("Column")
.Items.AddItem("Item 1")
.Items.AddItem("Item 2")
endwith
|
117. How do I change the header's foreground color
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column 1")
.Columns.Add("Column 2")
.Items.AddItem("Item 1")
endwith
|
116. I have a picture on the control's background, the question is how do I draw selection as semi-transparent
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Columns.Add("Column")
.Items.AddItem("Item 1")
.Items.AddItem("Item 2")
endwith
|
115. It seems that the control uses the TAB key, is there any way to avoid that
| Visual FoxPro |
|---|
with thisform.ComboBox1 .MinHeightList = 304 .ColumnAutoResize = .T. .UseTabKey = .F. endwith |
114. I have FullRowSelect property on False, how do I force the user to select cells only in a specified column
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.FullRowSelect = .F.
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
.DefaultItem = .AddItem("Item 1")
.CellCaption(0,1) = "SubItem 1"
endwith
endwith
|
113. How do I assign a database to your control, using ADO, ADOR or ADODB objects
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ColumnAutoResize = .F.
rs = CreateObject("ADOR.Recordset")
with rs
var_s = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Exontrol\ExTree\Sample\VB\SAMPLE.M"
var_s = var_s + "DB"
.Open("Orders",var_s,3,3)
endwith
.DataSource = rs
endwith
|
112. How do I change the visual appearance effect for the selected item, using EBN
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
.SelBackColor = 0x1000000
.SelForeColor = RGB(0,0,0)
.ShowFocusRect = .F.
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
111. How do I change the colors for the selected item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.SelBackColor = RGB(0,0,0)
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
110. How do I get ride of the rectangle arround focused item
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ShowFocusRect = .F.
.Columns.Add("Column")
.Items.AddItem(0)
.Items.AddItem(1)
endwith
|
109. How can I change the control's font
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.Font.Name = "Tahoma"
.Columns.Add("Column")
endwith
|
108. I can't scroll to the end of the data. What can I do
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.ScrollBySingleLine = .T.
.DrawGridLines = -2
.Columns.Add("Column")
with .Items
.DefaultItem = .AddItem(0)
.ItemHeight(0) = 13
endwith
with .Items
.DefaultItem = .AddItem(1)
.ItemHeight(0) = 26
endwith
with .Items
.DefaultItem = .AddItem(2)
.ItemHeight(0) = 36
endwith
with .Items
.DefaultItem = .AddItem(3)
.ItemHeight(0) = 48
endwith
endwith
|
107. How do I specify the column where the tree lines / hierarchy are shown
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.TreeColumnIndex = 1
.Columns.Add("Column 1")
.Columns.Add("Column 2")
with .Items
h = .AddItem("Root 1.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 1.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
.DefaultItem = .InsertItem(h,0,"Child 2.1")
.CellCaption(0,1) = "Child 2.2"
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem("Root 2.1")
.DefaultItem = h
.CellCaption(0,1) = "Root 2.2"
.DefaultItem = .InsertItem(h,0,"Child 1.1")
.CellCaption(0,1) = "Child 1.2"
endwith
endwith
|
106. How do I specify the indentation of the child items relative to their parents
| Visual FoxPro |
|---|
with thisform.ComboBox1
.MinHeightList = 304
.ColumnAutoResize = .T.
.LinesAtRoot = 1
.Indent = 11
.Columns.Add("Column")
with .Items
h = .AddItem("Root 1")
.InsertItem(h,0,"Child 1")
.InsertItem(h,0,"Child 2")
.DefaultItem = h
.ExpandItem(0) = .T.
h = .AddItem(" |