Jhonas

use um programa para converter pascal para c++ https://www.planet-source-code.com/vb/scrip...=tp%2FC67703582 abraço

exemplo http://danielneis.wordpress.com/2008/02/08...e-porcentagens/ abraço

function SegundosToTime( Segundos : Cardinal ) : String; var Seg, Min, Hora: Cardinal; begin Hora := Segundos div 3600; Seg := Segundos mod 3600; Min := Seg div 60; Seg := Seg mod 60; Result := FormatFloat(',00', Hora) + ':' + FormatFloat('00', Min) + ':' + FormatFloat('00', Seg); end; Exemplo de uso: ShowMessage( SegundosToTime(87543) ); abraço

aparece alguma mensagem de erro na tela ?

no caso do MYSQL 32 Bits até roda sem problemas, mas se quiser a versão para 64 Bits veja http://www.aroundfiles.com/Download/mysql-...winx64.msi.html abraço

experimente usar um conversor http://download.cnet.com/Word-to-Flash-Con...4-10946547.html abraço

para esconder uma pasta no CD não sei se é possivel, mas voce pode tentar usar esse Security SetUp II http://www.superdownloads.com.br/download/...setup-ii-light/ abraço

use o compilador do C++ Online ou outro com esse código http://codepad.org/ abraço

exemplo http://www.schulers.com/jpss/pascal/pushpop.htm abraço

Row 1 was truncated; it contained more data than there were input columns Linha 1 foi truncada, que continha mais dados do que havia colunas de entrada verifique se realmente a linha 1 do arquivo tem mais de 10 campos ... coloque as 3 primeiras linhas do arquivo cvs abraço

acho que voce ainda não entendeu o que ocorre... voce esta usando a mesma Tquery para executar um select ( selecionar os registros da tabela ) e executando um update ( atualizar os dados da tabela ) entretanto voce não leva em conta que um comando next é executado antes que o update termine ... em função disso o next tenta achar o proximo registro que já não existe mais, porque o select já foi desfeito While not dtTemp.Eof do ... SQL.Clear; OBS: Coloque a mensagem de erro extamente como é mostrada na tela abraço

mostre exatamente como o erro aparece

voce tem algumas opções 1 - voce pode desabilitar os timer 2 e 4 do código .. compilar e rodar novamente e reiniciar o micro 2 - pode dar boot pelo cd do windows e tentar a recuperação ( deletando o programa do keylogger ) 3 - criar um cd de boot ou pendrive com o sistema NTFS, a partir dai dá pra deletar o arquivo ou modificar o registro do windows 4 - fazer nova instalação do windows abraço

veja http://assuntoslegais.com/sites-para-fazer...ad-de-arquivos/ http://www.4shared.com/ abraço

reveja o seu código voce está usando a TQuery ( dtTemp ) para executar 2 processos SQL.Add('UPDATE tempTeste SET AnLote = :lote WHERE AnNumBrinco = :brinc'); e dtTemp.SQL.Add('SELECT FazCod, AnNumBrinco, AnDataNasc, AnLote, AnSexo FROM tempTeste'); use um TQuery para UPDATE e outro para SELECT e não terá erro abraço

ok... Instalando e configurando o mysql http://www.loiane.com/downloads/Instalando%20My%20SQL.pdf Instalando e configurando o wampserver http://helpmasters.com.br/artigo/86/como-i...-mysql-e-apache abraço

veja https://www.scriptbrasil.com.br/forum/lofiv...hp/t102828.html abraço

faça as modificações que forem necessarias var numero, contador, consumo, preço, soma,maior, menor:integer; total:integer; begin contador := 0; soma := 0; write ('Digite o numero do consumidor '); readln (numero); write ('Digite a quantidade do kWh consumido durante o mes '); readln (consumo); maior := consumo; menor := consumo; while (numero <= 999) do begin Contador := contador +1; write ('Digite o preço do kWh '); readln (preço); total :=preço * consumo; writeln ('total a pagar pelo consumidor Numero: ', numero, '= R$', total); writeln; soma := soma + total; writeln ('Digite o numero do consumidor '); readln (numero); writeln ('Digite a quantidade do kWh consumido durante o mes '); readln (consumo); if (consumo > maior)then begin maior := consumo; end; if (consumo < menor)then begin menor := consumo; end; end; writeln ('O maior consumo verificado foi' ,maior,',',' KWh'); writeln ('O menor consumo verificado foi' ,menor,',',' KWh'); writeln ('A media geral de consumo da cidade e:' ,soma/contador); end. abraço

exemplo http://www.htmlstaff.org/ver.php?id=2107 abraço

Conecção ou conexão Conexão é a forma correta de escrita da palavra. A palavra conecção está errada. Sempre que quisermos dizer que existe algum tipo de união, ligação, nexo, devemos utilizar o substantivo feminino conexão. A palavra conexão tem sua origem na palavra latina connexio, devendo assim ser escrita com x e não com cç. A confusão surge por ser estabelecida uma ligação entre a palavra conexão e o verbo conectar. Todavia, o verbo conectar vem da palavra latina conectare. Exemplos: Eu não vejo qual a conexão entre estas duas situações. Fique descansada e transfira os dados, esta é uma conexão segura. Preciso de uma peça para fazer a conexão destes tubos. Na língua portuguesa, o grafema x pode ter várias formas de ser pronunciado. Neste caso, apresenta o fonema /cs/. Existem outras palavras em que o x assume este fonema: oxítona, prefixo, táxi, maxilar, flexão, … ===================================== Com relação a sua dúvida, tanto o wamp server como o mysql devem ser configurados corretamente, coisa que voce não fez, mas o cara que esta explicando na video aula não comentou e já tinha configurado abraço

esta em ingles ... use o tradutor do google para entender http://www.gnu.org/software/pythonwebkit/ abraço

na realidade ele tenta usar a função, mas como a chamada da função esta dentro do for, o loop se processa tão rapido , que não é possivel enviar os valores da função a sugestão seria diminuir o tempo de processamento, ou esperar o retorno da função para continuar o loop´ para entender melhor, veja metodos numeros nessa apostila http://fisica.ciencias.uchile.cl/~jrogan/c...m0p06/mfm0f.pdf anraço

leia esse artigo http://www.slideshare.net/asergionogueira/...de-com-o-python abraço

veja http://www.arquivodecodigos.net/dicas/java...-java-1179.html abraço

algoritmo "semnome" // Função : // Autor : // Data : 23/04/2012 // Seção de Declarações var val1,val2 : Real nome1,nome2: caracter inicio // Seção de Comandos Escreval ("Digite o nome do funcionario") Leia (nome1) Escreval ("Digite o salario do funcionario") Leia (val1) Escreval ("Digite o nome do funcionario") Leia (nome2 ) Escreval ("Digite o salario do funcionario") Leia (val2) // comando se se val1 > val2 então Escreva ("Salario Do funcionario:", nome1 " é Maior Do que o funcionario", nome2 ) senao escreva ("Salario do funcionario:", nome2 "é maior Do que o do funcionario", nome1 ) fimse // fimse do comando se fimalgoritmo OBS: voce pode acrescentar os valores dos salarios tambem se quiser exemplo: http://forum.clubedohardware.com.br/resolv...sor/684503?amp; abraço