提取ｅｘｅ ｄｌｌ文件的图标？
发布时间：2010-01-30 |
1楼: 提取ｅｘｅ ｄｌｌ文件的图标？
有实例最好！2楼: 请参见API
ExtractIcon and ExtractIconEx
字串1
3楼: 楼上正解 字串6
4楼: 详细些行吗？
有实例吗？ 字串6
5楼: delphi6 的demo E：＼program files＼Borland＼Delphi6＼Demos＼ResXplor＼字串8
6楼: 同意楼上,但关键是注意提取到ImageList中的图标和图标的索引. 字串2 7楼: procedure TMainFrm.Button1Click(Sender： TObject);
var
FileName： AnsiString;
begin
if OpenDialog1.Execute then
begin
FileName ：= opendialog1.FileName;
Image1.Picture.Icon.Handle ：=ExtractIcon(Hinstance, pchar(FileName), 0);
end;
end; 字串2
8楼: 感谢大家！问题已经解决！ 每人给点分！呵呵！ 我是初学 wzwcn给的代码是我最想要的！ 字串4上一篇：如何才能有自己的文件格式 下一篇：没有了