Lucas Phillip

aff.. isso deu um no na minha cabeça... eu peguei a imagem e encryptei ela.. beleza.. mas como eu faço pra fazer a imagem encriptada aparecer?

hmm.. e pra salvar então eu tenho q salvar em binario tb? ou normal mesmo da? porque não sei salvar em binario

bom eu pensei em fazer assim então: eu ia abrir o codigo da imagem num textbox, ai ia cryptografar, depois ia salvar cryptografado mas eu to com um problema em abrir o código da figura... eu fiz assim: Dim Texto As String Open "c:\Lucas\vb\madeira.rdc" For Input As #1 Do Line Input #1, Texto Text1.Text = Text1.Text + Texto + vbCrLf Loop While Not EOF(1) Close #1 assim funciona direitim para arquivos de texto, mas quando eu tento abrir uma figura com isso, aparece apenas a 1 linha e um pedaço da segunda... socorro... hehe vlw

Olá (mais uma vez hauhau) bom.. dessa vez o problema é bem simples, pelo menos eu acho q é.. mas eu não tenho nem ideia de como fazer.. bom, to fazendo um programa ai, q ele tem umas imagens q ficam armazenadas dentro duma pasta imagens... só q todas as imagens são .jpg, então qualquer pessoa pode editá-las e avacalhar com o programa... como eu faço pra proteger essas imagens? algo como encripta-las para q só o meu programa possa reconhece-las e reproduzi-las... vlw

nossa.... cara... você sabe q eu te amo ne? fiz umas pequenas modificações só pra fica do jeitim q eu queria e ta perfeito agora vlw!

bom... eu nunca tinha usado bitblt antes... ai dei uma pesquisada pra ver se aprendia e tal, mas acho q não deu mt certo não... sera q não dava pra você me dar um exemplo usando bitblt? isso facilitaria mt pra mim aprender como usar vlw!

aew, só me tira mais uma duvida... quando a imagem é carregada, a parte q aparece no picturebox e a parte de cima e mais a esquerda da imagem... como eu faço pra carregar o meio da imagem, ao invés do canto superior a esquerda? (fico meio esquisita a explicação , mas acho q da pra entender ) vlw

ae... deu certo mas acabo q eu fiz um poco diferente do que você falo... fico assim: Select Case KeyCode Case vbKeyLeft load_player Plado = Plado + 100 mapa.PaintPicture nmap.Picture1.Picture, C + Plado, V + Pcima Case vbKeyRight load_player Plado = Plado - 100 mapa.PaintPicture nmap.Picture1.Picture, C + Plado, V + Pcima Case vbKeyUp load_player Pcima = Pcima + 100 mapa.PaintPicture nmap.Picture1.Picture, C + Plado, V + Pcima Case vbKeyDown load_player Pcima = Pcima - 100 mapa.PaintPicture nmap.Picture1.Picture, C + Plado, V + Pcima End Select vlw!!

ae, eu tentei fazer o q você falou, e ta quase funcionando olha como fico Select Case KeyCode Case vbKeyLeft mapa.PaintPicture nmap.Picture1, Y, Z, , , Y - 100 Case vbKeyRight mapa.PaintPicture nmap.Picture1, Y, Z, , , Y + 100 Case vbKeyUp mapa.PaintPicture nmap.Picture1, Y, Z, , , , Z - 100 Case vbKeyDown mapa.PaintPicture nmap.Picture1, Y, Z, , , , Z + 100 End Select o problema é q por algum motivo, só da pra clica 1 vez pra cada lado, depois não adianta mais clicar como eu arrumo isso? vlw edit: ah, tem outro problema tb... quando eu ponho pra cima, depois ponho pra esquerda, ao invés da imagem ir pra cima e depois pra esquerda, ela vai pra cima depois na diagonal pra baixo e esquerda... isso acontece em todas as direções

Olá bom, eu to fazendo uma especie de visualizador de imagens, só q eu quero q o picture box fique com um tamanho definido... só q quando a imagem é maior do q ele, ela fica cortada... ai eu queria saber como eu faço pra imagem mover quando as setas do teclado forem precionadas, para q o resto da imagem seja visualizada? vlw

hmm.. e qual o site do maya? porque eu procurei no google pra dar uma olhada, mas só achei lixo.. não o site

falow tudo! mas o q mais me atraiu no blender é q ele é gratuito quanto aos tutoriais, no proprio site da blender já tem... eu q tava procurando errado ... vlw ai

