Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. Jhonas

    Pc não liga

    pelo seu relato, voce só não testou 3 coisas: a voltagem da fonte ... veja com um multimetro as voltagens nos pinos de saida 5 volts ( preto e vermelho ) 12 volts ( preto e amarelo ) se estiver ok passe para o processador tire o dissipador e veja como esta a pasta térmica ( se estiver ressecada, tire os residuos , limpe e depois coloque uma camada nova de pasta térmica ) observe tambem se o dissipador esta empoeirado... se estiver limpe. quando ligar o pc, verifique a temperatura do processador .. se ele ficar muito quente, existe um sensor na placa que fará com que o micro seja desligado, justamente para evitar a queima do processador. OBS: se voce tiver outro HD ( com o windows instalado ) para teste, faça a substituição e teste ( tambem pode ser problema com o HD ). O sistema operacional pode estar com arquivos corrompidos e dessa forma o windows não inicia. abraço
  2. Tente tirar o componente do form, depois de um Build All no projeto e coloque novamente o componente no form e veja se resolve. se não resolver, desinstale o componente do delphi e instale-o novamente. OBS: Estou usando o windows 7 e isso não acontece. abraço
  3. Acontece que quando clico no ícone criado ele abre o popumenu em baixo da gaveta de ícones ao lado do relógio, o correto seria em cima. parece que isso tem haver com a posição quando é criado a janela tem um exemplo nesse link usando o windows 10 http://stackoverflow.com/questions/12946150/how-to-bring-my-application-to-the-front abraço
  4. amigo, normalmente esse problema é de componente. baixe o rxlib para o delphi berlin e instale os componentes http://www.micrel.cz/RxLib/files/unrxlib_275_u_1_0_18.rar ou veja se esses exemplos te ajudam. http://stackoverflow.com/questions/2889291/delphi-minimize-application-to-systray http://stackoverflow.com/questions/11820105/minimize-delphi-form-to-system-tray esse exemplo é para o XE10, mas serve para o Berlin abraço
  5. tente esse exemplo: http://www.devmedia.com.br/como-transferir-arquivos-entre-aplicacoes-cliente-servidor-com-datasnap/27093 abraço
  6. voce não falou qual é a versão do seu delphi e nem do windows.
  7. voce tem 2 opções: vender o código fonte para a empresa ( exemplo: R$ 150.000,00 ) e dai não cobrar mais nada.. nesse caso a empresa passa a ser dona do software, e pode fazer o que quiser com ele. vender o código executavel ( exemplo: 10% do valor = R$ 15.000,00 ) com a garantia em contrato de receber de 10 a 20% do valor da venda de cada (copia) do software ... nesse caso a empresa banca as despesas de divulgação e vendas e voce fica sendo o detentor do software. sempre que houver atualizações voce pode cobrar por isso. OBS: caso a empresa venda o seu software e não pague corretamente ... voce como autor intelectual do software, poderá acionar a empresa judicialmente. Não esqueça que no caso da venda do executavel, o seu nome deve aparecer no software como desenvolvedor. abraço
  8. Jhonas

    Quickreport

    veja esse tópico ou https://www.google.com.br/?gws_rd=ssl#q=qrcompositereport1+delphi abraço
  9. complementando .... erro de memória é causado por violação de endereço, que seria mostrado no erro. se voce estiver usando algum banco de dados no seu programa, pode ser que ao executar o seu programa a conexão com o banco não tenha sido efetuada ( erro de Kernel ) as causas podem ser muitas ( até bad cluster no hd pode gerar esse tipo de erro ) abraço
  10. qual é o código que voce está usando ?
  11. então pelo que eu entendi, voce usa o webbrowser para acessar uma pagina da web e preencher os dados nela e depois quer clicar no botão automaticamente para dar o submit para a proxima pagina, e nessa o botão ok não é identificado ... seria isso ?
  12. no momento de trocar a hora, aponta o erro seguinte erro: "30/12/1899 07:19:00' is not a valid time". 30/12/1899 refere-se a uma data em branco se o seu campo na tabela for Not Null significa que voce tem que atribuir uma data se não é digitada data alguma, o sistema coloca essa data 30/12/1899 e consequentemente ocorre erro voce pode testar se o campo data esta vazio e no código voce não deixa salvar esse campo ou melhor ainda ... tire o Not Null desse campo abraço
  13. material para estudo: http://professoralucelia.com.br/bd/ProjConceitualLogicoeFisico.pdf no seu caso, a partir da pagina 28 http://www-di.inf.puc-rio.br/~sergio/BD1/docs/BD1ModeloER_2slidespp.pdf http://www.scielo.br/pdf/rae/v39n2/v39n2a08.pdf abraço
  14. Jhonas

    Jogo da Forca

    exemplo: codigo fonte http://www.planetadelphi.com.br/downloading/2983 OBS: amigo, sei que esse exercício é para escola ... entretanto o objetivo do professor, é justamente para voce por em pratica o que foi ensinado em sala de aula. se voce tem algum conhecimento na linguagem delphi, pelo código fonte que estou passando, voce pode escrever o algorítimo do jogo ( lógica do programa ) abraço
  15. Jhonas

    [Dúvida] Delphi

    amigo, o delphi não seria a melhor escolha para desenvolvimento de jogos programar jogos requer, muito estudo e experiencia voce teria que aprender C#, PHP, Java ,JavaScript ,Ajax ,Mysql ,ActionScript3, Flash, JMonkey, Unity3D, UDK ... etc tudo depende da plataforma que voce quer usar links para estudo https://www.google.com.br/?gws_rd=ssl#q=programando+jogos+mmorpg https://www.google.com.br/?gws_rd=ssl#q=programando+jogos+em+java https://www.google.com.br/?gws_rd=ssl#q=programando+jogos+em+c%2B%2B https://www.google.com.br/?gws_rd=ssl#q=programando+jogos+com+unity https://www.google.com.br/?gws_rd=ssl#q=programando+jogos+para+android OBS: esse link vai te dar uma idéia do que é programar jogos http://www.unidev.com.br/index.php?/topic/43467-passo-a-passo-fazer-seu-próprio-mmorpg/ abraço
  16. segue algumas sugestões: online: https://smallpdf.com/pt/juntar-pdf do forum clube do hardware http://www.clubedohardware.com.br/forums/topic/928214-resolvido-juntar-abas-do-excel-depois-de-converter-do-pdf/ links do google https://www.google.com.br/?gws_rd=ssl#q=juntar+2+arquivos+pdf+em+um+só+vba+excel abraço
  17. exemplo http://robijoel.blogspot.com.br/2015/05/implementando-sensor-de-temperatura-e.html abraço
  18. Jhonas

    Imprimir no Delphi

    Os exemplos que te passei, voce não conseguiu entender ? voce quer imprimir com o QuickReport ? OBs: voce esta colocando a sua dúvida em outro tópico que não o seu. utilize o mesmo tópico que voce colocou a sua dúvida. abraço
  19. ele foi feito para o delphi XE e versões mais recentes Delphi Xe, Delphi Xe2, Delphi Xe3, Delphi Xe4, Delphi Xe5 Delphi Xe6, Delphi Xe7, Delphi Xe8, Delphi 10s, Delphi 10_1b mas voce pode tentar compilar no delphi 7 e ver se funciona se voce não puder usa-lo com o delphi, tente esse http://www.baixaki.com.br/download/microsoft-skydrive-desktop.htm e depois basta instalar em cada um dos clientes abraço
  20. Jhonas

    Imprimir no Delphi

    o erro refere-se a : o campo Wnome não foi encontrado muito provavelmente, voce não adicinou os campos ao componente ADOQuery dê um duplo clique no componente ADOQuery e depois com um clique do botão direito selecione a opção Add All Fields... abraço
  21. voce precisa do componente OneDrive para delphi http://www.sync-components.com/cloud-delphi-components/onedrive abraço
  22. Jhonas

    Imprimir no Delphi

    veja os exemplos prontos no delphi pasta C:\...\Delphi7\Demos\Quickrpt tem os exemplos Qr2 e Qr3 abraço
  23. seria isso ? div<-2 enquanto(num != 1)faça se(num MOD div = 0)entao escreva(div) num <- num / div senão div++; fim_se fim_enquanto
  24. Como eu disse, aquela era uma da formas vou colocar mais 2 para voce ver a diferença: procedure TForm1.Button2Click(Sender: TObject); var i,x : integer; EntryNode:IXmlNode; s : string; begin XMLDocument1.LoadFromFile('D:\20-03-2017-Copia.xml'); XMLDocument1.Active := True; EntryNode := xmldocument1.DocumentElement; for i := 0 to EntryNode.ChildNodes.Count -1 do begin s := EntryNode.ChildNodes[i].xml; x := pos('<chNFe>',s); if x > 42 then memo1.Lines.add(copy(s,x+7,44)); end; end; end; outra forma procedure TForm1.Button1Click(Sender: TObject); var i,x : integer; EntryNode, EntryType :IXmlNode; s : string; begin XMLDocument1.LoadFromFile('D:\20-03-2017-Copia.xml'); XMLDocument1.Active := True; EntryNode := xmldocument1.DocumentElement; EntryType := EntryNode.ChildNodes.First; for i := 0 to EntryNode.ChildNodes.Count -1 do begin if (EntryType.NodeName = 'ret') then Memo1.Lines.Add(EntryType.ChildNodes.Nodes[0].ChildNodes.Nodes[0].text); EntryType := EntryType.NextSibling; end; end; abraço
×
×
  • Criar Novo...