获取外部可执行文件的图标 (2001年2月28日).txt

来自「自己对DELPHI学习的一点体会」· 文本 代码 · 共 19 行

TXT
19
字号
获取外部可执行文件的图标 (2001年2月28日) 

网友更新  分类:数据库   作者:George  推荐:GeorgeAPI   阅读次数:262  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
...
var
IconIndex:word; 
H:hIcon;
begin
IconIndex:=0;
H:=ExtractAssociatedIcon(hInstance,'c:\windows\notepad.exe'
,IconIndex);
DrawIcon(Form1.canvas.handle,10,10,10,h);
end;
如何?  
 

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?