Форум: "WinAPI";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];
ВнизКак вытащить иконку из любого 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 вся ветка
Форум: "WinAPI";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.034 c