Kullanıcı

Hoşgeldiniz Ziyaretçi. Lütfen giriş yapın veya kayıt olun.
E-posta adresinize aktivasyon iletisi gelmediyse lütfen buraya tıklayın.
03 Eylül 2010 13:45:03

Kullanıcı adınızı, şifrenizi ve aktif kalma süresini giriniz

Sohbet Penceresi

Son 5 Notlar:

25 AÄŸustos 2010 16:11:57
slm beyler
27 AÄŸustos 2010 10:00:56
arkadaşlar delphi ile fax nasıl gönderilir şeklinde konuya cevaplarınızı bekliyorum...
  XLG
01 Eylül 2010 17:00:37
arkdaÅŸlar admin kim ya
  XLG
01 Eylül 2010 17:00:55
bi maruzatım olacak ta
Bugün, 11:14:44
Arkadaşlar SUBHAN adlı arkadaşımızdan haberi olan var mı? Bir yıldır hiç siteye girmemiş? Sitesi de borçtan kapanmış. Başına bir şey mi geldi?

Show 50 latest

Gönderen Konu: EXE veya DLL'den Icon Almak  (Okunma sayısı 1360 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) [Seç]
Uses ShellApi;



procedure TForm1.FormCreate(Sender: TObject);

var

   TheIcon: TIcon;

Begin

TheIcon := TIcon.Create;

TheIcon.Handle := ExtractIcon(hInstance,'C:\dosya\dosya.EXE',0);

image1.picture.Icon:=Theicon;

End;
:::::::::::::::::::: www.CMNSOFT.com ::::::::::::::::::::