TIcon = class(TGraphic)
public
procedure LoadFromStream(Stream: TStream); override;
ExtractIcon и TStream
Здравствуйте! ExtractIcon позволяет извлечь иконку файла, зная путь к нему. А если файл загружен в TStream как быть? Я имею ввиду например когда в мою программы "зашиты" другие файлы (например формата EXE, у каждого своя иконка), и мне нужно извлечь их иконки и загрузить например в ImageList...
ExtractIcon(-Ex) тут не поможет
2Phodopus
Если в Data файл формата exe, а не ico как можно вытащить иконку из него?
Код:
var
Icon:TIcon;
Data:TStream;
begin
Icon:=TIcon.Create;
Icon.LoadFromStream(Data);
end;
Icon:TIcon;
Data:TStream;
begin
Icon:=TIcon.Create;
Icon.LoadFromStream(Data);
end;
Если в Data файл формата exe, а не ico как можно вытащить иконку из него?
Разбирать заголовки и ресурсы руками.Это как минимум
А, тьфу ты, теперь дошло. Тебе зачем экзе файлы внутри программы? Важно.
храню их для дальнейшей распаковки, там разные файлы, но и EXE в том числе
Вообще,я бы(и не только я:)) посоветовали бы успокоиться и так не делать,ибо даже WinRAR(!!!) не отображает значки в архивах
Ежели всё-таки очень хочется,можно предварительно извлекать один значок из каждого файла и хранить их отдельно,дабы потом показывать
Ежели всё-таки очень хочется,можно предварительно извлекать один значок из каждого файла и хранить их отдельно,дабы потом показывать
Раз ты их распаковываешь, после и извлекай значки
а мне нужно на этапе загрузки дерева в Treeview загрузить значки. извлекает файлы юзер по своему желанию.
ну тогда как сказал @pixo $oft
понял.спасибо.тема закрыта