随笔分类 -  delphi

delphi
摘要:最近在写个“数据库管理系统框架程序”,其中封装了几个连接数据库的函数,觉得挺好用,拿出来与大家分享下,希望能对大家有点用处。 阅读全文
posted @ 2009-02-25 16:29 苔苔以苔苔以苔 阅读(2149) 评论(0) 推荐(0) 编辑
摘要:备忘,备快速查询 阅读全文
posted @ 2009-02-25 14:01 苔苔以苔苔以苔 阅读(270) 评论(0) 推荐(0) 编辑
摘要:if not FileExists('c:\Log1.txt') then begin AssignFile(LogFile, 'c:\Log1.txt'); Rewrite(LogFile); CloseFile(LogFile); //关闭时自动保存文件 end; 阅读全文
posted @ 2009-02-23 11:15 苔苔以苔苔以苔 阅读(1289) 评论(0) 推荐(0) 编辑
摘要:uses Winprocs,SysUtils,Tlhelp32;//注意添加单元文件 阅读全文
posted @ 2009-02-22 21:24 苔苔以苔苔以苔 阅读(1447) 评论(0) 推荐(1) 编辑
摘要:文件大小:7.37M 更新日期:2009-1-21 MytvPlayer 3.3.0.5 更新: ================== 1. 解决播放时调节亮度对比度不方便等问题 2. 优化皮肤控件,运行更流畅 3. 突破部分杀毒软件拦截问题 4. 优化内核,播放效率更高 采用的是mplayer 内核 目前http://cnc.mytv365.com/ 下是可以免费观看电影的 播放... 阅读全文
posted @ 2009-02-12 16:16 苔苔以苔苔以苔 阅读(491) 评论(0) 推荐(0) 编辑
摘要:TClientSocket 本来是D5默认安装的,但是D7使用的Indy组件后,就没有默认安装了,如果你喜欢这个组件,可以在D7的安装目录bin文件夹找到dclsockets70.bpl组件包,安装上去就OK了.rtl70.bpl是TCientSocket和TServerSocket必需的运行包. 阅读全文
posted @ 2008-12-31 14:04 苔苔以苔苔以苔 阅读(1385) 评论(0) 推荐(0) 编辑
摘要:用处多多啊 阅读全文
posted @ 2008-12-29 15:51 苔苔以苔苔以苔 阅读(528) 评论(0) 推荐(0) 编辑
摘要:Vista提供的UAC机制,是Vista的新增功能之一。它的主要目的是防止对于操作系统本身的恶意修改。如果想对于Vista的系统设置进行改动,必须通过UAC的验证才能够进行。通过这样的手段,大大提供了系统的安全性。 阅读全文
posted @ 2008-12-01 10:45 苔苔以苔苔以苔 阅读(642) 评论(1) 推荐(0) 编辑
摘要:Win2K3是打了SP1后,出现这问题 在我的电脑,属性,高级,数据执行保护里加入 delphi32.exe 阅读全文
posted @ 2008-11-06 17:17 苔苔以苔苔以苔 阅读(539) 评论(0) 推荐(0) 编辑
摘要:用 CreateFile 来判断文件是否在使用中,似乎对TXT文件没有效果 而且也没有办法知道到底是什么进程在使用该文件,知道的达人回复一下,不胜感激。 阅读全文
posted @ 2008-10-22 12:43 苔苔以苔苔以苔 阅读(1865) 评论(0) 推荐(0) 编辑
摘要:网上对该问题的帖子很多,但是经常不是很全面,笔者在使用时也遇到了很多实际问题,比如参数不存在啊、类型没有引用啊等等。下面我尽量细致地来通过例子实现一下,如果还有不正确的地方,希望得到高手指点. 阅读全文
posted @ 2008-10-16 13:48 苔苔以苔苔以苔 阅读(425) 评论(0) 推荐(0) 编辑
摘要:今晚在csdn论坛上看到一个网友在问分页,就随便写了一段代码,如有不当之处,还请见谅。 首先在窗体上放个listview,两个button,一个label,一个adoquery,一个adoconnection 然后用adoconnection建立一个连接 阅读全文
posted @ 2008-10-16 09:56 苔苔以苔苔以苔 阅读(629) 评论(0) 推荐(0) 编辑
摘要: 这里所谓的动态菜单是指菜单项是变化的,它随程序的操作变化而变化。例如在很多应用程序的“文件”菜单下列出了最近多少次曾经使用过的文件名,这是最常见的动态菜单用法,Microsoft Word 的“文件”菜单就是一例。 阅读全文
posted @ 2008-10-15 13:59 苔苔以苔苔以苔 阅读(1106) 评论(0) 推荐(0) 编辑
摘要: GetDiskFreeSpace(pchar(str),d1,d2,d3,d4); lbxDisks.Items.Add(str+Format('-----------总空间: %f GB',[d4/1024/1024/1024*d2*d1])+Format('--------剩余空间: %f GB',[d3/1024/1024/1024*d2*d1])); 阅读全文
posted @ 2008-10-14 14:22 苔苔以苔苔以苔 阅读(922) 评论(0) 推荐(0) 编辑
摘要:if temp = 1 then begin driver := char(i + integer('A')); str := driver + ':\'; if (driver '') and (getdrivetype(pchar(str)) drive_cdrom) and (getdrivetype(pchar(str)) DRIVE_REMOVABLE) then ComboBox1.Items.add(str); end; drivers := (drivers shr 1); 阅读全文
posted @ 2008-10-14 09:56 苔苔以苔苔以苔 阅读(490) 评论(0) 推荐(0) 编辑
摘要:執行BCB6, 先將 Indy8 的 package uninstall. (Component-> Install Package -> Uninstall Indy) 2. 打開控制台的"新增/移除程式", 選"Borland C++ Builder 6"下選變更. 3. 進入 BCB6 的 Installation Wizard, 選擇 "Modify", 並在之後的 "Program Files" 阅读全文
posted @ 2008-10-09 12:41 苔苔以苔苔以苔 阅读(510) 评论(0) 推荐(0) 编辑
摘要:只有PAS文件或既有PAS又有DCU文件的组件。这种组件因为有PAS文件,也就是说作 者提供了源码,这就好办多了。安装的方法和上面是一样的,在文件类型中可以设定为DCU 也可以设定为PAS,建议设定为PAS,这样可用你的Delphi重新编译一下,看是否会出现问题 。Delphi升级后只能选择PAS文件安装,这样才能重新编译,使得组件能适应新Delphi版本。 阅读全文
posted @ 2008-08-29 09:37 苔苔以苔苔以苔 阅读(754) 评论(1) 推荐(0) 编辑
摘要:必须配套安装ExpressCommon Library、XP Theme Manager和ExpressLibrary,如果有其它DevExpress组件 已安装ExpressCommon Library、XP Theme Manager和ExpressLibrary时则跳过。 1.确定\'\\ExpressCommon Library\\Sources\'路径在Tools|Options|E... 阅读全文
posted @ 2008-08-28 17:21 苔苔以苔苔以苔 阅读(2609) 评论(0) 推荐(0) 编辑
摘要:2007-07-16 18:33 我们的程序有时候只允许运行一次,并且最好的情况是,如果程序第二次运行,就激活原来的程序。网上有很多的方法实现程序只运行一次,但对于激活原来的窗口却都不怎么好。 关键就在于激活原来的程序,一般的做法是在工程开始时,打开互斥量对象,如果打不开表示程序还没... 阅读全文
posted @ 2008-07-29 15:16 苔苔以苔苔以苔 阅读(1250) 评论(0) 推荐(1) 编辑
摘要:在实际应用中,我们经常需要多个程序相互配合来完成某些特定功能。例如两个应用程序间的同步、互斥;应用程序在起第二份实例时的参数自动传递…。要实现这些功能,就必须能实现程序间的数据传递。 有些特殊的高级技术可在不同的程序间传递数据,如剪贴板、动态数据交换以及OLE自动化,但有条件限制并且相对较复杂。这里,我介绍三种有效的底层技术,希望对编程爱好者有所帮助。 利用WM_COPYDATA消息... 阅读全文
posted @ 2008-07-29 09:29 苔苔以苔苔以苔 阅读(830) 评论(0) 推荐(0) 编辑

猪先飞