Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.04;
Скачать: CL | DM;

Вниз

Как вытащить иконку из любого exe и впихнуть в timage?   Найти похожие ветки 

 
ROMBLLER   (2005-09-30 19:39) [0]

Пробавал

IconsId : word;
ic : hIcon;

begin IconIndex := 0;
h := ExtractAssociatedIcon(hInstance, "C:\WINDOWS\explorer.exe", IconsId);
DrawIcon(Image1.Picture.Bitmap.Canvas.Handle, 15, 15, ic);

нефига не отображает


 
ROMBLLER   (2005-09-30 19:44) [1]

блин неправильно набрал...

в общим вот что набираю и нечего..

var
IconsId : word;
ic : hIcon;

begin IconsId := 0;
ic := ExtractAssociatedIcon(hInstance, "C:\WINDOWS\explorer.exe", IconsId);
DrawIcon(Image1.Picture.Bitmap.Canvas.Handle, 15, 15, ic);


 
Sashka ©   (2005-10-01 14:09) [2]

Попробуй так:
var
 psfi : TSHFileInfo;
begin
 SHGetFileInfo("C:\WINNT\explorer.exe", 0, psfi, SizeOf(psfi), SHGFI_ICON or SHGFI_LARGEICON);
 DrawIcon(Image1.Picture.Bitmap.Canvas.Handle, 15, 15, psfi.hIcon);
.......



Страницы: 1 вся ветка

Текущий архив: 2005.12.04;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.052 c
2-1132323295
tq
2005-11-18 17:14
2005.12.04
Где можно изменить цвет Disable у поля memo?


14-1131958904
Ломброзо
2005-11-14 12:01
2005.12.04
Выборы в Мосгордуму


2-1132406247
Дева
2005-11-19 16:17
2005.12.04
О логах


14-1132061272
vecna
2005-11-15 16:27
2005.12.04
Internal debugger


4-1128094758
ROMBLLER
2005-09-30 19:39
2005.12.04
Как вытащить иконку из любого exe и впихнуть в timage?