Página 1 de 1

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 3:08 pm
por wmsei
Srs. bom dia,
Preciso montar um browse onde tenho vários itens a processar ao mesmo tempo. Preciso marcar/colorir os itens que preciso processar e após marcar esses itens e clicar em confirmar, o sistema ira rodar uma rotina que pegue somente os itens que estão marcados.
Grato pelo retorno e atenção.
Wagner

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 3:51 pm
por emeasoft
Wagner,
Segue alguns exemplos:

::oArrayBrowse:nMarqueeStyle := bmHIGHLROWMS
...
...
::oBtnDelete:lEnabled:=(Len(::oArrayBrowse:aSelected)>0)
...
...
FOR i:=1 TO Len(::oArrayBrowse:aSelected)
valor:=::oArrayBrowse:GetRow(::oTela1:aSelected)[1]
NEXT

Mário Angelini

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 4:53 pm
por wmsei
Mário bom dia,
Primeiramente obrigado pela presteza na resposta.
Desculpe minha ignorí¢ncia, esse objeto ::oTela1 o que seria isso e uma outra coisa quando utilizo ::oArrayBrowse:nMarqueeStyle := bmHIGHLROWMS, marco as linhas com Ctrl+Mouse as linhas, se quiser fazer isso com duplo clique, qual seria a opção.
Mais uma vez muito obrigado.
Wagner

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 6:54 pm
por emeasoft
Wagner,
No exemplo ::oTela1 é um TArrayBrowse que uso e esqueci de
mudar no exemplo.
Se vocíª usar ::oArrayBrowse:nMarqueeStyle := bmHIGHLROWMS
funciona com todos os modos de marcação do Windows:
.CTRL+clique,
.SHIFT+clique, etc...
Mário

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 8:14 pm
por wmsei
Mário boa tarde,
Entendi, no exemplo que iniciei estou usando o TDBrowse que nao tem a propriedade de GetRow, para usar TArrayBrowse teria que em primeiro lugar pegar os dados que quero que o browse mostra e ai sim fazer esse tipo de tratamento. Vi também que o TArrayBrowse tem alguns eventos a mais que TDBrowse, o que preciso fazer consigo com TDBrowse ou vocíª acha melhor com TArrayBrowse.
Grato pelo retorno e atenção.
Wagner

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 16, 2013 9:41 pm
por emeasoft
Wagner,
Somente usamos o TArrayBrowse, pois achamos mais
fácil de trabalhar com ele.
Para carregar as colunas que quiser mostrar:
DO While ARQ->(!Eof())
IF...
::oArrayBrowse({col1,col2,col3,col4,col5})
ENDIF
ARQ->(DBSkip())
EndDo
Vocíª pode também criar uma coluna invisí­vel e nela
guardar o ARQ->(Recno()), por exemplo, para se
precisar ter o ponteiro da linha do ArrayBrowse com o arquivo.
Abraços
Mário

Browse com opção de marcar e tratar linha

Publicado: Mar Abr 23, 2013 7:59 pm
por wmsei
Mário boa tarde,
Usando TArrayBrowse, não consigo usar o duplo click para marcar uma linha desse browse, pelo que vocíª me enviou e li no forum, para marcar uma(s) linha(s) aperto CTRL+clique ou SHIFT+clique, tem como incluir uma coluna e trata-la como checkbox? Favor nos enviar um exemplo.
Grato pelo retorno e atenção.
Wagner