Ir para conteúdo
Fórum Script Brasil

Tenente Leite

Membros
  • Total de itens

    39
  • Registro em

  • Última visita

Tudo que Tenente Leite postou

  1. Ai, fui desenvolver um exemplo simples no Flash 5, com um movie clip em uma camada, e dois botões em outra camada, ligar e desligar, só que tem um probleminha o botão desligar não funciona e o som começa a tocar antes deu clicar no botão ligar. Taí o action dos botões: // Botão Ligar on (release) { tellTarget (som) { gotoAndPlay (1); } } //Botão Desligar on (press) { tellTarget (som) { gotoAndStop (1); } } O que eu estou fazendo de errado???? Valeu!!!
  2. Criar, eu criei, mas não me pergunte porque, eles somem assim que eu compilo o projeto! Mas eu já consegui fazer, ficou massa! Usei o Locate!!!! Brigadão pela força!
  3. Estou desenvolvendo um pequeno projeto no Delphi 6 e não estou conseguindo fazer um formulário de pesquisa. Tenho que pesquisar por Nome, Alcunha e Identidade, Só consegui fazer funcionar por Identidade, e mesmo assim a linha com o registro não está recebendo foco, ou seja, ficando colorida, e a pesquisa por alcunha ou nome, não está funcionando. Não consegui desenvolver código algum, dei uma pesquisada na net mas o código travou. CÓDIGO ===================================================== unit UPesquisa; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, StdCtrls, Buttons, Mask, DB, ExtCtrls; type TFrmPesquisa = class(TForm) DBGrid1: TDBGrid; BitBtn1: TBitBtn; EditChave: TMaskEdit; Label1: TLabel; Label2: TLabel; Label3: TLabel; RaGr: TRadioGroup; procedure BitBtn1Click(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure FormShow(Sender: TObject); procedure EditChaveChange(Sender: TObject); procedure RaGrClick(Sender: TObject); private { Private declarations } public { Public declarations } end; var FrmPesquisa: TFrmPesquisa; implementation uses UDM, Ufuncprd, UPesquisaSql; {$R *.dfm} procedure TFrmPesquisa.BitBtn1Click(Sender: TObject); begin prdRetornaValor(inttostr(Dm.TblCadastroRG.Asinteger),false); EditChave.Text:=''; FrmPesquisa.Close; end; procedure TFrmPesquisa.FormClose(Sender: TObject; var Action: TCloseAction); begin DM.TblCadastro.Close; end; procedure TFrmPesquisa.FormShow(Sender: TObject); begin DM.TblCadastro.Open; DM.TblCadastro.refresh; EditChave.EditMask:=''; EditChave.SetFocus; Editchave.selectall; end; procedure TFrmPesquisa.EditChaveChange(Sender: TObject); begin if RaGr.ItemIndex = 2 then begin if editChave.Text <> '' then DM.TblCadastro.findNearest([(editChave.Text)]); end else begin DM.TblCadastro.findNearest([editChave.Text]); end; end; procedure TFrmPesquisa.RaGrClick(Sender: TObject); begin if RaGr.ItemIndex = 0 then begin Label3.Caption := 'O NOME:'; DM.TblCadastro.IndexFieldNames := 'Nome'; DM.TblCadastro.FindNearest([EditChave.Text]); editChave.SetFocus; end else if RaGr.ItemIndex = 1 then begin Label3.Caption := 'A ALCUNHA:'; DM.TblCadastro.IndexFieldNames := 'Alcunha'; DM.TblCadastro.FindNearest([EditChave.Text]); editChave.SetFocus; end else begin Label3.Caption := 'A IDENTIDADE:'; DM.TblCadastro.IndexName :=''; EditChave.Text:=inttostr(Dm.TblCadastroRG.Asinteger); editChave.EditMask:=''; editChave.SetFocus; end; end; end. ==================================================== Obrigado
  4. Tenente Leite

    Provedores Gratuitos ...

    Cara, eu também estou na caça de um provedor, só que o meu caso é um pouco diferente, pode ser um vagabundo mesmo, mas tem que ser gratuito e ter suporte ao FormMail do Flash MX 2004, se souber de algum e puder me mandar, fico muito grato!!!!
  5. É o FormMail do Flash MX. Mas você sabe de algum servidor totalmente gratuito que tenhamos aqui? Muito Obrigado!
  6. Alguém sabe de algum servidor gratuito que suporte o Formmail? Obrigado!
  7. Começa aprendendo algumas funções da bibioteca windows.h, ok! Referência: Schild, C Completo e Total valeu
  8. Me parece table body*, e você ainda confirmou porque falou que tinha um table logo após, agora resta saber se a versão do html vai compilar, porque isso não é XML, para podermos criar tags não é mesmo? * Então pode se definir a formatação da sua table ok?
  9. Aí cara, tenta www.cursosvirtuais.com.br é pago, mas vale a pena. Cá pra nós, ANALISTA DE SISTEMAS PEGOU NÉ, TU NEM SAIU DAS FRAUDAS AINDA........
  10. Tenente Leite

    Iniciante

    No seu códio CPP você faz uma referência a um arquivo . h, ou seja, a sua biblioteca, então sem o código deste arquivo naõ dá pra te falar nada.
  11. Tenente Leite

    Iniciante

    Pô cara sem o ponto H, não dá pra te dizer!!!!
  12. Tenente Leite

    Ajuda!

    Se você quiser eu faço o trabalho, obviamente eu vou cobrar um patrocínio, se tiver interesse me escreve : ten.leite@bol.com.br; :unsure: ^_^ :huh: :D
  13. Preciso gerar um contador de segundos ou milisegundos. Tipo t2-t1 e armazenar o resultado em tf. se alguém puder me ajudar........
  14. Tenente Leite

    Limpar A Tela

    Simples, o dev não reconhece o comando clrscr(); :lol: :lol: :lol: você tem que usar system("cls"); :P :P :P :P Valeu!!!!!!!!!!!!!!!!!!!!!! :angry:
  15. Tenente Leite

    Problemas Com String

    :P :P :lol: :P :P :P :lol: :P
  16. Tenente Leite

    Problemas Com String

    Ai meu chapa, eu fiz por ponteiro, vê se assim tá bom! #include <stdlib.h> #include <stdio.h> void inverte (char *texto); main () { char *palavra=""; printf ("\n\nDigite alum texto: "); gets (palavra); inverte (palavra); } /* ---------- */ void inverte (char *texto) { int cont_1 = 0, cont_2 = 0; /* verifica tamanho do texto */ while (texto[cont_1]) cont_1++; printf ("\nTamanho de %s = %i\n", texto, cont_1); printf ("\nInvertendo: "); do { printf ("%c", texto [cont_1-cont_2-1]); cont_2++; } while (cont_2 < cont_1); } :rolleyes: ;) :P :) :(
  17. Tenente Leite

    Conexão Com Bd

    Não serve C++? B) B)
  18. Tenente Leite

    Problemas Com String

    Se não funcionar posta de nova Ok!!! B) B)
  19. Tenente Leite

    Resposta Do Ping

    Em C você pode usar o comando system ("parametro desejado"), então você cria um arquivo *.exe como se estivesse dentro do DOS entendeu pode dar todos os comandos! B) B) B)
  20. Tenente Leite

    Inserindo Imagem

    Aí gente boa em C, eu nunca vi tal comando, porque eu programo mais em nível de console, mas dependo do seu compilador que tal dar uma olhada no biblioteca graph.h B) B)
  21. Tem sim, SHIFT + F3, vá apertando até chegar o resultado desejado ou então clique em Formatar / Maiusculas e Minusculas. Valeu!!! B) B) B)
  22. Quase isso, é porque não é Ciências , é Ciência da Computação. estou de guerra, é isso mesmo, aconselho você a fazer ou Ciência da Computação ou Engenharia de Computação, eu penso em fazer mestrado e doutarado na área mas se não conseguir, vou me graduar também em Engenharia de Computação! Valeu! B) B) B)
  23. Tenente Leite

    Trocar A - B

    Cara em troca não tem jeito você tem que usar uma váriavel auxiliar, é como trocar tintas. EX: você tem 2 latas de tinta A e B, quer colacar a tinta de A em B e a de B em A, então você pega a de A e coloca em C (auxiliar), e pega a de B e coloca em A, e pega a de C e colaca em B , valeu, vê se roda; B) B) B)
  24. B) Sem dúvida nenhuma a USP e a Poli, em Minas a UFMG e UFV. A UFES tem também uma boa estrutura. Se quiser na página da Info tem uma relação de ranking, se não me engano na edição de setembro ou outubro de 2002. B) B)
  25. Matemática financeira, meu caro eu não uso derivada, integral, determinantes, cramer, e etc . Quem não sabe fazer contas simples, realmente está morto, se você pensar dessa forma todo mundo que entra em uma padaria então teria quer saber essas abobrinhas, porque se não como ela vai conferir o troco.?????????? A matemática realmente está presente em nosso dia-a-dia, mas de uma forma que qualquer um ser humano racional consegue enxergar. Como usamos o português para nos comunicar, entendeu.?????????????????????????? B) B) B)
×
×
  • Criar Novo...