Конференция VBStreets

**Oldman** » 09.01.2004 (Пт) 11:57

Subj. Не могу понять в чем трабл

Уже и выделял каждую ячейку:

Код: Выделить всё: Flex1.AddItem result For trow = 0 To 4 Flex1.Col = trow Flex1.RowSel = Flex1.Row + 1 Flex1.ColSel = trow Flex1.CellFontName = "Arial" If trow = 1 Or trow = 2 Then Flex1.CellFontSize = 12 Else Flex1.CellFontSize = 8 Next trow

и без выделений - :evil:

как был шрифт по умолчанию, так и остался...
Хелп ми!!!

**Lobo** » 09.01.2004 (Пт) 13:44

А где Flex1.Row = ... ? Ячейку надо не выделять, а сделать активной. А ты назначил активной колонку, а строку не определил.

**Oldman** » 09.01.2004 (Пт) 14:10

а разве при добавлении новой строки она не становится активной?
Или надо было так написать:

Это же не серьезно... :roll:

**Lobo** » 09.01.2004 (Пт) 15:53

Ффу, ты меня запарил :lol:

Пришлось проверять. Ну конечно же, сколько строк ни добавляй, Flex1.Row всегда =1. А надо сделать:

Код: Выделить всё: Flex1.AddItem result Flex1.Row = Flex1.Rows - 1 For trow = 0 To 4 Flex1.Col = trow Flex1.CellFontName = "Arial" Next trow

**Oldman** » 09.01.2004 (Пт) 16:26

Извиняюсь за напряг.
Огромное сенькс!!!!

Лажа со шрифтами в MSHFlexGrid