Jump to content
Fivewin Brasil

Trocar colunas de lugar XBROWSE


Orlando FMC

Recommended Posts

citação:

São recursos da classe do proprio FiveWin,

no caso essa tela eu fiz por RESOURCE, ai tem a opção no PELLES de Alignment ( Alinhamento ).

Att.

Lailton Fernando Mariano

http://www.lailton.com.br | Mail/Msn:

xHarbour 1.2.1 | Harbour 3.2.0 | Fivewin 12.4 | HwGui | Borland 5.8.2 | FiveWeb | MySQL


id=quote>id=quote>

Ok, Lailton.

Obrigado mais uma vez.

Tópico resolvido para mim...

Orlando F Martins da Costa

Windows 7 - FW [x]Harbour 11.10 - WorkShop 4.5 - PellesC

orlandofmc@yahoo.com.br

Belo Horizonte - MG

Link to comment
Share on other sites

  • 8 months later...

Xatinha(kkkkkk), ve se te ajuda:

 

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19986&p=105384&hilit=cambiar+columnas+del+xbrowse#p105384

 

Fixa e móveis...

 

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=6717&p=30056&hilit=cambiar+columnas+del+xbrowse#p30056

 

Senão seja mais especifica, não entendo alguém que fala ingles, frances, alemão e espanhol, fica com medo de entrar no forum inter, os caras lá são "osso" mas não mordem.     kkkkkkkkkkkkkkkkkkk

 

Beijos.

Link to comment
Share on other sites

Xatinho é vc.

 

Quem falou que eu tenho medo? Eu só não gosto, é diferente

kkkkkkkkkkkkkkkkkkkkkkk

 

Então jão, é isso , só que pra linha, esse exemplo é pra coluna.

 

Por exemplo: Quero que o usuário possa arrastar a 10º linha  pra cima, no lugar da 8º. Aí a 8º fica como 9º e a 9º fica como 10º.

Tendeu, coração?

Link to comment
Share on other sites

Ana, tenho um sistema de agenda médica, onde a prática de mudar as informações de linha no Browse são comuns. Utilizo um listbox com matriz e tenho rotinas de copiar e colar que são ativadas com o botão direito do mouse (oBrw:bRClicked). Seguem as funções para sua análise:

 

STATIC FUNCTION RecortarItemAgenda()
   IF aMtz[oBrw:nAt,7]
      aMtz[oBrw:nAt,8]:=.T.
      nItemRecortado := oBrw:nAt
      dDataRecortada := dCalendario
      aMtzTra:=aMtz
      oBrw:Refresh()
   ELSE
      MSG('Horário bloqueado')
   END
   RETURN NIL


