xBrowse "saber a linha"

[Luiz Fernando]

colegas ve se alguém pode me ajudar...

if linha>27 //não consigo decobrir o comando para ver que linha estou enquando a browse esta sendo criada

endif

Obs: minha browse esta em array, eu uso sempre o oBrw:nArrayAT para saber a linha(registro), mais na hora que esta sendo criada a mesma, o valor dela é sempre 1, só depois de criada que consigo extrair a linha(registro) correto, usando oBrw:nRowSel é a mesma coisa em tempo de execução na da certo, este tb tem sempre o valor 1

Obrigado

Luiz Fernando

[AnaCatacombs]

Desculpe, não entendi o que vc quer

[Luiz Fernando]

Ana obrigado pelo retorno, estou colocando uma imagem para ficar mais de entender

observe que a ultima linha é COUVE - GRADE, existe mais mercadorias abaixo, o que preciso fazer é exibir uma imagem no folder se aquele cliente daquela coluna pegou alguma mercadoria abaixo, mais para isto preciso saber que linha estou...

a ideia seria mais ou menos esta

if linha(não sei como fazer isto) > 27

oBrw:aCols:AddResource( "VERMELHO" )

oBrw:aCols:AddResource( "" )

oBrw:aCols:nFootBmpno := {|| iif(aVendas[oBrw:nArrayAt,i+1]>0,1,2) }

endif

Obrigado

Luiz Fernando

[SAOliveira]

Veja se é isto.

oBrw:aCols[9]:AddResource("VAZIO")
oBrw:aCols[9]:AddResource("CHEIO")
oBrw:aCols[9]:nFootBmpNo :=IF(pCodUso>1,2,1)

\SAMPLES\XBALPHA.PRG

[Erciley Junior]

Oi Luiz, acho que entendi, acho ^^

O nFootBmpNo, é uma propriedade para setar o número da imagem a ser exibida, não há em nenhuma parte da classe fazendo um aEval esperando um bloco de código.

Se entendi bem, você teria que fazer um FOR no seu vetor

oBrw:aCols[01]:nFootBmpno:=0
oBrw:aCols[02]:nFootBmpno:=0
oBrw:aCols[03]:nFootBmpno:=0
oBrw:aCols[04]:nFootBmpno:=0
oBrw:aCols[05]:nFootBmpno:=0
 
FOR WX:=1 TO LEN(aVetor)
   nCol01:=aVetor[WX,01]
   nCol02:=aVetor[WX,02]
   nCol03:=aVetor[WX,03]
   nCol04:=aVetor[WX,04]
   nCol05:=aVetor[WX,05]
 
   IF nCol01 > 0
      oBrw:aCols[01]:nFootBmpno:=1
   ENDIF
   IF nCol02 > 0
      oBrw:aCols[02]:nFootBmpno:=1
   ENDIF
   IF nCol03 > 0
      oBrw:aCols[03]:nFootBmpno:=1
   ENDIF
   IF nCol04 > 0
      oBrw:aCols[04]:nFootBmpno:=1
   ENDIF
   IF nCol05 > 0
      oBrw:aCols[05]:nFootBmpno:=1
   ENDIF
NEXT

[Arthur Silvestre]

Acredito que se você olhar no xBrowse.prg do Source você encontrará coisas funcionais para o que você quer, possa ser que isso seja o desejado:

oBrw:nRowAdvance

[Luiz Fernando]

Este fórum é um barato tinha dois problema para criar esta função, e os amigo Sergio e Erciry já anteciparam um que não tinha nem postado aqui, pois a ideia era resolver primeiro um caso e depois iria criar o outro post com a outra duvida

a resposta do sergio deu certinho , não terei que criar outro tópico com a outra duvida

Mais infelizmente a duvida postada aqui continua, fiz um teste com a resposta do Arthur e não deu certo

Colegas o que preciso é fazer a comparação mais só se a linha for superior a 27, mais como saber a linha durante o processo de montagem da browse

Obrigado

Luiz Fernando

[Arthur Silvestre]

Você usa array ou db? Estou pesquisando o que você deseja, se entendi é apenas usar o currentRow ou a que lhe passei ( da no mesmo ) a medida q o browser for sendo criado para dizer até aonde ele vai suportar, certo ?

[sambomb]

Marque dentro do array se foi selecionado ou não

x := 10 //-- Coluna onde você marca se foi selecionado
If Len(aArray) >= 27
   For i := 27 to Len(aArray)  
      If aArray(i,x) 
         lSelecionado := .T.
         Exit
      End
   End
End
 

[Erciley Junior]

Pra falar a verdade, não entendi seu problema.... ^^

[juvenal]

A função OrdKeyCount() do xHarbour lhe retorna o nº de linha do Dbf/Arrqy