取任意程序窗口句柄和修改标题图标

.如果真 (通用对话框1.打开 ())
SHGetFileInfo (通用对话框1.文件名, 128, sInfo, 348, 256)
图标句柄 ＝ sInfo.hIcon
图标句柄编辑框.内容 ＝ 到文本 (图标句柄)