STATIC FUNCTION ColarItemAgenda()
   IF aMtz[oBrw:nAt,7]
      IF PedeSenhaAnt()
         aMtz[oBrw:nAt,2]:=aMtzTra[nItemRecortado,2]
         aMtz[oBrw:nAt,3]:=aMtzTra[nItemRecortado,3]
         aMtz[oBrw:nAt,4]:=aMtzTra[nItemRecortado,4]
         aMtz[oBrw:nAt,5]:=aMtzTra[nItemRecortado,5]
         IF aMtzTra[nItemRecortado,6]==5
            aMtz[oBrw:nAt,6]:=1
         ELSEIF aMtzTra[nItemRecortado,6]==10
            aMtz[oBrw:nAt,6]:=6
         ELSE
            aMtz[oBrw:nAt,6]:=aMtzTra[nItemRecortado,6]
         END
         aMtz[oBrw:nAt,9]:=aMtzTra[nItemRecortado,9] //)+CRLF+'Agenda anterior: '+DToC(dDataRecortada)+' '+aMtzTra[nItemRecortado,1]

         aMtz[oBrw:nAt,11]:=aMtzTra[nItemRecortado,11]
         aMtz[oBrw:nAt,12]:=aMtzTra[nItemRecortado,12]
         aMtz[oBrw:nAt,13]:=aMtzTra[nItemRecortado,13]
         aMtz[oBrw:nAt,14]:=aMtzTra[nItemRecortado,14]
         aMtz[oBrw:nAt,15]:=aMtzTra[nItemRecortado,15]
         aMtz[oBrw:nAt,16]:=Usuarios->CodUsu
         aMtz[oBrw:nAt,17]:=Hoje() //dCalendario //Hoje()
         aMtz[oBrw:nAt,18]:=aMtzTra[nItemRecortado,18]
         aMtz[oBrw:nAt,19]:=aMtzTra[nItemRecortado,19]
         aMtz[oBrw:nAt,20]:=aMtzTra[nItemRecortado,20]
         aMtz[oBrw:nAt,21]:=aMtzTra[nItemRecortado,21]
         aMtz[oBrw:nAt,23]:=aMtzTra[nItemRecortado,23]
         aMtz[oBrw:nAt,25]:=aMtzTra[nItemRecortado,25]+;
                            DToC(dDataRecortada)+' '+; // data antes do recorte
                            aMtzTra[nItemRecortado,1]+' '+; // horario antes do recorte
                            DToC(Hoje())+' '+; // data do recorte
                            Left(Time(),5)+' '+; // horario do recorte
                            Str(Usuarios->CodUsu,6,0)+' '+; // codigo do usuario que recortou
                            Usuarios->Nome+CRLF // nome do usuario que recortou
         GravaAgenda()
         GravaReservaEquipamentos()
         IF dCalendario==dDataRecortada
            ExcluiReservaEquipamentos(nItemRecortado)
            aMtz[nItemRecortado,8]:=.F.
            aMtz[nItemRecortado,2]:=''
            aMtz[nItemRecortado,3]:=''
            aMtz[nItemRecortado,4]:=''
            aMtz[nItemRecortado,5]:=''
            aMtz[nItemRecortado,6]:=0
            aMtz[nItemRecortado,9]:=''
            aMtz[nItemRecortado,11]:=0
            aMtz[nItemRecortado,12]:=0
            aMtz[nItemRecortado,13]:=0
            aMtz[nItemRecortado,14]:=0
            aMtz[nItemRecortado,15]:=CToD('')
            aMtz[nItemRecortado,16]:=0
            aMtz[nItemRecortado,17]:=CToD('')
            aMtz[nItemRecortado,18]:=0
            aMtz[nItemRecortado,19]:=CToD('')
            aMtz[nItemRecortado,20]:=0
            aMtz[nItemRecortado,21]:=''
            aMtz[nItemRecortado,23]:=0
            aMtz[nItemRecortado,24]:=''
            aMtz[nItemRecortado,25]:=''
            GravaAgenda(nItemRecortado)
            ExcluiEncaixe(aMtz,nItemRecortado)
         ELSE
            ExcluiReservaEquipamentos(nItemRecortado,aMtzTra,dDataRecortada)
            aMtzTra[nItemRecortado,8]:=.F.
            aMtzTra[nItemRecortado,2]:=''
            aMtzTra[nItemRecortado,3]:=''
            aMtzTra[nItemRecortado,4]:=''
            aMtzTra[nItemRecortado,5]:=''
            aMtzTra[nItemRecortado,6]:=0
            aMtzTra[nItemRecortado,9]:=''
            aMtzTra[nItemRecortado,11]:=0
            aMtzTra[nItemRecortado,12]:=0
            aMtzTra[nItemRecortado,13]:=0
            aMtzTra[nItemRecortado,14]:=0
            aMtzTra[nItemRecortado,15]:=CToD('')
            aMtzTra[nItemRecortado,16]:=0
            aMtzTra[nItemRecortado,17]:=CToD('')
            aMtzTra[nItemRecortado,18]:=0
            aMtzTra[nItemRecortado,19]:=CToD('')
            aMtzTra[nItemRecortado,20]:=0
            aMtzTra[nItemRecortado,21]:=''
            aMtzTra[nItemRecortado,23]:=0
            aMtzTra[nItemRecortado,24]:=''
            aMtzTra[nItemRecortado,25]:=''
            GravaAgenda(nItemRecortado,aMtzTra,dDataRecortada)
            ExcluiEncaixe(aMtzTra,nItemRecortado)
         END

         nItemRecortado := 0
         dDataRecortada := CToD('')
         aMtzTra:={}
         oBrw:Refresh()
      END
   ELSE
      MSG('Horário bloqueado')
   END
   RETURN NIL


STATIC FUNCTION CancelaRecortarItemAgenda()
   IF dCalendario==dDataRecortada
      aMtz[nItemRecortado,8]:=.F.
   ELSE
      aMtzTra[nItemRecortado,8]:=.F.
   END
   nItemRecortado := 0
   dDataRecortada := CToD('')
   aMtzTra:=aMtz
   oBrw:Refresh()
   RETURN NIL

 

Att.

 

Silvano Bispo Faria

AWS SIstemas Empresairas

tel: (15) 3202-4498

Link to comment
Share on other sites

Silvano, obrigada, vou testar aqui e volto a postar.

 

Ico: É uma tela de monitoramento de pedidos em produção:

Na estrutura atual do sistema, o usuário gera um pedido para o envio de produção.

Depois ele gera um lote com vários pedidos. Depois ele gera uma ordem de produção com todos os produtos do lote. Nesse momento, ele somou todos os produtos de todos os pedidos num lugar só pra enviar pra produção.
Conforme as peças vão ficando prontas, o usuario entra nessa tela de monitoramento para verificar quantos % de cada pedido está pronto. 

Vamos imaginar, que uma determinada referencia está em mais de um pedido: Atualmente ele faz o calculo com o primeiro pedido encontrado, e se sobrar algo, ele repassa pros demais pedidos. 

Ele precisa escolher em qual pedido vai ter prioridade, e jogar pra cima, e recalcular tudo.

Eu consegui fazer, colocando um bmp, que quando clica, joga pra linha de cima, e funcionou tudo certinho.

O Problema é que o cliente pode ter 500 pedidos, e querer priorizar o ultimo. Ele teria que clicar 499 vezes pra fazer esse procedimento, que acaba ficando inviável.

 

Espero que tenha compreendido.

 

At.

 

Ana

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...