HalK2Подскажите плиз, в 9 фоксе по команде
Thisform.Grid.Columns(n).Visible=.f.
соответствующий столбец скрывается, если так сделать в 6 фоксе, то становятся жирные линии.
Просто уменя скрываются много столбцов и по установке Визибле=.f. остаются жирнейшие линии.
Как лечить?.
А если попробовать через Width!!!
Пусть нужно спрятать 6 и 7 колонки в Grid. При создании Grid, в Tag 6 и 7 колонок записать их истинные длины для последующего их использования.
А теперь по Click кнопки
IF THISFORM.L_column = .T. && Спрятать колонки
THISFORM.Grid1.Column6.Width = 0
THISFORM.Grid1.Column7.Width = 0
ELSE
THISFORM.Grid1.Column6.Width = VAL(THISFORM.Grid1.Column6.Tag)
THISFORM.Grid1.Column7.Width = VAL(THISFORM.Grid1.Column7.Tag)
ENDIF
THISFORM.L_column = !THISFORM.L_column
