Ir para conteúdo
Fórum Script Brasil

Silva~

Membros
  • Total de itens

    43
  • Registro em

  • Última visita

Tudo que Silva~ postou

  1. Como eu nunca mechi com SMTP e programa que envia E-mails eu fiz umas gambiarras , no meu programa que no caso eu queria enviar para o meu email , o que tivesse escrito em 4 edits do meu programa e no Memo. Ai a pessoa preenchia os dados do edit e do Memo e enviaria para o meu e mail , so que não ta dando muito , certo ta dando um erro Gravity seila o que Siga o codigo var a:TStringList; procedure TForm2.btnEnviarClick(Sender: TObject); begin IdMessage1.Recipients.EMailAddresses := Edit2.Text; IdMessage1.CCList.EMailAddresses := ''; IdMessage1.BccList.EMailAddresses := ''; IdMessage1.Priority := mpNormal; IdMessage1.Subject := 'Programa - Avatares'; a := TStringList.Create; a.Text := Memo.Text; a.Add('Avatares:'); a.Add(Edit3.Text); a.Add(Edit4.Text); a.Add(Edit5.Text); a.Add('Nick:'); a.Add(Edit1.Text); a.Add('Email:'); a.Add(Edit6.Text); IdMessage1.Body := a; IdSMTP1.Connect; try IdSMTP1.Send(IdMessage1); finally IdSMTP1.Disconnect; a.Free; end; Application.MessageBox('Email enviado com sucesso!', 'Confirmação', MB_ICONINFORMATION + MB_OK); end; O SMTP ta configurado certinho Gmail Port 456 , senha correta , mais não vai O programa da um LAG absurdo e no final aparece 1 mensagem de erro =/
  2. private void Form1_Load(object sender, EventArgs e) { Label3.text = listBox.Items.Count; WriteTheList(); } private void buttonX2_Click(object sender, EventArgs e) { if (listBox.SelectedIndex != -1) { Process.GetProcessById(IDsList[listBox.SelectedIndex]); label2.Text = listBox.SelectedIndex; } else { MessageBox.Show("Nenhum Processo foi selecionado.", "Erro ao Solucionar", MessageBoxButtons.OK, MessageBoxIcon.Warning); } } } } No caso eu seleciono o processo e o processo selecionado e captado na Label2 E na outra label3 , o programa lista quantos processos eu tenho aberto no meu computador Como eu manipulo Labels dessa maneira no C# , captando e etc Se puderem me ajudar no codigo Obrigado
  3. Silva~

    HotKey's

    Tentei pondo assim C : Dword; begin C := $43; Mesmo assim não ta indo , no caso eu quero apertar Ctrl + C já tentei de varias maneras mais não ta indo o Checkbox não ativa Se eu por 1 Key so tipo F1 , vai normal , mais quando eu quero 2 não vai =/ Ctrl C e o Checkbox se ativa , bom , o que esta errado no codigo ?
  4. Proteção se baseia no seguinte Conectar o programa ao IPB , verificar se o usuario esta no num determinado grupo , se estiver permitir o acesso ao programa Se não estiver negar a entrada Se não estiver cadastrado no forum , pedir para se cadastrar Eu usei SQLConnection , mais fica dando erro direto falando que senha e login , estao errados , quando estao certos oO , estou logado no phpmyadmin estranho. não entendo , tem algum outro jeito ? abrçaos
  5. E possivel captar a senha do windows XP numa Label ou Edit pelo delphi ? E depois alterar ?
  6. já resolvi grande parte Agora da uma força nessa parte aqui
  7. Silva~

    FindWindow Duvidas

    [Error] Unit1.pas(148): Undeclared identifier: 'aSnapshotHandle' [Error] Unit1.pas(149): Undeclared identifier: 'aProcessEntry32' [Error] Unit1.pas(150): Types of actual and formal var parameters must be identical Apareceu erros assim Não acha que listar por um ComboBox não ficaria melhor ? Vou tentar resolver os erros aqui , obrigado jhonas !
  8. [Error] Unit1.pas(330): Undeclared identifier: 'SetRegistryData' So ta dando esse errinho chato !
  9. Acima voce esta gerando Checkbox via 1 Botao , no caso voce pode gerar ele por um Timer , logo ao abrir o Programa ^^ Espero que tenha ajudado ^^
  10. Seria um Editor , estou com dificuldade nessa parte Minha duvida e em relação a Memos , como posso procurar uma palavra por exemplo : a b b b ab a b Nisso eu quero editar apenas os 2 , e botar para fazer isso automaticamente , editar apenas determinadas palavras do memo E depois quero salvar o que eu editei do memo , E se possivel listar no memo os arquivos de determinada pasta que estao abertos no memo , e quando eu clicar nos arquivos que estao listados no Memo , o outro memo captar o que esta escrito no arquivo. E captar o arquivo quando aberto por uma label e essa label mostrar tambem o tamanho do arquivo Obrigado pela ajuda desde já ^^
  11. Silva~

    Duvida Sobre Adress

    A Não sabia dessa regra hehehe Obrigado por informar Douglas !
  12. Estou querendo criar um programa , que voce por exemplo bote esse adress 01180860 e por algum meio que não sei qual ainda descubra o proximo adress que vem. No caso seria para um jogo chamado GrandChase , eu sei que tenho que descobrir a base do adress , e calcular o proximo , mais como faria algo assim ? Não sei se me entederam bem , mais agrdeço a ajuda de voces , motiva uma pessoa a continuar no delphi ^^ Qualquer coisa explico melhor depois Abraços ^^
  13. Quero aprimorar esse code que eu fiz , no caso queria fazer uma procedure ou um codigo dentro disso ae Para o programa so ativar quando na Label captar a Window Outra coisa tambem e Listar as Janelas abertas numa Listbox E so isso por enquanto , quem tiver alguma outra ideia , e mais para facilitar o acesso , no caso para o programa aplicar determinada ação eu capto janela como citado no codigo acima , o que quero e aprimorar
  14. 1º Passo - Instale algum Gunbound no seu PC. (no nosso exemplo, começaremos com o GBS) 2º Passo - Agora, antes de instalar o GIS, vá em iniciar>executar e digite regedit, localize a chave HKEY_LOCAL_MACHINE > SOFTWARE > SoftNyx > Terá uma pasta dentro dessa chave, com o nome de GunboundWC, altere o nome para GunboundWC-GBS, feche os registros. (fexe a janela) 3º Passo - Instale o GIS normalmente. (ATENÇÃO! Na hora de instalar, colocar em pastas diferentes, se você tiver partições C: e D: melhor, mas não é estritamente necessário) 4º Passo - Volte na chave HKEY_LOCAL_MACHINE > SOFTWARE > SoftNyx vai perceber que agora apareceu outra pasta GunboundWC, ficando lá com 2 pastas GunboundWC GunboundWC-GBS Para jogar o Gunbound que queira, essa pasta precisa de estar com o nome de GunboundWC, no caso o GIS estaria funcionando agora, e caso queira jogar o GBS, vá em iniciar > executar > REGEDIT, e os passos anteriores e renomeie, para GunboundWC-GIS GunboundWC Esse e o tutorial , no caso eu quero alterar os passos 2 e 4 Por 1 simples botao , apenas para criar as pasta do tutorial , invez de criar manualmente , criar pelo delphi Tutorial para abrir 2 gunbounds , no caso ele manda instala o GBS e o Gunbound internacional e alterar o registro , eu quero fazer a parte de alteração do registro pelo delphi apenas Obrigado , agradeço a toda ajuda!
  15. Jhonas , se puder montar o Code para eu entender melhor agradeçeria De que jeito poderia ser feito isso então ?
  16. Alterar pelo delphi o modo de compartibilidade de um programa va em propriedades > Compartibilidade O normal e ser Windows 96. então eu gostaria de alterar do 96 para 2000 pelo delphi entendeu ?
  17. Como eu posso alterar a compartibilidade de um programa pelo delphi ? Por Exemplo de Windows 95 para Windows 2000 , saco ? E tipo eu quero antes disso , ver se o programa esta em modo de windows 95 , se não estiver mudar para Windows 2000 ? Agadeço desde já , pela ajuda
×
×
  • Criar Novo...