摘要: 一些delphi开发的小技巧这是我从网上收集到的一些delphi开发的小技巧,现在与大家一起分享◇[DELPHI]网络邻居复制文件uses shellapi;copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false);◇[DELPHI]产生鼠标拖动效果通过MouseMove事件、DragOver事件、EndDrag事件实现,例如在PANEL上的LABEL:var xpanel,ypanel,xlabel,ylabel:integer;PANEL的MouseMo 阅读全文
posted @ 2011-12-26 23:04 Unique.Y 阅读(861) 评论(0) 推荐(0) 编辑
摘要: 写代码是一种艺术。使用Delphi,任何人都可以轻而易举地开发出某种软件、完成某些任务。而完美的代码则只有真正的高手才能写出。除了正确的缩进、大小写、命名规则之外,请时刻牢记爱因斯坦的名言--简单就是美。下面将谈及的五个代码问题,可能是初学者、甚至一些老鸟都会犯的错误。忠告一布尔型变量的赋值操作应该是直接的。例如,在一个if/then/else语句中,if子句将布尔型变量赋值为True,而else子句将其赋为False。下面这段代码的写法是不好的:ifIf_Love_DelphithenResult:=TrueelseResult:=False;而这样写就比较好:Result:=If_Love 阅读全文
posted @ 2011-12-26 22:39 Unique.Y 阅读(313) 评论(0) 推荐(0) 编辑
摘要: DELPHI常见属性说明ALIGN设置组件对齐(同其父容器)方式BORDERSTYLE设置组件边框形状CAPTION设置组件标题CTL3D设置组件边框是否为3D模式,若BORDERSTYLE设置为BSNONE则此属性无效COLOR设定组件背景颜色CURSOR设定鼠标经过组件时光标所显示的形状ENABLED设定组件是否能使用,当设为FALSE时组件会呈灰色FONT设定组件内文字的字型、字体大小、颜色等HEIGHT设定组件高度HELPCONTENT用来为帮助说明文件中的索引值建立关联LEFT设定组件与父组件左边框间的距离POPUPMENU设定鼠标右键(弹出式)快捷菜单TABORDER设定组件在按. 阅读全文
posted @ 2011-12-26 22:05 Unique.Y 阅读(599) 评论(0) 推荐(0) 编辑