S
suntao
Unregistered / Unconfirmed
GUEST, unregistred user!
以前问的问题没明白。
var
hs:array[0..9]of LongWord;
procedure TForm1.FormCreate(Sender: TObject);
begin
//加载Icon0..Icon9这10个图标资源，
并且保存它们的句柄。
//图标Icon0..Icon9分别对应与0..9这9个数字。
hs[0]:=LoadIcon(hInstance, 'Icon0');
hs[1]:=LoadIcon(hInstance, 'Icon1');
求教：怎样加载图标资源，是用IMAGELIST吗？又怎样保存句柄呢？
var
hs:array[0..9]of LongWord;
procedure TForm1.FormCreate(Sender: TObject);
begin
//加载Icon0..Icon9这10个图标资源，
并且保存它们的句柄。
//图标Icon0..Icon9分别对应与0..9这9个数字。
hs[0]:=LoadIcon(hInstance, 'Icon0');
hs[1]:=LoadIcon(hInstance, 'Icon1');
求教：怎样加载图标资源，是用IMAGELIST吗？又怎样保存句柄呢？