摘要：
如何用 Delphi 创建系统服务程序？ Windows 2000/XP和2003等支持一种叫做"服务程序"的东西.程序作为服务启动有以下几个好处:(1)不用登陆进系统即可运行.(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它的.笔者在2003年为一公司开发机顶盒项目的时候,曾经写过课件上传和媒体服务,下面就介绍一下如何用Delphi7创建一个Service程序.运行Delphi7,选择菜单File-->New-->Other--->Service Application.将生成一个服务程序的框架.将工程保存为ServiceDemo.dpr和 阅读全文
摘要：
当动态添加 表的 列时，如果设置了该列的 默认值，那么再用alter table TableName drop column ColumnName语句时就会报错，例如，“消息 5074，级别 16，状态 1，第 1 行对象'DF__Tb_SalaryPar__aa__7DB89C09' 依赖于 列'aa'。消息 4922，级别 16，状态 9，第 1 行由于一个或多个对象访问此列，ALTER TABLE DROP COLUMN aa 失败。”因为存在了default约束。此时我们需要 做的：1.查找出表中该列的约束名称declare @name varchar( 阅读全文
摘要：
在调试程序时，可能需要让delphi不拦截某些异常，这时我们可以设置debugger options中的language exceptions来完成。下面举例说明如何让delphi在调试时不拦截EOleError，打开Tools|Options|Debugger Options|Language Exceptions在右面的Excetpion types to ignore列表中增加EOleError即可。同样，当你在调试程序时，在delphi弹出的Debugger Exception Notification对话框中选择了“Ignore this exception type”后，又想恢复此 阅读全文
摘要：
Delphi ListView基本用法大全 //增加项或列(字段) ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Caption:='id';ListView1.Columns.Items[1].Caption:='type';ListView1.Columns.Items[2].Caption:='title';ListView 阅读全文
摘要：
Delphi获取系统进程和进程ID，Listview实现： var Form1: TForm1; Summ: Word; implementation {$R *.dfm} procedure TForm1.N2Click(Sender: TObject); var ContinueLoop: BOOL; NewItem: TListItem; begin ListView1.Items.BeginUpdate; ListView1.Items.Clear; FSnapshotHandle := CreateToolhelp32Snapshot(TH32... 阅读全文
摘要：
获得sql列名 获得列名 select name from syscolumns where id=object_id('ds_field') 或 select col_name(object_id('table'),1) from sysobjects where name='table' --读取库中的所有表名 select name from sysobjects where xtype='u' --读取指定表的所有列名 select name from syscolumns where id=(select max(id) 阅读全文