在Windows环境下怎样给任意一个EXE文件更换图表？

[lingice]

在Windows环境下怎样给任意一个EXE文件更换图表？
图标在已经编译好的EXE（PE格式）文件中的位置是不是固定的？它的大小
可不可以改变？防治图表的位置是不是固定的，如果大小变化了是不是原
EXE文件就损坏了？
如果可以更换图标的话请各位高手指点，最好能像我提供一个“例程”！
谢谢！

[ferrerocao]

虽然我还没有想好，怎么解决，不过下面的函数或许对你有帮助
extracticon:
HICON ExtractIcon(

HINSTANCE hInst, // instance handle
LPCTSTR lpszExeFileName, // filename of file with icon
UINT nIconIndex // index of icon to extract
);
可以得到可执行文件的图标
在use中加入shellapi
添加一个image用户显示图标
image1.picture.icon.handle:=extracticon(handle,pchar(application.exename),0);
希望对你有所帮助

[rh]

得到很简单
在nt下也有api
问题是9X下……sorry

[lingice]

我就是要在NT下实现（98下也可以）。
我使用那个函数可以取得图标，可是怎样更换EXE文件的图标呢？