Ajuda por favor!

24/02/2003

2

Olá pessoal, preciso mais uma vez da ajuda de vocês, preciso saber como faço para que apenas o botão iniciar desapareça, de forma que fiquem apenas os botôes dos programas abertos na barra de tarefas.
Valeu


Anonymous

Anonymous

Responder

Posts

24/02/2003

Anonymous

750 dicas delphi
dica 042 - Escondendo/Mostrando o botão Iniciar
procedure EscondeIniciar(Visible:Boolean);
Var taskbarhandle,
buttonhandle : HWND;
begin
taskbarhandle := FindWindow(´Shell_TrayWnd´, nil);
buttonhandle := GetWindow(taskbarhandle, GW_CHILD);
If Visible=True Then Begin
ShowWindow(buttonhandle, SW_RESTORE); {mostra o botão}
End Else Begin
ShowWindow(buttonhandle, SW_HIDE); {esconde o botão}
end;
end;


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários,
consulte nossa política de privacidade.

Aceitar