Buscar

Pegar o ícone de um programa em execução

Código

{Eu procurei muito como fazer para pegar o ícone de uma janela q esteja em execução, não encontrava dica em lugar algum. Mas, com muito sacrifício consegui fazer. E resolvi postar aqui para que não sofram o quanto sofri... rs}

var
  aIcon: TIcon
begin
  aIcon:= TIcon.Create;
  aIcon.Handle:= SendMessage(Wnd, WM_GETICON, 0, 0);
end;

// É só isso... e me matei muito... rs

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Componentes
Adicionada dia: 07/05/07
Por: Michel
Visualizada: 3436 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009