Delphi Open Tools Api实例研究(一)[13]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 hkbarton 的 blog

      try

       icon1.loadfromfile('d:\myworks\mycomponent\otatest\newform.ico');

       //我从硬盘的文件上载入了一个图标作为菜单项一的图标

      except

       on e:exception do

       begin

        raise exception.create(e.message);

        exit;

       end;

      end;

      imageindex1:=fimagelist.addicon(icon1);

      //加入那个载入的图标并返回一个imageindex

本文关键:OTA,Delphi,接口
  相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top