Системные иконки Shell32.dll

← →
Нов_и_чок (2008-09-10 15:22) [0]

Подскажите пожалуйста как можно к проекту подключить иконки Shell32.dll

← →
brother © (2008-09-10 15:25) [1]

в начале "выдрать" их оттуда, а потом можно поместить в ресурс и использовать в своем приложении

← →
Нов_и_чок (2008-09-10 15:27) [2]

Пробовал качество теряется! Возник вопрос можно выдрать так, шобы качество не терялось???

← →
brother © (2008-09-10 15:29) [3]

> Пробовал качество теряется!

не тем пробовал? ;))))) попробуй restorator...

← →
clickmaker © (2008-09-10 15:29) [4]

LoadImage(GetModuleHandle("shell32.dll"), MAKEINTRESOURCE(IconID), IMAGE_ICON, 16, 16, 0)

← →
Нов_и_чок (2008-09-10 15:33) [5]

Я наверно наглею, но как я понимаю LoadImage вытаскивает по одной, я хочу все сразу... :)

← →
brother © (2008-09-10 15:38) [6]

в любом варианте, грузишь по одной сколько надо...

← →
Amoeba © (2008-09-10 15:43) [7]

> я хочу все сразу...

И что же такое собираешься делать со всеми сразу?

← →
Правильный$Вася (2008-09-10 15:45) [8]

> я хочу все сразу

мозаикой выложить?

← →
Palladin © (2008-09-10 15:47) [9]

> brother © (10.09.08 15:25) [1]

тебя MS потом возлюбит за такие дела...

> brother (10.09.2008 15:25:01) [1]

Они так уже в ресурсе.

← →
Sapersky (2008-09-10 15:58) [11]

Uses ShellAPI;

function GetSysImgList(Owner : TComponent; SmallIcons : Boolean): TCustomImageList;
var FileInfo : TSHFileInfo;
Flags : DWord;
begin
Result := TCustomImageList.Create(Owner);
FillChar(FileInfo, SizeOf(FileInfo), 0);
Flags := SHGFI_SYSICONINDEX;// or SHGFI_ICON;
If SmallIcons then Flags := Flags or SHGFI_SMALLICON;
Result.Handle := SHGetFileInfo("", 0, FileInfo, Sizeof( FileInfo ), Flags);
Result.ShareImages := True;
end;

Почему использовал TCustomImageList вместо TImageList - уже и сам не помню, возможно, не хотелось добавлять в uses Сontrols.

← →
Правильный$Вася (2008-09-10 16:02) [12]

> Sapersky (10.09.08 15:58) [11]

и произвольная нумерация каждый раз...

← →
Sapersky (2008-09-10 16:15) [13]

Возможно. Нумерацией я не интересовался, т.к. использовал этот ImageList для отображения иконок файлов, индексы получал тоже через ShGetFileInfo.

Системные иконки Shell32.dll Найти похожие ветки