c_feers-CSDN博客

原创使用Delphi编写自动关闭Windows信使服务窗体程序

使用Delphi编写自动关闭Windows信使服务窗体程序 Windows信使服务是Windows为了方便尽心系统管理而设置的一项工具，初衷是很好的可以使得管理员方便的在局域网内发布消息给各个用户。可是却常常被一个菜的不能再菜的家伙利用，到处扰乱别人的学习和生活。每每让人在用电脑的同时突然弹出一个确认对话框。如果只是在办公的还好，尽管是最上层窗口，只要关闭了即可。可是如果是在...

2013-02-18 15:27:15 240

原创一种自动关闭对话框的简单方法

{******************************************************{ { 一种自动关闭对话框的简单方法 ...

2013-02-18 15:26:26 303

原创常用的SQL数据库语句总结

常用的SQL数据库语句总结1、as 的用处 as可以对表和列取别名在开发过程中经常遇到开始给某一个的字段去field1的名称，但后来有感觉field1字段指定不确切，于是又把此字段改成了field2，由于开始认为field1是常量，于是到处使用字符串field1，而且程序中又含有大量对field1的处理，此时就可以使用as例如原来的 select field1 fr...

2013-01-16 09:26:22 171

原创工作笔记（三）

1. 字节一个字节是8位（1Byte=8bit）一个字是两个字节（'你' =2Byte = 16bit）0xA5是16进制数的，也就是0xA5 占一个字节，缝16进一一个字节：0XA5 --> 10100101（8位2进制数）由8421码得到10，5，再转16进制得A5 public const byte H =...

2012-05-28 10:45:22 273

原创工作笔记（二）

1.TreeView 中如何根据 Node名得到index Tv1.Name="节点1";Tv1.Nodes[节点1].Checked = true;// 在遍历的时候就不会引发index下标越界的错误了,特别是多次遍历集合的时候，这样就可以避免越界了，直接根据赋值的Name名称来给Checked赋值；2.移除字符串中的相同字符 string str = "1,22...

2012-05-16 16:05:13 125

工作笔记（一）

1. 窗体开放简单接口一个Form2窗体中定义3个变量，并且拥有get/set 属性，外部程序算法返回的名称直接可以给予赋值，也就是该窗体拥有3个对外开放的接口。Form2:private string _fixedTemp= "算法名"; public string FixedTemp{ get{ return _fixedTemp;} set{fixed...

2012-05-15 08:37:42 126

原创全面介绍 C#Checklistbox用法(转)

本文从6各方面对c#checklistbox用法做详细介绍，他们分别是c#checklistbox的用法的添加项、判断第0项是否选中、设置第0项是否选中、设置全选、得到全部选中的值、数据绑定。1、c#checklistbox用法之添加项： checkedListBox1.Items.Add("蓝色"); checkedListBox1.Items.Add(...

2012-05-11 09:08:50 781

原创 C# 取出ArrayList 中添加的数据模型

在开发中一般会用到三层架构，为的是项目的耦合度。现在我在开发一个DTS系统中也碰到了，因为项目是别人做的，监控系统产生的温度数据都保存在指定格式的数据文件中，而完全脱离了数据库。DataModule，DataAccess，DataCollection 分别存放数据模型对象，访问数据类，数据集合。很久没有做C/S开发，OOP思想已经模糊不清了，所以记录一下，以备不时之需。 deviceI...

2012-04-23 09:10:48 209 1

原创 C# Array和ArrayList区别收藏

C# Array和ArrayList区别收藏一,C# array数组的用法范例:type[] typename=new type[size]; 如int[] a=new int[2];string[] str=new string[5];实事上我们平常是用int[],string[]...的,此时我们已经创建一个Array数组,只不过我们平常没有这种意识而已.(1):ty...

2012-03-09 08:23:09 137

原创程序员喝酒喝出的计算机文化[转]

大家喝的是啤酒。这时你入座了。你给自己倒了杯可乐，这叫低配置。你给自已倒了杯啤酒，这叫标准配置。你给自己倒了杯茶水，这茶的颜色还跟啤酒一样，这叫木马。你给自己倒了杯可乐，还滴了几滴醋，不仅颜色跟啤酒一样，而且不冒热气还有泡泡，这叫超级木马。你的同事给你倒了杯白酒，这叫推荐配置。人到齐了，酒席开始了。你先一个人喝了一小口，这叫单元测试。你跟旁边的人说哥们咱们随意，这...

2012-03-07 16:50:35 135

委托的声明public delegate void MyDelegate(string str);注1.委托的定义和方法的定义类似，只是在前面加了一个delegate,但委托不是方法，它是一种类型。是一种特殊的类型,看成是一种新的对象类型比较好理解。用于对与该委托有相同签名的方法调用。2.委托相当于C++中的函数指针，但它是类型安全的。3.委托是从System.Delegate派生，但不能象定...

2012-03-07 15:29:20 89

原创如何获取GridView的总记录数？

如何获取GridView的总记录数？用GridView.Rows.Count的话获取的只是当前页的记录数,用GridView.PageSize * GridView.PageCount的话，如果最后一页的记录数不是GridView.PageSize条的话，获取的总记录数就不准确。因此，我们要编写代码判断，如下： C#代码 if (GridView...

2011-07-18 10:08:12 150

原创 delphi VCL常用属性

delphi VCL常用属性属性使用范围说明action 一些组件标识与组件相连接的活动对象align 一些组件确定组件在父类组件区内的对齐方式anchors 大部分...

2011-06-21 14:35:48 126

原创 delphi VCL常用方法

begindrag 所有组件开始手工拖动bringtofront 所有组件将组件放在所有其他组件的前面canfocus 所有组件确定组件是否是否接收焦点clienttoscreen ...

2011-06-21 14:34:20 230

原创 Delphi中安装第三方控件

基本安装 1、对于单个控件，Componet-->install component..-->PAS或DCU文件-->install; 2、对于带*.dpk文件的控件包，File-->Open(下拉列表框中选*.dpk)-->install即可； 3、对于带*.bpl文件的控件包，Install Packages-->Add-->b...

2011-06-05 21:03:27 168

原创 Delphi图表控件TChart使用（收藏）

最近开发要使用图表，Delphi里提供了图表开发的控件TChart，可惜帮助里没有DEMO代码，上网搜索了一下，竟然发现文章也少的可怜。没办法，自己丰衣足食，写代码试用，看帮助，读代码，搞了半天大概弄明白了TChart的使用方式，下面写一下几个常见问题的解决。1.如何写一个TChart的Hello World？放一个控件到窗体上，然后写代码加入一个折线数据序列：varSeries: TLine...

2011-05-16 12:01:03 853

原创 Delphi的Socket编程要分几步？(转)

Delphi的Socket编程要分几步？ClientSocket 和ServerSocket几个重要的属性: 1.client和server都有port属性，需要一致才能互相通信 2.client有Address属性,使用时填写对方(server)的IP地址几个重要的事件: client: OnRead事件，当client受到冲击消息时在OnR...

2011-05-16 11:23:58 136

原创 delphi 双进程守护

这是一个关于父亲与儿子的故事：父亲的一生：①生一个儿子。如果儿子被杀了，再生一个！ ②工作。儿子的一生：等着父亲被杀，取而代之（成为父亲）。这则故事已经完整地表达了我想要表达的全部思想，我们可以通过假设“父亲被杀了”或“儿子被杀了”来领会它。废话少说，看源码： program Oliver; uses Windows; procedure WaitForAn...

2011-05-12 17:04:40 513

原创 Win32全局钩子在Delphi下实现的关键技术

2011-05-12 17:02:05 149

原创获取 CPU 使用率

获取 CPU 使用率 unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls, Gauges;type_SYSTEM_PERFORMANCE_INFORMATION = record ...

2011-05-12 16:53:51 114

原创 AcmIn/AcmOut 语音采集

AcmIn/AcmOut 语音采集 unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ACMOut, ACMConvertor, ACMIn;typeTForm1 = class(TForm) ...

2011-05-12 16:53:20 199

原创哥德巴赫猜想的delphi7程序代码

unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm) lbl1: TLabel; lbl2: TLabel; btn1: TB...

2011-05-12 16:52:38 180

原创 Delphi ActionList详解

一个友好的用户界面,必须具有下拉菜单，弹出菜单，工具条和快捷键。同样一个功能，程序员可能要提供几种操作方式，如文本拷贝，菜单命令&Copy,快捷键Ctrl+C,工具条上的拷贝按钮，都是程序员提供给用户的操作，可以大大方便了不同层次的用户。但是，多增加一种操作方式，就意味着增加响应事件的代码，还有，实现统一功能的多个操作必须一致，如剪切板上不为空的时候，菜单命令，快捷键，按钮，都是可以选择的...

2011-05-12 16:51:29 246

原创利用远程线程注入DLL （DELPHI版）

研究外挂3个多月了～发现写一个完整的外挂，注入是少不了的，找了几篇不错的转来～和我一样的新手们可以看看，高手就当复习吧。呵呵。SDK文档里是这样描述的:进程是一个正在运行的程序,它拥有自己的地址空间,拥有自己的代码,数据和其他系统资源.一个进程包含了一个或者多个运行在此进程内的线程. 从定义上看出进程一定要有线程,线程是进程内存中的独立实体. 线程插入技术就是把一个线程弄到别的进程中执行的技术...

2011-05-12 16:50:43 364

原创 Delphi 调用控件的过程，初学者都想知道

假设有过程：procedure TForm1.Button1Click(Sender: TObject);begin ShowMessage('cfeers 你好');end;想在 FormCreate 时候调用，怎么调用？办法是：procedure TForm1.FormCreate(Sender: TObject);begin Button1Click(Sende...

2011-05-12 16:46:00 138

原创格式化数字字符串输出的一个小技巧

我这里分别以VC和Delphi举例：比如想生成 000005,000255 这样的字符串先看VC的: int i=5; CString strOut; strOut.Format("%.6d",i); AfxMessageBox(strOut); i=255; strOut.Format("%.6d",i); AfxMessageBox(strOut);类似的，Del...

2011-05-12 16:42:12 97

存储过程实现日期统计期间

CREATE TABLE [dbo].[t_kjqj] ( [nf] [numeric](4, 0) NOT NULL , [yf] [numeric](4, 0) NOT NULL , [rq1] [smalldatetime] NOT NULL , [rq2] [smalldatetime] NOT NULL , [qybz] [varchar] (1) COLLATE Chinese_PRC...

2011-05-05 16:44:38 324

原创厦门蓝斯通信公司技术博客

博客“ http://blog.csdn.net/wxf0204 GPRS电力远程自动抄表系统解决方案：http://blog.csdn.net/wxf0204/archive/2007/11/01/1861263.aspx

2011-05-04 17:21:26 160

Delphi连接数据库通用方法

DELPHI 连接数据库是个头痛的问题，现在我写了个通用方法，由一个配置工具和一个配置文件实现数据库连接并且可以加密字符串，有需要的留下邮箱，发给你。 1.新建一个窗体,放置5个控件，(TADOConnection的ConnectionString属性不需要指定连接字段)如下： dbgrd1: TDBGrid; ADOConnection: TADOConnection; ...

2011-05-04 17:17:29 715

原创通俗讲解对象和接口(转贴)

最近，还是看到很多人在问对象和接口的问题。我原本以为，这已经不是个问题了，但是现在看来，它还困扰这很多程序员。其实这个问题很简单，举例说明吧：你是一个对象，继承自你的父母，你的gf也是一个对象，继承自她的父母，只有你和你的gf发生关系（比如打kiss）的时候，才会出现接口。这是接口的本质，接口就是一个对象要和另外一个对象发生关系时的协议。很多误导人的书，把接口说成是为了解决...

2011-05-04 15:19:42 78

原创用两种方法快速简单的实现窗口淡入淡出收藏

用两种方法快速简单的实现窗口淡入淡出收藏在应用程序中引入图片淡入及淡出，可以让用户界面更加美观。以前报刊杂志中介绍的常用方法有两种：一是自己写程序，诸个象素进行混合渐变；二是使用DirectX，建立一个带Alpha通道的Surface。第一种，效果可以自己控制，但比较麻烦，而且一般不容易生成硬件优化的代码；第二种速度很快，却需要使用DirectX库。本文结合Delphi实例代码...

2011-05-04 15:16:25 203

原创如何让控件在编译时，自动添加所需的单元

在开发控件的时候，常会类似碰到这样的情况：我某个方法或事件的参数的类型，并不在Delphi默认添加的单元中，如果此时直接编译，必然会报错。但是让用户逐个把所需的单元添加回来，又显然太麻烦了，甚至用户也不知道该添加哪些单元。有没有办法让它自动化一点，在编译时，让控件自动给单元添加所需的单元呢？答案是肯定的。　首先引用DesignEditors和DesignIntf单元。然后在控件单元，编写一个继承自...

2011-05-04 14:47:40 86

原创从业务流程角度理解面向服务的概念

从业务流程角度理解面向服务的概念【2005-08-30 15:29】【】【计世网】　　SOA，目前在IT领域的热门主题“面向服务的架构”，Service Oriented Architectures。SOA的概念来自于web服务，由于web服务概念的出现及相关应用系统的实施，SOA架构成为新的web服务模式。从本质上讲，SOA的概念是很简单的。与传统的端到端的企业应用系统...

2011-05-04 14:42:51 131

原创业务流程管理综述

业务流程管理综述 TJDLUT 摘要：业务流程管理包括支持业务过程分析、设计、执行、管理的方法、技术及工具。它可以被看作是经典工作流管理系统和方法的扩展。本文主要介绍业务流程管理的基本概念、相关技术，以及讨论形式化方法/语言对业务流程管理的作用（例如Petri网，过程代数等）。关键词：业务流程管理工作流管理形式化方法引言首先了解一下信息技术演化的过程是有助于我们地更好的了...

2011-05-04 14:42:21 455

原创如何写CRM需求——客户服务管理篇

如何写CRM需求——客户服务管理篇转载 CTI 论坛　　在评估、选购CRM软件前，企业应该整理本单位的需求。需求整理涉及观察、调研、分析、讨论、撰写、修改和确定等阶段。笔者不打算对上述过程的每个步骤提供详细示范。笔者的目的是提供一个比较全面、但相对概括的视角，帮助企业中的CRM选型负责人可以尽快地明确需求的边界，结合本企业的特征选定正确的方向，快速完成CRM需求整理工作。这一系...

2011-05-04 14:41:29 1015

原创我在delphi7下调用微软的Web Services的心得.(可以返回数据集)

操作步骤如下：1、在VS.2003下编写WebServices，代码如下： 1 [WebMethod] 2 public string HelloWorld() 3 { 4 return "Hello World"; 5 } 6 7 [WebMethod] 8 pu...

2011-05-04 14:34:21 145

原创 DELPHI基础开发技巧

DELPHI基础开发技巧◇[DELPHI]网络邻居复制文件uses shellapi;copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false);◇[DELPHI]产生鼠标拖动效果通过MouseMove事件、DragOver事件、EndDrag事件实现,例如在PANEL上的LABEL:var x...

2011-05-03 11:25:29 282

原创人生的34个好习惯，共勉

1. 不说“不可能”三个字。2. 凡事第一反应：找方法，而不是找借口。3. 遇到挫折对自己大声说：太棒了! 　4. 不说消极的话，不落入消极情绪，一旦出现立即正面处理。5. 凡事先订立目标，并且尽量制作“梦想版”。6. 凡事预先作计划，尽量将目标视觉化。7. 工作时间。每一分，每一秒都做有利于生产的事情。8. 随时用零碎的时间(如等人、排队等)做零碎的事情。9. 守时。10. 写下来，不要太依靠脑...

2011-05-03 11:18:14 71

原创 Delphi6函数大全

Delphi6函数大全（1） <<Delphi6函数大全1-StrUtils.pas>> 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas功能返回两个字符串是否相似说明 ANSI(American National Standards Instit...

2011-05-03 11:08:49 128

原创浅谈Object Pascal的指针

大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时，这种说法也让很多人产生误解，似乎只有C语言的指针才能算指针。Basic不支持指针，在此不论。其实，Pascal语言本身也是支持指针的。从最初的Pascal发展至今的Object Pascal，可以说在指针运用上，丝毫不会逊色于C语言的指针。以下内容分为八个部分...

2011-05-03 10:36:03 68

空空如也

空空如也