Jpab Posted May 10, 2008 at 03:11 PM Report Share #184315 Posted May 10, 2008 at 03:11 PM ja anvancei mais desde a ultima vez que postei info sobre o projecto... estou na parte da eletronica nao esta fiacil :S vejam o codigo que eu fiz e vejam porfavor se detectam algum erro já que eu ainda nao posso testar o programa porque a parte da eletronica esta a demorar. se detectarem digam que nao detectarem digam que nao detectaram. aqui vai o codigo da parte do controlo da porta: 'declaraçoes Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer Private Declare Function Inp Lib "inpout32.dll" _ Alias "Inp32" (ByVal PortAddress As Integer) As Integer Private Declare Sub Out Lib "inpout32.dll" _ Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) 'desativo todos os pinos ao iniciar Private Sub Form_Load() Dim ValOut As Byte Out 888, 0 End Sub 'quando carrego nas teclas: Private Sub Frente() Dim ValOut As Byte Out 888, 1 End Sub Private Sub traz() Dim ValOut As Byte Out 888, 2 End Sub Private Sub Esquerda() Dim ValOut As Byte Out 888, 4 End Sub Private Sub Direita() Dim ValOut As Byte Out 888, 8 End Sub Private Sub cidi() Dim ValOut As Byte Out 888, 9 End Sub Private Sub diba() Dim ValOut As Byte Out 888, 10 End Sub Private Sub esba() Dim ValOut As Byte Out 888, 6 End Sub Private Sub cies() Dim ValOut As Byte Out 888, 5 End Sub Private Sub para() Dim ValOut As Byte Out 888, 0 End Sub se puderem deem uma vista de olhos thanks 😛 Link to comment Share on other sites More sharing options...
Jpab Posted May 11, 2008 at 10:41 PM Author Report Share #184612 Posted May 11, 2008 at 10:41 PM como ninguem diz nada aparentamente esta certo nao? tipo se eu tiver um multimetro posso testar o programa? tipo encosto o cenas do multimetro a um pino a ver se a voltagem muda quando carregar na tecla ou assim... se ela nao mudar nao deve estar a funcionar... acham este teste possivel? Link to comment Share on other sites More sharing options...
asworm Posted May 12, 2008 at 10:49 AM Report Share #184643 Posted May 12, 2008 at 10:49 AM vou ser simcero... nao percebo nada de electronica... tambem desconheco como fazer para manipular os circitos, mas aparentemente nao vejo nada de errado... Got it? Link to comment Share on other sites More sharing options...
David Pintassilgo Posted May 12, 2008 at 02:58 PM Report Share #184684 Posted May 12, 2008 at 02:58 PM http://www.electronicapt.com/forum/index.php/topic,97.0.html Parte electrónica mas contem tb a parte de programação em VB6. Julgo que a grande parte da informação contida já a possuis, mas dá uma vista de olhos, pode estar lá alguma coisa que te interesse. cool stuffs to check. http://blog.zxcoders.com// Link to comment Share on other sites More sharing options...
Jpab Posted May 13, 2008 at 08:17 AM Author Report Share #184784 Posted May 13, 2008 at 08:17 AM ja tinha visto esse site thanks na mesma... o meu codigo pareceu te certo? Link to comment Share on other sites More sharing options...
NuGuN Posted May 16, 2008 at 09:06 PM Report Share #185543 Posted May 16, 2008 at 09:06 PM Boas. Tipo, o código k postas-te não parece ter erros. Mas depois o resto do código é que não sei. Mas o k aí esta parece estar bom. cumps Link to comment Share on other sites More sharing options...
Jpab Posted May 17, 2008 at 02:58 PM Author Report Share #185658 Posted May 17, 2008 at 02:58 PM tipo pessoal eu tenho uma picture box e cria dividila em 6 partes e cada parte funcionar como um botao??? Link to comment Share on other sites More sharing options...
Jpab Posted May 17, 2008 at 02:59 PM Author Report Share #185660 Posted May 17, 2008 at 02:59 PM obrigado NuGuN Link to comment Share on other sites More sharing options...
NuGuN Posted May 18, 2008 at 01:02 PM Report Share #185825 Posted May 18, 2008 at 01:02 PM E porque não 4 picturebox's em vez de uma só? Alguma razão em especial? Cumps Link to comment Share on other sites More sharing options...
Jpab Posted May 18, 2008 at 03:49 PM Author Report Share #185872 Posted May 18, 2008 at 03:49 PM era uma picturebox onde dava a imagem da camera mas ja resolvi o problema... puz varias labels transparentes a funcionar de botao xD Link to comment Share on other sites More sharing options...
Jpab Posted May 18, 2008 at 03:55 PM Author Report Share #185873 Posted May 18, 2008 at 03:55 PM agora o meu problema é como gravar imagens que tao no vb para o pc.. do tipo eu tenho este codigo num botao: SavePicture Picture1.Image, "c:\Foto.jpg" so que este codigo so dá para gravar um ficheiro... quando quero guardar nova foto carrego no botao e emvez de guardar em um novo ficheiro substitui o anterior :S tenho de arranjar outra forma de gravar as fotos :S Link to comment Share on other sites More sharing options...
NuGuN Posted May 24, 2008 at 06:42 PM Report Share #187237 Posted May 24, 2008 at 06:42 PM Boas. óbvio que substitui pk estas a guardar com o mesmo nome. Define uma variável e cada vez de carregas no botão para guardar a imagem, incrementa a variável. E depois nesse código mete o seguinte. Imaginando que a variável era ind SavePicture Picture1.Image, "c:\Foto" & "(" & ind & ")" & ".jpg" Cumps Link to comment Share on other sites More sharing options...
Jpab Posted May 25, 2008 at 06:02 PM Author Report Share #187412 Posted May 25, 2008 at 06:02 PM Obrigado NuGuN tambem cheguei maios tarde a esse resultado sozinho e esquecime de vir aqui avizar, peço desculpa XD Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now