摘要:
主要功能:
1 生成指定图片的缩略图2 批量生成某一目录内所有图片缩略图3 提供5中缩略图尺寸定义模式4 目前只支持.jpg格式测试版下载:http://image.myfaq.com.cn/files/20041220/13065.rar核心代码://保存jpeg的缩略图procedure savepic(sourcefilename,descfilename: string);const ......
摘要:
xpmenu是大名鼎鼎的dephi第三方界面控件,最近在使用中发现了几个bug,并对其中的两个进行修正。1、首先,是绘制菜单和工具栏图标时,会将图像白色部分作为透明色,导致图像缺损非常难看,如下图所示: 查看xpmenu的源代码,图标是通过txpmenu.drawicon函数绘制的,函数内计算了图标显示的位置、调用graybitmap、dimbitmap、drawbitmapshado......
类似Access查找中的记忆功能
procedure tcomlocatefrm.locatebtnclick(sender: tobject);var 【程序编程相关:
利用注冊表獲取桌面路徑.】 【推荐阅读:
多层数据库开发十一:TClientDat】 setlooptions : tlocateoptions; 【扩展信息:
NT服务程序中对注册表中HKey_Cur】 i : integer; slkeys : tstrings; begin if combobox1.items.indexof(combobox1.text)<0 then try slkeys := tstringlist.create; slkeys.addstrings(combobox1.items); combobox1.items.clear; combobox1.items.add(combobox1.text); for i := 0 to 8 do if i < slkeys.count then combobox1.items.add(slkeys.strings[i]); finally ...
下一页 摘要:
可视化控件(visual component)实际上就是一个类(class),要编写一个类,可以直接在*.pas文件中编写。但是要编写控件,则必须使用包(package)。从file菜单中选择new,新建一个package,这就是存放和安装控件用的包。然后单击package窗口中的add按钮,添加一个元件(unit)。
在弹出的对话框最上方选择new component。因为一个控件的所......