取图标
var
HI: THandle; HI := ExtractAssociatedIcon(hInstance, PChar(IcnFile), 0);
{ Assign icon handle to IconImage }
Image1.Picture.Icon.Handle := HI;存图标可以调用
TIcon.SaveToFile
var
HI: THandle; HI := ExtractAssociatedIcon(hInstance, PChar(IcnFile), 0);
{ Assign icon handle to IconImage }
Image1.Picture.Icon.Handle := HI;存图标可以调用
TIcon.SaveToFile
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货