|
|
Postada em 19/05/2006 10:21 hs
Ola Pessoal Como faço para selecionar uma linha inteira do msflexgrid. Estou fazendo assim : GridItens.SelectionMode = 1 Meu grid tem 4 colunas, mas so consigo selecionar 3, a primeira linha não fica selecionado. Ja pesquisei e não achei nada sobre isso. Espero ajuda... Obrigado |
|
|
|
|
|
|
|
Postada em 19/05/2006 10:35 hs
Não entendi bem, pra que voce necessita de marcar a linha inteira?
dsmn
|
|
|
|
|
|
Postada em 19/05/2006 11:01 hs
Tenta assim: 'Seleciona a partir da primeira coluna
MSFlexgrid.Col = 1
'Seleciona até a última coluna
MSFlexgrid.ColSel = .Cols - 1 vê se dá certo t+
|
|
|
|
|
|
Postada em 19/05/2006 13:06 hs
Ivo da uma olhada neste código acho que isso irá dar certo. Private Sub Grid2_Click()
On Error Resume Next
Dim ilinha As Integer
Dim a As String
a = Grid2.Row
Grid2.FillStyle = flexFillRepeat
For ilinha = 1 To Grid2.Rows - 1
With Grid2
.Row = ilinha
'Seleciona a partir da primeira coluna
.Col = 0
'Seleciona até a última coluna
.ColSel = .Cols - 1
'Aplica a cor
.CellBackColor = &HFFFFFF
.CellForeColor = &HC00000
End With
Next
Grid2.Row = a
'Seleciona a partir da primeira coluna
Grid2.Col = 0
'Seleciona até a última coluna
Grid2.ColSel = Grid2.Cols - 1
'Aplica a cor
Grid2.CellBackColor = &HFF& 'cor selecionada
Grid2.CellForeColor = &HFFFFFF
Grid2.FillStyle = flexFillSingle
End Sub
|
|
|
|
|
|
Postada em 19/05/2006 16:30 hs
Experimenta alterar as propriedades do MsFlexGrid, assim: Na aba General:
ScrollBars = 3 HighLight = 1 FocusRect = 0 MousePointer = 0 FillStyle = 0 SelectionMode = 0 AllowUserResizing = 0 Na aba Style: GridLines = 0 TextStyle = 0 MergeCells = 0 GridLinesFixed = 0 TextStyleFixed = 0 PictureType = 0 Experimenta e vê se é o que você quer |
|
|
|
|
|
Postada em 20/05/2006 08:33 hs
Não teve jeito pessoal, experimentei tudo. fica assim. a primeira coluna fica selecionada, mas não fica com fundo azul, como as outras. Eu queria que ficasse toda a linha com fundo azul. Mas valeu pessoal....Obrigado !!!!! |
|
|
|
