*.lnk dosyasında ikon almada ok sorunu

[FXERKAN]

*.lnk dosyasından ikon aldığım zaman yandaki ok işaretini nasıl iptal edebilirm.

yada lnk dosyasındaki çalıştırılacak olan dosyanın adresine nasıl erişebilirim?

ikon alma fonksiyonum

icopic : timage;

procedure ikonal(DosyaAdresi : string; Buton : Tspeedbutton);
var
h : hIcon;
IconIndex : word;
begin
icopic.Canvas.Brush.Color := cllime;
icopic.Canvas.Pen.Color := cllime;
icopic.Canvas.Rectangle(0,0,36,36);
iconIndex := 0;
h := ExtractAssociatedIcon(hInstance,Pchar(DosyaAdresi),iconindex);
DrawIcon(icopic.Canvas.Handle,1,1,h);
buton.Glyph := icopic.Picture.Bitmap;
buton.Glyph.TransparentColor := cllime;

end;