Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!

Gönderen Konu: EXE veya DLL'den Icon Almak  (Okunma sayısı 2062 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı CMNSOFT

  • Kıdemli Üye
  • *****
  • İleti: 82
  • Rep: +2/-2
  • Cinsiyet: Bay
    • http://www.cmnsoft.com
EXE veya DLL'den Icon Almak
« : 21 Ekim 2005 16:31:22 »
Kod: Delphi
  1. Uses ShellApi;
  2.  
  3.  
  4.  
  5. procedure TForm1.FormCreate(Sender: TObject);
  6.  
  7. var
  8.  
  9.    TheIcon: TIcon;
  10.  
  11. Begin
  12.  
  13. TheIcon := TIcon.Create;
  14.  
  15. TheIcon.Handle := ExtractIcon(hInstance,'C:\dosya\dosya.EXE',0);
  16.  
  17. image1.picture.Icon:=Theicon;
  18.  
  19. End;
:::::::::::::::::::: www.CMNSOFT.com ::::::::::::::::::::