Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. Fechando somente a conexão já é suficiente, mas se quiser pode fechar as tabelas e as queries antes. ADOConnection1.Connected := false; ADOTable1.Active := false; ADOTable1.TableDirect := false; ADOQuery1.Active := false; abraço
  2. Entre no site, tem vários programas e um telefone para dúvidas http://www.dominiosistemas.com.br/?sec=noticias&id=1299 abraço
  3. //Desabilitar Atualizações Automáticas do Windows via registro abraço
  4. que componentes voce está usando para conexão e acesso as tabelas ?
  5. Essa especificamente não, mas voce pode copiar e colar no word Esta outra ( Apostila Completa Delphi 7 ) voce pode baixar deste endereço http://www.apostilando.com/download.php?co...ategoria=Delphi abraço
  6. memo1.Text := inttostr(IE) + ' ' + agita; OBS: Favor seguir as regras do forum ... ok ? abraço
  7. Seja mais claro ... está um tanto confuso a sua explicação abraço
  8. O ideal é fechar as tabelas... deixando-as abertas corre-se o risco de voce não atualizar os dados desta tabela para o restante da rede, e tambem o tempo neste caso é quase irrelevante, desde que suas consultas não tragam para a tela um número muito grande de registros. otimização do banco de dados: http://scriptbrasil.com.br/forum/index.php...st&p=572427 abraço
  9. Existem vários fatores que influenciam em uma consulta ao banco de dados entre elas: paginação, indices, filtros, joins entre tabelas, conexão, tipo de banco dados, etc... Material para pesquisa: http://www.ramosdainformatica.com.br/art_r...s01.php?CDA=621 http://deblugando.wordpress.com/2009/01/14...tutorial-mysql/ http://cc.embarcadero.com/author/795118 http://www.comunidade-firebird.org/cflp/do...s/CFLP_O015.PDF http://www.apostilando.com/download.php?co...categoria=MySQL abraço
  10. Pagina 79 desta apostila http://74.125.93.132/search?q=cache:r3RTEF...=clnk&gl=br abraço
  11. Se voce vai atribuir um valor ao campo da sua tabela, antes voce deve editar o registro TBLORCAMENTOS.EDIT; TBLORCAMENTOS.FieldByName('NUMERO').ASSTRING:= DBNUMERO.TEXT; if DBPRONTO.Checked = True then begin LABELDOCUMENTOPRONTO.Caption:= 'DOCUMENTO PRONTO DIA: ' + DBDATAPRONTO.FIELD.TEXT; end; TBLORCAMENTOS.POST; abraço
  12. Como o colega Alberto Mota já explicou, todas as tabelas devem ser fechadas Se estiver usando o interbase ficaria assim: FMenu.IBDatabase1.ForceClose; FMenu.IBDatabase1.CloseDataSets; FMenu.IBDatabase1.Close; FMenu.IBTransaction1.Active := false; abraço
  13. Jhonas

    Config.txt

    Código para ler um arquivo txt var Arq : TextFile; Linha : string; begin AssignFile(Arq, 'C:\MeuProg\Config.txt'); Reset(Arq); while not EOF(Arq) do begin ReadLn(Arq, Linha); //Comando que recebe a configuração do IP:= Linha; end; CloseFile(Arq); end; OBS: Lembre-se que as linhas serão lidas na sequencia, desta maneira faça uma condição para que a linha correspondente seja aquela que será atribuida ao comando de configuração do ip abraço
  14. O componente deste site é demo Tente este endereço http://www.link-rank.com/builder/skinbuilder.htm abraço
  15. Existe um erro nesta logica Em função deste comando, os numeros até 11 não serão mostrados, pois se a função mod não retornar dirente de zero para todos os termos, os numeros não serão mostrados. ( não mostra os números 2,3,5,7 e 11 ) OBS: Repare que são os mesmos numeros que estão na função mod if (num[i] mod 2 <>0) and (num[i] mod 3 <>0) and (num[i] mod 5 <>0) and (num[i] mod 7 <>0) and (num[i] mod 11 <>0) and (num[i] <>1) Caso queira usar matriz, basta alterar o código abaixo que esta correto var x, i, cont: integer; begin cont:=0; for i:= 1 to 1000 do begin for x := 1 to 11 do if i mod x = 0 then cont:=cont + 1; if cont<=2 then writeln('O numero ', i, ' e primo.'); cont:=0; readln; end; end. abraço
  16. Veja nesta apostila, pagina 113 capitulo 8.3.7 Localizando um registro num arquivo http://www.scribd.com/doc/7353183/Livro-Pr...-Jaime-Evaristo abraço
  17. Pela falta de informação, fica dificil .... uma vez que voce diz que quer converter dados de um programa clipper para outro programa que voce nem sequer disse que tipo de banco de dados ele usa. Procure ser sempre explicito nas informações, caso contrário sua dúvida ficará sem respostas abraço
  18. Use este programa http://superdownloads.uol.com.br/download/136/restoration/ abraço
  19. Faça uma atualização da BIOS http://www.nvmaniacos.queroumforum.com/viewtopic.php?p=830 abraço
  20. Não aconselho esse seu modo de fazer programação ... seja simples e objetivo como voce é novato no delphi, veja este post http://scriptbrasil.com.br/forum/index.php...ost&p=41487 abraço
  21. Se isso fosse possivel, a segurança da microsoft seria uma mer@#$%% cadoria ... rs abraço
  22. Muito provavelmente existe arquivos corrompidos ou tem trilhas defeituosas no CD de instalação abraço
  23. Jhonas

    windows virtual

    Na net tem muita informação sobre isso http://www.google.com.br/search?hl=pt-BR&a...windows+virtual abraço
  24. Jhonas

    cd drivers

    Use o programa chamado NERO ... com ele voce poderá agrupar todos os drives de varios cds em apenas um http://www.google.com.br/search?hl=pt-BR&a...q=0&o que=nero abraço
  25. exemplos: http://www.webscriptsdirectory.com/Python/...uestbook-L3918/ http://www.screencaster.com.br/php-x-pytho...eus-frameworks/ http://www.soft32download.com/software/Voi...ad-details.html abraço
×
×
  • Criar Novo...