GHS - Change CaptionMu - Código-Fonte.
Bom gente,
Tenho esse código de mudar o caption do MU para não usar MultiHack mais isso não impedi nada ;D então estou disponibilizando isso.
Esse MultiHack ele vai funcionar sempre, é só você criar um e para pegar o a Classe do MU se for colocar para pegar só pelo nome da Janela e se o main estiver com esse Change Caption não vai funcionar só vai funcionar com Classe do MU, e quem souber trabalhar com Classe não terá dificuldade nisso.
Como usar:
1º Você adicione um Timer1 da Paleta system e coloca no seu form
2º Vai no OnTimer do Timer1 e coloca esse simples código.
Código PHP:
var
hThandle : THandle; // Vai pegar o Handle do MU
Caption : String; // String do Caption
i: integer;
const
Crypt = 'ABCDEFGHIJ1234567890'; // Pode colocar qualquer letra
Qtd = 10; // Aqui você pode aumentar a quantidade de característica para aparecer no Caption do MU '-'
begin
Caption := 'GHS - '; // Aqui vai mostra na janela do mu GHS e afrente do " - " as característica vão mudar e o nome GHS permanece.
for i := 1 to Qtd do begin// Aqui ele vai fazer um laço de 1 até 10
{Não mecha nessa parte aqui de baixo.}
hThandle := FindWindow(Pchar('MU'),nil);
Caption := Caption + Crypt[random(length(Crypt))+2];
SetWindowText(hThandle,(Pchar(Caption)));
end;
end;
end.
PS: Não me pergunta como adaptar esse código na sua dll não.
Download da Source: [Only registered and activated users can see links. Click Here To Register...]
Vídeo de demostração:
[Only registered and activated users can see links. Click Here To Register...]
Créditos:
LaBaK -
