Как получить объединенную ячейку у VSFlexGrid?

[brigval]

Ковырял, ковырял, так и не получил нужного результата. Если не трудно, приведите пример кода в несколько строк.

[Avtopic]

VSFlexGrid1.MergeCells...

[brigval]

VSFlexGrid1.MergeCells...

Это понятно. Есть еще .MergeRow и .MergeCol
Для MergeCells присваиваются константы.

А как практически можно написать код так, что вместо двух ячеек на экране отображалась одна?

[Avtopic]

MergeCells нельзя установить для определенных ячеек без данных, работает в привязке с данными.
Вернее установить можно, но визуально объединятся, не будут, обедняются одинаковые данные в зависимости от MergeCells MergeRow MergeCol

пример из его же хелпа

Код: Выделить всё


    fg.MergeCells = flexMergeFree
    fg.MergeCol(1) = True: fg.MergeCol(2) = True: fg.MergeCol(3) = True
   
    fg.TextMatrix(3, 1) = " "
    fg.TextMatrix(4, 1) = " "
    fg.TextMatrix(5, 1) = " "
    fg.TextMatrix(6, 1) = " "
    fg.TextMatrix(7, 1) = " "
   
    fg.TextMatrix(3, 2) = "uyuk jyt "
    fg.TextMatrix(4, 2) = "uyuk jyt "
    fg.TextMatrix(5, 2) = "jyt "
    fg.TextMatrix(6, 2) = "jyt "
   
    fg.TextMatrix(3, 3) = "uyuk jyt "
    fg.TextMatrix(4, 3) = "uyuk jyt "
    fg.TextMatrix(5, 3) = "uyuk jyt "
    fg.TextMatrix(6, 3) = "jyt "

[brigval]

Avtopic, большое спасибо. Все работает.
А текст можно раположить этом гриде вертикально?

[Avtopic]

А текст можно раположить этом гриде вертикально?

По-моему напрямую, никак.
Как альтернатива, имеется свойство OwnerDraw и евент DrawCell
с помощью которых можно по идее вытворять в ячейке все что угодно и константы для OwnerDraw внушительные по возможностям, но реально, как только выставляется режим OwnerDraw (когда юзер может рисовать) все до невозможности тормозит. Об этом тормозе пишут и сами разработчики этого контроля в документации.
Как реальная альтернатива, не использовать встроенный OwnerDraw, и рисовать текст самому с помощью апи. но это должно стоить свеч.

[brigval]

Avtopic, ясно. Спасибо за консультацию.
Объедиенные ячейки, почему-то сами иногда разъединяются. Причем не все. Момент это поймать мне не удалось: все мысли о коде. Вероятно ячейки разъединяются после перекрытия окнами других программ. Но может быть я что-то не так делаю...

[Avtopic]

Этот грид содержит маленькие глюки, как и все на земле… С которыми иногда приходится бороться (.Refresh, .Redraw)
Но нужно признать, что он достаточно наворочен…

[brigval]

Но нужно признать, что он достаточно наворочен…

Да, довольно удобный грид. Спасибо.

[burik]

Слушайте, тож вопрос по FlexGrid'у: как выровнять по-центру(горзонтально)?
Пробовал делать так:

Код: Выделить всё


Fg.ColAlignment (0) = 1
Fg.ColAlignmentFixed (0) = 1
Fg.ColAlignmentBand (0, 0) = 1

Fg.Row = 0
Fg.Col = 0
Fg.CellAlignment = 1


Это выравнивает не помогает . Если заместо 1 поставить 2, то происходит выравнивание по-вертикали (по-нижнему краю).

[burik]

Люди, что никто не знает ответ на мой вопрос? Или просто надо другую тему создать?

[Niko]

Это выравнивает не помогает . Если заместо 1 поставить 2, то происходит выравнивание по-вертикали (по-нижнему краю).

а если 3 поставить

[burik]

Niko, точно! Только лучше 4. Спасибо!

[burik]

Ну вот, опять в эту тему пишу

Вообщем в MSFlexGrid'е мудреный заголовок и пришлось объединять ячейки. Для объединения я юзал Fg.MergeCells = flexMergeFree, но потом обнаружил, что при введении одинаковых данных в соседние ячеки, эти ячейки объединяються, а это мне совсем не надо. Можно ли запретить или разрешить объединение только определенных ячеек?

Думаю для этой цели и служит Fg.MergeCells, но не разобрался с какими значениями как все работает.

[burik]

Ну точно: надо другую тему.. А то ответа в два раза дольше ждешь..