delphi2007
Tweet Olá pessoal, Para quem tem interesse em criar um botão de logoff no sistema a dica é muito simples.Basta utilizar a função ShellExecute da API do Windows para reabrir o sistema. Veja como é simples: …usesShellApi;…procedure TForm1.btnLogofClick(Sender: TObject);beginClose;ShellExecute(Application.Handle, Pchar(‘OPEN’), PChar(Application.ExeName), ”, ”, SW_SHOWNORMAL);end; Como podem ver apenas fechamos o aplicativo com Close e logo […]
Pessoal, Seguem alguns links para vídeos da Borland/Delphi no YouTube pra relaxar um pouco. Vídeo de lançamento do Delphi 1 (Speed is)http://br.youtube.com/watch?v=ybGSzwJbjU4Vídeo da Borland (inspirado em Jornada nas Estrelas)http://br.youtube.com/watch?v=VmygOESWM5Q Vídeo criado para o a Borland Conference 1997 http://br.youtube.com/watch?v=rLgk5CIf4XA Túnel do tempohttp://br.youtube.com/watch?v=VbWQybqAuOs Vídeo pra lembrar o espírito orginal da Borland (Transformers)http://br.youtube.com/watch?v=Aptgjeqg94o Vídeo pra lembrar o espírito […]
Tweet Olá pessoal, Para bloquear ou liberar a proteção de tela do Windows é necessário fazer “ouvir” a mensagem que o Windows envia para executar a proteção. Essa mensagem pode ser ouvida pelas constantes WM_SYSCOMMAND e SC_SCREENSAVE. Nós interceptamos as mensagens e desativamos a proteção de tela no evento OnMessage do objeto Application. Veja abaixo […]