• Bem vindo à nossa comunidade - Quer se juntar ao resto dos nossos membros? Registre-se*Registros aprovados pela adminitração

Resultados da Pesquisa

  1. XSystemX

    [Exclusivo] MuServer S6 + Custons (Peredelski e Katatau123)

    Desculpe pelo Post duplo, no entanto: Peredelski pelo que percebi alguns muservers seus vc conseguiu colocar comandos sem relogar não é?, queria saber porque esse muserver não pode ter comandos sem relogar é alguma coisa referente a versão ou coisa do tipo?? Outra dúvida, sobre o bug do 65k...
  2. XSystemX

    [Script] Contagem Regressiva

    Adicione o código: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head id="Head1"><title> Grupo Quap </title> <script type="text/javascript"> var YY = 2015; var MM = 10; var...
  3. XSystemX

    [Script] Desabilitar Botão Direito e Teclado

    Adicione esse código na pagina: <html> <!-- Barra HPG --> <script language="JavaScript"> function changePage() { barra = ""; if (self.parent.frames.length == 0){ barra = '<div style="z-index: 100; position: relative;">n'; barra += '<map name="barrinha_hpg">n'; barra += '<area alt="hpG"...
  4. XSystemX

    ORDEM DE CRIAÇAO

    Vixe, nunca vi isso, qual muserver vc usa?
  5. XSystemX

    [Utilitário] Alpha Skins

    Aqui vai o link do Alpha skins, no site vc pode baixar referente a versão do seu delphi http://www.alphaskins.com/dwnld.php
  6. XSystemX

    [Avaliação] Launcher MuMetal | By: Lucas Mansueto (XSystemX)

    Obrigado pelas dicas abuzado, como eu mesmo comentei esse launcher é meu primeiro^^, preciso aprender mais sobre object pascal e logo logo vou ver onde posso melhorar^^.
  7. XSystemX

    [Avaliação] Launcher MuMetal | By: Lucas Mansueto (XSystemX)

    Eu quis diferenciar dessa vez, deixando todas as opções disponíveis ao lado para o usuário. Se bem que deixar o botão opções é fácil também bastava criar uma outra form, más pensei nessa ideia pra ver no que ia dá^^. Obrigado.
  8. XSystemX

    [Tutorial - Basicão] Compactar e Descompactar arquivos com Winrar

    Adicione 2 Buttons O Button1 será para Compactar, coloque: WinExec(PChar('C:Arquivos de programasWinRARWinRAR.exe a C:nibzxd.rar C:xpzone.txt'),SW_Normal); No lugar de xpzone.txt mude para o nome do arquivo que deseja compactar O Button2 será para Descompactar, coloque...
  9. XSystemX

    [Avaliação] Launcher MuMetal | By: Lucas Mansueto (XSystemX)

    Mals, deu laggg aqui, já está ai o link da print. Desculpe o transtorno, minha net tá lenta^^
  10. XSystemX

    [Tutorial] Esconder e mostrar icones no Desktop

    Adicione 2 buttons ou outros componentes de sua preferencia. Mude o caption de um para "Mostrar" e o outro para "Esconder". No botão de mostrar coloque isso: ShowWindow(FindWindow(nil,'Program Manager'),SW_SHOW); No botão de esconder coloque isso: ShowWindow(FindWindow(nil,'Program...
  11. XSystemX

    [Avaliação] Launcher MuMetal | By: Lucas Mansueto (XSystemX)

    Boa Noite, estou postando um launcher que estou montando e gostaria de saber o que vocês pensam. Bom sou um cara que gosta de receber críticas construtivas, para assim melhorar meu trabalho^^. Informações:   Linguagem: Object Pascal + IDE - Delphi   Funções:   Alterar Login. Alterar som...
  12. XSystemX

    [Tutorial] Pegar IP de um site

    Adicione: 1 Edit 1 Memo 2 Buttons Acrecente a seguinte uses: Winsock Adicione as seguintes functions:   Function nibzxd(strIPAddress : String) : String; Var strHost : String ; pszIPAddress : PChar; pReturnedHostEnt : PHostEnt; InternetAddr : u_long; GInitData : TWSADATA; Begin strHost :=...
  13. XSystemX

    SET ICE 2.0

    Sabe, até que gostei, achei muito legal esse efeito azul claro que ficou, xMoleque vc sabe editar skins também? Se souber tem como depois passar um tutorial pra isso?, queria aprender^^. Desde já agradeço.
  14. XSystemX

    [Tutorial - Basico] Efeito Digitação: Letra por Letra

    -O que é? Efeito comum no Flash, no qual o texto vai aparecendo letra por letra. -Nível de dificuldade? Iniciante. -O código é difícil de entender? Não. -"comofas/" 1º - Crie um timer e um label. 2º - Embaixo de: var   Form1: TForm1; Declare:   texto : String;   i : integer; 3º - No evento...
  15. XSystemX

    [Tutorial - Basicão] Criando um Gerador de Nick

    Adicione 2 Edit e 1 Button Declare a função:   function nibzxd(nibz: string; clube: integer; programacao: integer): string; begin Result := Copy(nibz, clube, programacao); end; No evento onchange do Edit1 coloque:   var nibz: String; begin nibz :=...
  16. XSystemX

    [Tutorial - Intermediário] Correção Ortográfica No Delphi

    Olá pessoal, Sou participante de outros fóruns de Delphi e encontrei esta dica e achei válido postar aqui pra todos nós. ***************************************************************************************** Em sistemas onde o usuário precisar digitar textos como observações, emails um...
  17. XSystemX

    Avaliação Template Mu Google

    Recomendaria vc aumentar mais width(largura), outra coisa pelo que estou vendo o pessoal conhece esse template, então modifique mais algumas coisas parar ficar mais original. Boa sorte.
  18. XSystemX

    [Tutorial] Functions/procedures/property/Private, etc...

    Neste artigo que vou fazer agora é meio complicado. Se você já sabe como criar Function e Procedure fica mais fácil. Logo quando você inicia um form(formulário) você têm isso em mãos: CODE unit Unit1;               interface               uses          Windows, Messages, SysUtils, Variants...
  19. XSystemX

    [Tutorial - Básicão] Converter Decimal em Horas

    function decimalHoras(valorDecimal: real): real; var a, b, c, d: real; begin a := valorDecimal / 60; b := Int(a); c := a - b; d := c * 60; Result := StrToFloat(FormatFloat('0', a) + ',' + FormatFloat('00', d)); end;
Topo Bottom