谁有比较好一点应用图标(如数据操作图标添加、修改、删除、确定、取消等不要Delphi自带的那些颜色比较单调)。
我的图标一大堆,可好的图标难求啊。
那位仁兄能把Exe窗体上的图标搞下来,小弟将大分伺候!
有一个好的应用程序,可就是没法把上面的图标搞下来!!
在网上找犹如大海捞针!!

解决方案 »

  1.   

    我有,只不过是人家的样板,去背去得不好,如果你行的话,我就发给你,发个短消息给我,顺便处理好的也给我一份吧!(E-maill地址短消息里告诉你)
      

  2.   

    http://210.83.119.69/qiulijun/image/特COOL图标.zip
      

  3.   

    feichuang:就是这个地方保存的,但没有源文件,好像说收人民币的。
    不过,我有办法了,去下载一个MyIE的最新版本,在下一个叫Crystal 2的面板,里面可以替代:
    前进/后退:上一笔、下一笔
    停止:删除
    刷新:刷新
    ……等等
    也可以给你现成的!!!!!!!!!!!
      

  4.   

    http://210.83.119.69/qiulijun/image/特COOL图标.zip
    我已经去过了。
    没有理想的。feichuang的要Money的。
    我把你里面的免费的搞下来了。不过没有我需要的。谁有发给我:[email protected]
    老板把QQ关了。
      

  5.   

    这个网站的图标应有尽有啊,包你满意http://www.94cool.org/icon.htm
      

  6.   

    获得文件的系统图标
    var
     info: SHFILEINFO;
     hFile, size: integer;
     myfilename:String;
    begin
      SHGetFileInfo(PChar(myfilename),
                   0,
                   info,
                   SizeOf(info),
                   SHGFI_DISPLAYNAME or SHGFI_TYPENAME or SHGFI_ICON);
     hFile := CreateFile(PChar(myfilename),
                         GENERIC_READ,
                         FILE_SHARE_READ,
                         nil,
                         OPEN_EXISTING,
                         FILE_ATTRIBUTE_NORMAL,
                         0);
     size := GetFileSize(hFile,nil); Image1.Picture.Icon.Handle := info.hIcon; 
     CloseHandle(hFile);
    end;
      

  7.   

    http://www.94cool.org/icon.htm我已经在找了,一无所获。