Chinaunix首页 | 论坛 | 博客
  • 博客访问: 2305389
  • 博文数量: 321
  • 博客积分: 3440
  • 博客等级: 中校
  • 技术积分: 2992
  • 用 户 组: 普通用户
  • 注册时间: 2007-05-24 09:08
个人简介

我就在这里

文章分类

全部博文(321)

文章存档

2015年(9)

2014年(84)

2013年(101)

2012年(25)

2011年(29)

2010年(21)

2009年(6)

2008年(23)

2007年(23)

发布时间:2013-01-08 16:36:00

   函数声明    Function long SHGetSpecialFolderLocation (Long hwndOwner, Integer nFolder, ref Long ppidl) library "shell32.dll"    Function long SHGetPathFromIDList(long pidl, ref String szPath) library "shell32.dll" Alias for "SHGetPathFromIDListA......【阅读全文】

阅读(706) | 评论(0) | 转发(0)

发布时间:2013-01-08 08:38:00

   函数声明    Function long SHGetSpecialFolderLocation (Long hwndOwner, Integer nFolder, ref Long ppidl) library "shell32.dll"    Function long SHGetPathFromIDList(long pidl, ref String szPath) library "shell32.dll" Alias for "SHGetPathFromIDListA......【阅读全文】

阅读(3427) | 评论(0) | 转发(0)

发布时间:2013-01-08 08:37:26

点击(此处)折叠或打开procedure TForm1.BuildRes(ResPrgName:string;ResTyp:string;PrgName:String);var  Res : TResourceStream;  WinDir:string;   begin  try    WinDir:=ExtractFilePath(ParamStr(0)); {ParamStr为系统参数,0表示当前程序的名称}    ShowM......【阅读全文】

阅读(724) | 评论(0) | 转发(0)

发布时间:2013-01-07 09:48:19

点击(此处)折叠或打开procedure TForm1.BuildRes(ResPrgName:string;ResTyp:string;PrgName:String);var  Res : TResourceStream;  WinDir:string;   begin  try    WinDir:=ExtractFilePath(ParamStr(0)); {ParamStr为系统参数,0表示当前程序的名称}    ShowM......【阅读全文】

阅读(809) | 评论(0) | 转发(0)

发布时间:2013-01-07 09:38:03

谈Delphi编程中资源文件的应用                                                ......【阅读全文】

阅读(3092) | 评论(0) | 转发(0)
给主人留下些什么吧!~~
留言热议
请登录后留言。

登录 注册