Новые книги

Книга американского специалиста по системному программированию — уникальный сборник задач по программированию из разных областей: моделирования, точности вычислений, обработки текстов, искусственного интеллекта, конструирования компиляторов. Большинство задач базируется на реальных и игровых ситуациях.

Для всех, кто преподает и изучает программирование.
Представьте: вы садитесь в машину, берете в руки книгу и отправляетесь в путь. Вам не нужно управлять машиной – она управляет собой сама. Вам даже не нужно говорить ей, куда ехать, потому что она уже сверилась с вашим ежедневником, а он, в свою очередь, сам себя заполнил, проверив вашу почту и электронный план тренировок. Автомобиль везет вас не в магазин, потому что дроны уже доставили продукты в ваш холодильник, который еще на прошлой неделе сам отправил заявку в интернет-магазин), и не на работу (необходимость в офисе давно отпала), а, скажем, в оперу. Такой мир предлагает нам Интернет вещей.

Кажется, что это фантастика, однако все необходимые технологии уже существуют и выходят в серийное производство. Это значит, что идиллическая реальность Интернета вещей – вопрос самого ближайшего будущего. И у этого будущего есть обратная сторона: волна компьютерных преступлений, кибертерроризма и сетевого оружия, тотальная слежка и утрата контроля над собственной жизнью и окружающим миром.

Сэмюэл Грингард предлагает, не откладывая, отправиться в будущее и поразмыслить над важными вопросами, ответы на которые нам вскоре будут буквально жизненно необходимы.

Вопрос и Ответ 21

Вопросы и Ответы


      21. Как получить иконку из .EXE или .DLL файла?

      Процесс получения иконок из .EXE, .DLL или .ICO файлов полностью идентичен. Различие только в том, что в .ICO файле может храниться только одна иконка, а в .EXE и .DLL несколько. Для получения иконок из файлов, в модуле ShellAPI, есть функция:

      function ExtractIcon(Inst: THandle; FileName: PChar; IconIndex: Word): HIcon;

      где

        Inst - указатель на приложение вызвавшее функцию,
        FileName - имя файла из которого необходимо получить иконку,
        IconIndex - номер необходимой иконки.

      Если функция возвращает значение не равное нулю, то в файле есть следующая иконка.

      Пример:

      В данном примере в компонент Image1 выводится иконка запущенного файла.

      ............

      USES ShellAPI;

      ............

      procedure TForm1.FormCreate(Sender: TObject);
      VAR A: ARRAY [0..78] OF Char;
      begin

        {Получение имени запущенного файла}
        StrPCopy(A, ParamStr(0));
        {Вывод на экран нулевой иконки из файла}
        Image1.Picture.Icon.Handle := ExtractIcon(HInstance, A, 0);

      end;

      ............


...предыдущая страница следующая...
оглавление



"Вопрос и Ответ 21"
Copyright © "В помощь Веб-Мастеру" (Alexander D. Belyaev) 2005-2024 .
При перепечатке любого материала видимая ссылка на источник "В помощь Веб-Мастеру" и все имена, ссылки авторов обязательны!
Время генерации страницы: 0.006