Olá, eu peguei o blender 3D, e queria saber se alguém conhece algum tutorial para que eu possa aprender a mecher nele... nem precisa ser um bom tutorial... qualquer um que me de pelo menos noção das coisas já esta bom, porque eu to mt perdido nesse programa vlw

ae.. eu coloquei multiline e ate tira o som... mas ai atrapalha o resto... vo te q conviver com o barulhinho mesmo... vlw

ae, eu to fazendo uma especie de chat, ai tem la o campo pro povo poder escrever e mandar a msg... ai eu coloquei um sub key_down pra quando apertar enter, enviar o q foi escrito... só q da um barulinho tipo "tum" toda vez q aperta enter... eu quero saber se da e como tira isso... pra saber o barulho q eu to falando é facim testar... faz um form com um textbox, coloca o focus nele e aperta enter pra ver o barulho vlw

ae.. acabo q eu consegui fazer uma gambiarra la com resume next... isso ainda vai me dar problemas no futuro, mas pelo menos resolveu por enquanto... falou

não da porque o erro acontece num if... então se eu coloco resume next, só piora a situação porque simplesmente ignora o if, executando sempre tudo q ta dentro dele entendam q não precisa acontecer nada quando tiver erro.. eu quero q ele simplesmente seja ignorado e o programa continue funcionando normalmente...

ae.. não consegui fazer o q eu quero ainda não.. dexa eu tenta explica melhor por exemplo... a = split(B, "-") on error goto continua if (a(2) = "x") then 'codigos end if if (a(2) = "y") then 'codigos end if continua: 'codigos tem um split no script, e eu quero pegar por exemplo o a(2)... só q nem sempre a(2) existe... então quando ele não existe volta erro... ai para tirar esse erro, eu coloquei um on error goto continua... só q eu preciso checar 2 vezes o a(2)... só q se a 1 falhar, a linha "on error goto continua" vai fazer com q o segundo if seja ignorado, porque já deu erro no primeiro if... deu pra entender o q eu quero agora? vlw

Ae galera... eu to com problema em tratar erros no vb6... eu estava usando on error goto x e isso ate q funcionava se tivesse só 1 erro por sub... mas ai começo a aparecer mais de 1 e ai a coisa complico.. eu queria saber se não tem algo parecido com o tratamento de erros do vb.net, aquele "try, catch, end try", só q pro vb6... ou então algum jeito melhor de tratar erros.. vlw

ae.. voltei de viajem ontem, e como ninguém ainda respondeu minha duvida, resolvi subi com ela mais uma vez pra ve se alguém me ajuda... vlw

bom, eu tava dando uma olhada por ai pra tentar resolver o problema, e achei esse site q ensina a configurar o myodbc DSN no windowns... (http://dev.mysql.com/doc/mysql/en/dsn-on-windows.html) ai eu tentei fazer isso pra ver se funcionava, mas ainda não deu... alguém tem ideia do q eu tenho q fazer pra resolver? vlw

ops hehe ... q vacilo... já arrumei tudo fico perfeito... brigadao velho!!!

ae.. eu acho q agora eu vo consegui... só preciso saber um coisa... no inputbox q você escreve o ip, aparece pra clicar ok ou cancel... só q cancel não faz nada, se você clica nele, simplesmente volta pro inputbox... como eu faço pra definir o que cancel e o q ok faz?

aew... bom eu preciso conectar ao mysql, e enquanto eu estava fazendo testes aqui em casa, eu usei a coneção com localhost mesmo strConString = "DRIVER={MySQL ODBC 3.51 Driver};" _ & "SERVER=localhost;" _ & "DATABASE=xxx;" _ & "UID=xxx;PWD=xxx; OPTION=35" e funcionava perfeito... mas isso é so para testes, porque o bd real ficará hospedado em outro pc, então o programa tem q conectar ao banco de dados de outro pc... ai eu fiz o seguinte codigo: strConString = "DRIVER={MySQL ODBC 3.51 Driver};" _ & "SERVER=200.200.200.200;PORT=3306;" _ & "DATABASE=xxx;" _ & "UID=xxx;PWD=xxx; OPTION=35" só q não funciona assim... esse codigo eu peguei do www.conectionstrings.com, com a unica diferença é q ao invés de usar um dominio pra conectar eu usei um ip... bom então eu preciso saber... esse código não funciona com ip? ou tem alguma outra coisa errada? vlw

bom, eu tentei fazer como você falou, mas devido a meu pouco conhecimeto de vb, funcionou, mas não do jeito q eu queria... tipo eu queria q no form_load já verificasse, mas eu so consegui verificar depois q o form foi carregado... tem como você falar como você pessou em usar um contador pra me dar ideias não? vlw