Como habilitar e desabilitar barra de tarefas do windows ?

Como habilitar e desabilitar barra de tarefas do windows ? Para habilitar e desabilitar a barra de tarefas do windows use as seguintes procedures: procedure hideTaskbar; // DESABILITA var wndHandle : THandle; wndClass : array[0..50] of Char; begin StrPCopy(@wndClass[0], ‘Shell_TrayWnd’); wndHandle:= FindWindow(@wndClass[0], nil); ShowWindow(wndHandle, SW_HIDE); // This hides the taskbar end; procedure showTaskbar; // HABILITA var

Continuar lendo »

Minimizando uma janela de maneira diferente

Minimizando uma janela de maneira diferente Você já viu aquele efeito de minimizar uma janela de modo que ela fique minimizada na área de trabalho acima da barra de tarefas do Windows? Faça o seguinte, crie um projeto novo e coloque a seguinte instrução no evento OnCreate do Form: SetWindowLong(Application.Handle,GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW); depois

Continuar lendo »

Reparar e compactar um banco de dados Access com Delphi

Reparar e compactar um banco de dados Access com Delphi Quem já trabalhou com o Ms Access, alguma vez já teve que compactar ou reparar um banco de dados (Extensão MDB). O recurso de compactar é essencial , uma vez que o banco de dados começa a ficar grande demais. O código abaixo realiza estas

Continuar lendo »

Desconecta uma unidade mapeada via programação

Desconecta uma unidade mapeada via programação Delphi Function DesconectaRede(Letra:Pchar;Forcada:boolean):String; // Letra = Letra atribuida a unidade // Forcada = Força o cancelamento do mapeamento begin WNetCancelConnection2(Letra,0,Forcada); Case GetLastError() of 1205: Result := ‘Não foi possível abrir o perfil’; 1206: Result := ‘Perfil do usuário não encontrado ou inválido’; 1208: Result := ‘Ocorreu um Erro específico

Continuar lendo »
Pages:«1...567891011...22»