Buscar por:
Código //Inclua a unit Shellapi na cláusula uses do seu form. Image1.Picture.Icon.Handle:= ExtractIcon(Handle,PChar('c:windowscalc.exe'),0);
//Inclua a unit Shellapi na cláusula uses do seu form. Image1.Picture.Icon.Handle:= ExtractIcon(Handle,PChar('c:windowscalc.exe'),0);
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009