Projeto que transforma mm p/ polegada e vice-versa

Question

Alguem tem um Projeto que transforma milimetro em polegada e vice-versa.GratoJuarezber@terra.com.br...

Fred · Accepted Answer

porque voce mesmo nao faz um. basta saber quantos milimetros equivale a uma polegada e dividir, mais simples que isto nao existe. 8)...

Juarezber · Answer

Fred, pela tua resposta, n�o entendes nada de medidas. Mas obrigado por responder.Juarezber@terra.com.br...

Cgi_net · Answer

Bom pra facilitar o que ele falou...Ja q 1 polegada tem 2.54 centimentrosquero saber quantos centimetros tem 50 polegadas...50 x 2,54 = 127cmex.function convPol(pol : real): string;begin result := FloatToStr(pol * 2.54);end;Bom,... abra�os :)...

Cgi_net · Answer

Ops era mm n�o cm bom ai eh so converter centimetro em mm...Desculpe a gafe  :wink:...

4_olho · Answer

Caro Juarez,Com a sua resposta voc� DESANIMA qualquer um a responder �s suas perguntas. Uma dica - se voc� n�o sabe resolver algo no papel, nem adianta usar um computador de mais de mil d�lares para fazer por voc�.O COMPUTADOR FAZ O QUE VOC� MANDA, N�O O QUE VOC� QUER....

Juarezber · Answer

cgi_net, no papel eu sei. ex: 1� = 25.41/2�= 12,73,175=1/8�Se eu digitar 1/128� de polegada em um edit,  tera que retornar 0,1984375 mm.Se eu digitar 0,1984375 de mm,  tera que retornar 1/128� de polegada.Sem contar com polegada inteira e/ou fracionada. Dei aquela respostapor causa da resposta que recebi. Eu deveria dizer, fica melhor quem entende de metrologia, me ajudar. (N�o quis ofender).Abra�osJuarezber@terra.com.br...

Aroldo Zanela · Answer

Juarez,Aqui (//www.sportnautica.com.br/unidades.htm) diz que 1� (Uma polegada ) � igual a 25.401 mmMeio caminho:[code:1:74b6e3c229]procedure TForm1.Button1Click(Sender: TObject);Const nPolegada = 25.401;varnBarra, nInt, nAvos: Integer;beginnBarra := pos(�/�,Edit1.Text);  if nBarra > 0 thenbeginnInt := StrToInt(Copy(Edit1.Text,1,nBarra-1));    nAvos := StrToInt(Copy(Edit1.Text,nBarra+1,Length(Edit1.Text)-nBarra));    ShowMessage(FloatToStr((nInt*nPolegada)/nAvos));end else  beginnInt := StrToInt(Edit1.Text);    ShowMessage(FloatToStr(nInt*nPolegada));  end;end;[/code:1:74b6e3c229]...

Juarezber · Answer

Aroldo Zanela, 0brigado e parabens, ficou bom polegada para mm.Tens mm para polegada?Abra�osjuarezber@terra.com.br...

4_olho · Answer

JuarezQuem lhe deve desculpas sou eu.  :oops: Fui precipitado !  :oops: Vamos ver se posso ajud�-lo a a fazer a transforma��o inversa. A solu��o n�o est� aqui, mas somente um meio de tentar resolv�-la.Parece que as polegadas �fracion�rias� s�o divididas em pot�ncia de 2, certo ? � algo como 1/2�, 1/4�, 1/8�. 1/16�, 1/32�, etc.. ent�o podemos criar uma tabelinha que fa�a a correspond�ncia entre o fracion�rio e o decimal.1/2� = 0,5�1/4� = 0,25�1/8� = 0,125�etc ...ent�o para transformar mm para polegadas em forma fracion�ria � preciso 2 passos : um � calcular o valor inteiro da divis�o de mm para polexemplo : 3,17 cm = 2,54 cm + alguma coisa = 1 pol mais alguma coisa certo ?o outro passo � transformar o resto decimal em fracion�rio, que � o que vou tentar fazer.Escreva para 4_olho@terra.com.br que lhe dou uma resposta mais concreta. Como disse, eu preciso primeiro acertar no papel, para depois colocar como c�digo.......

Juarezber · Answer

Aroldo Zanela, tentei no teu programa fazer, mesclar
polegada x mm inteira + fracionada nao consegui.
tentei mudar o programa mas !!!
ex: 1 1/2� = uma polegada e meia = 38,101.

Abra�os
juarezber@terra.com.br

Q · Answer

N�o se divide, se multiplica!Estou na sala agora, segui seus conselhos e deu errado, vou te denunciar por respostas erradas...

F�rum Projeto que transforma mm p/ polegada e vice-versa #166723