USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Tratamento de String e Binario
israel
não registrado
Postada em 29/12/2004 17:23 hs   
amigos , é o seguinte . bom eu to fazendo o projeto pra recuperar a posição X , Y do mouse eu já consegui pegar o binario e indentificar cada sequencia de binario e as corespondencias , tipow assim um comando tipo 1 ponto pra esquerda é uma sequencia de 10 bits para direita eu acho q é 11 , bom eu preciso do sequinte selecionar esses "pacotes" que corespondem a ação , problema é o seguinte eles tem 3 variações de tamanho de 10 11 12 bites , intão se eu mandar selecionar os 12 primeiros e o pacote for de 11 ai eu pego 1 bit errado consequentimente num funciona , e assim por diante....

quem tiver alguma ideia
Obroigado a todos.
     
Gelson Porto
Pontos: 2843 Pontos: 2843 Pontos: 2843
RIO DE JANEIRO
RJ - BRASIL
Postada em 05/01/2005 08:29 hs            
Israel, existem em varios objetos do vb que lhe retornam as coordenadas do mouse, dependendo apenas da finalidade do porque que voce precisa desta informação.
        Tente explicar melhor em que situação voce precisa fazer isto funcionar.
 
         OK ??
     
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 05/01/2005 10:34 hs         
Se o negócio é pegar a posição do mouse, você pode usar a API:
 
Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
    'This is the data type


Public Type POINTAPI
    X As Long 'x coordinate of the mouse
    Y As Long 'y coordinate of the mouse
End Type
E colocar um timer no formulário que grave as posições. Mas se quiser ainda assim usar do teu modo, use o mid assim:
pacote = mid(pacote,1, len(pacote))
isto vai selecionar somente o número de bits que o pacote tiver.
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2026   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página