ToolBar

supervisor · Mesaj gönderen **supervisor** » 11 Şub 2007 10:50

Merhaba Arkadaslar;
Delphide küçük ve fazla ayrıntısı olmayan bi program yaptım....
Görüş ve önerilerinizi Bekliyorum...

http://frekans35.googlepages.com/setup.rar

mrmarman · Mesaj gönderen **mrmarman** » 13 Şub 2007 10:31

İlk öneri benden.

- Ataması yapılan 10 programdan her biri için; EXE'sinden ICON extract edilerek buttonlara dinamik olarak atanabilir. Bunu yaparsan daha kullanıcı dostu olacaktır.

Ref : http://rapidshare.com/files/16335838/To ... s.zip.html

Kod: Tümünü seç

Procedure IconExtract(Kaynak, Hedef:TFileName);
var
 Icon    : TIcon;
begin
  Icon         := TIcon.Create;
  Icon.Handle  := ExtractIcon( HInstance, PChar(Kaynak), 0);
  Icon.SaveToFile( ChangeFileExt(Hedef, '.ICO') );
  Icon.Free;
end;

- Başarılar...

supervisor · Mesaj gönderen **supervisor** » 14 Şub 2007 08:30

Yorumunuz için Tesekkür ederim..

Her programın kendi iconu göstermesi olayını kuran arkadasların birçoğu söylemişti..

Kod içinde tesekkurler..

supervisor · Mesaj gönderen **supervisor** » 23 Şub 2007 08:08

Muharrem Bey sizin yaptığınız daha kullanışlı

Tek tuşla işi bitiriyor

mrmarman · Mesaj gönderen **mrmarman** » 23 Şub 2007 09:18

@supervisor

- Örnek olsun diye hazırlamıştım.

- Kolaylıkla yaparsın. Diğer yandan kodları lazımsa söyle public edelim