Novembro 14, 2008
Hoje eu vou ensinar a procedure em pascal que fica atenta às mensagens que o Windows envia as aplicações.. hoje em especifico, a mensagem de encerramento dos programas para o desligamento do computador.
O Windows para encerrar os processos envia uma mensagem aos programas uma única vez, e aguarda até que os programas respondam com confirmação está mensagem para que ele possa encerrar o Explorer e finalizar.
Obs: A mensagem que ele envia pode ser simulada no Delphi, com está função..
SendMessage(HWND, MESSAGE, 0, 0);
Agora vamos à inserção da procedure que identifica a mensagem de desligamento.
Antes de mais nada verifique a declaração de: Windows, nas uses.
Agora no public da unit.. cole está referencia de procedure:
procedure WMQueryEndSession (var Msg : TWMQueryEndSession); message WM_QueryEndSession;
Ps: WM_QueryEndSession, é a mensagem que é enviada do windows para o seu programa, informando que o Windows está em processo de desligamento!
Declare uma variável global chamada: permitirdesligar como string;
Var permitirdesligar : string;
Agora cole na implementação a procedure:
procedure TForm1.WMQueryEndSession (var Msg : TWMQueryEndSession);
begin
if uppercase(permitirdesligar) = ‘SIM’ then
begin
application.terminate;
Msg.Result := 1;
End
Else
Abort;
End;
Lembrando que, na verdade está variável global apenas vai armazenar as respostas SIM e NÃO, e identificar que quando a resposta for SIM, ele irá enviar a resposta de confirmação e encerrar o programa, caso contrario, ira abortar a mensagem.
Agora basta você digitar:
permitirdesligar:=’não’;
quando quiser que seu programa continue executando!.. e depois coloque como:
permitirdesligar:=’sim’;
para que ele continue o processo de desligamento normalmente.
Enjoy 
1 Comentário | 
Sources | Etiquetado: cancelar, delphi, desligamento, end, pascal, programa, query, session, windows | 
Link Permanente
Escrito por slockz
Novembro 11, 2008
Este exercicio da faculdade vai para tirar uma dúvida de um amigo meu (Jynex),
e para mostrar que eu completei u desafio dele… ehhe.. abraço vei
Inicializa o programa com as bibliotecas de string tbm:
#include(stdio.h)
#include(conio.h)
#include(string.h)
//Altere os parenteses por sinal de maior e menor =]
Define o tamanho do campo p/ digitar as palavras, e inicializa o programa (sem módulos):
#define c 100
int main(void) {
char palavra[c];
int count=0,i,j;
clrscr();
printf(“Entre com as palavras: “);
Agora, está função limpa a este setor da memória para que não aconteça casos
em que o gets passa direto:
fflush(stdin);
gets(palavra);
j=strlen(palavra)-1;
Agora vamos as validações tão desejadas
1. Eliminar os espaços do final da frase:
while(palavra[j]==’ ‘) palavra[j--]=’/0′;
2. Passar contando os espaços, mas, espaços que não estejam seguidos de outros espaços:
for(i=0;i<=j;i++) if((palavra[i]==’ ‘) && (palavra[i-1]!=’ ‘)) count++;
3. Por fim contar a ultima palavra (que não tem espaço no final (graças a primeira validação))..
E exibir o numero de espaços que foram contados..
count++;
printf(“Numero de palavras: %d”,count);
getch();
return 0;
}
É isso ai ..
É tosco, mas é uma validação completa.. e simples de entender! =]
Até mais.
Deixar um comentário » | 
Sources | Etiquetado: c++, contar, em, palavras, source | 
Link Permanente
Escrito por slockz
Novembro 11, 2008
E ae galera… estou postando aqui agora apenas para dizer
que não darei continuidade ao meu sistema de grampiamento mais!
Nenhum código ou function será mais postado sobre captura de teclas ou de tela
e nem nenhuma informação que te leve a ter acesso a uma maquina remota será dada.
Ninguem saberá da existencia do skl ou do sik mais (nem eu),
indepentende do projeto do servidor continuar rodando ou não,
os clientes permaneceram parados. =P
Não quero saber de problemas pro meu lado..
nem a respeito de usar, nem a respeito de ensinar as ferramentas!
Também porque o que eu sei num é quase nada, e muito material útil pode ser
encontrado em blogs especificos para isso!
Até mais
Deixar um comentário » | 
Informações | Etiquetado: informação, informativo, parados, sistemas | 
Link Permanente
Escrito por slockz
Novembro 5, 2008
screenshot_011
Details:
Owner: Slockz
Developer: Jerez Bain (Killuminati)
Theme: 08 Unleashed: Red Version
Toke Date: 03/11/2008
Package: Aston Gladiators software 1.9.0
Site: http://www.aston.com
Credits:
-Slockz (Start button and icons)
-Dmitry/UnderPI (from aston soft)
-Jerez Bain (Killuminati) for theme
-Mozilla Firefox 3.0.3 Final
-Nullsoft for Winamp v5.531
-Google Desktop (Deskbar)
-Instan-t multi IM connector 5.0
-Plus! Live for Vortex Messenger skin
-Malhação (Globo channel) (i ware watching on TVSet)
* Download links:
Astonshell Download: http://www.astonshell.com/downloads.htm
(If you want ever have no problems about expiration, i really
recommend you to found the 1.9.0 version and his specify crack)
Mozilla Firefox: http://baixaki.ig.com.br/download/…firefox.htm
Google deskbar: http://desktop.google.com/pt/BR/
Instan-t 5.0: http://www.instan-t.com (Try it)
Things about messenger (BR): http://www.messbrasil.com.br
Deixar um comentário » | Downloads, Screenshots | Etiquetado: aston, Downloads, link, red, screenshot, shell, slockz, unleashed | Link Permanente
Escrito por slockz
Novembro 5, 2008
screenshot_010
Details:
Owner: Slockz
Developer: Jerez Bain (Killuminati)
Theme: 08 Unleashed: Blue Version
Toke Date: 22/10/2008
Package: Aston Gladiators software 1.9.0
Site: http://www.aston.com
Credits:
-Slockz (Start button and icons)
-Dmitry/UnderPI (from aston soft)
-Jerez Bain (Killuminati) for theme
-themerboy for wallpaper
-Nullsoft for Winamp v5.531
-Google Desktop (Deskbar)
-Flyakite for dosshell modify to terminal-bash
-Instan-t multi IM connector 5.0
-Microsoft for Remote Desktop tool
-Matt Holwood for MessengerDiscovery 2.0
-Plus! Live for Vortex Messenger skin
-977 Hitz channel (i ware hearing on TVSet)
* Links:
Link 977 Radio Live: http://208.109.237.151:8001/live
Deixar um comentário » | Screenshots | Etiquetado: 977, aston, blue, link, screenshot, shell, slockz, unleashed | Link Permanente
Escrito por slockz
Novembro 4, 2008
screenshot_007
Details:
Owner: Slockz
Developer: FlyakiteOSX v3.5
Toke Date: 03/10/2008
Package: Flyakite Modify, Simplify . Aquafy
Site: http://osx.portraitofakite.com
Credits:
Slockz (for modifies and terminal)
Chris Kite (from Flyakite – Author/SFM/Webdesigner)
Microsoft for Remote Desktop tool
Nullsoft for Winamp v5.531
Nota: Exibindo a pasta de screenshots xD
Deixar um comentário » | Screenshots | Etiquetado: pasta, screenshot 7, Screenshots, slockz | Link Permanente
Escrito por slockz
Novembro 4, 2008
screenshot_003
Details:
Owner: Slockz
Developer: FlyakiteOSX v3.5
Toke Date: 24/07/2008
Package: Flyakite Modify, Simplify . Aquafy
Site: http://osx.portraitofakite.com
Credits:
Slockz (for modifies)
Chris Kite (from Flyakite – Author/SFM/Webdesigner)
Nullsoft for Winamp v5.531
Text: Este é meu terceiro screenshot. Com tudo do Flyakite.. um papel de parede da Mac, e meu terminal
Eu altamente recomendo este Flyakite.. um dos melhores
alteradores de skin do windows que eu já vi!
http://baixaki.ig.com.br/download/flyakiteosx.htm
Deixar um comentário » | Downloads, Screenshots | Etiquetado: download, flyakite, screenshot, slockz, terceiro, thrd | Link Permanente
Escrito por slockz
