delphi
文章平均质量分 60
dainiao01
探索
展开
-
Delphi for Linux中应用共享对象库
本文用通俗易懂的语言介绍Linux平台上共享对象库(SO)的基本概念及主要优点,通过剖析在Delphi for Linux中应用SO与在Delphi for Windows中应用DLL的异同,以编程实例讲述了Linux平台的SO库文件的组成、SO库文件的函数重载、特殊编译指令、采用Delphi for Linux创建SO的编程规则、使用前的Linux系统设置,以及在Delphi for Linux原创 2008-04-20 16:13:00 · 789 阅读 · 0 评论 -
在DELPHI程序中注册OLE/COM控件
在DELPHI程序中注册OLE/COM控件 在用DELPHI编写程序时,充分利用他人的成果无疑是一条捷径。我们用的控件有的是带源码 的PAS文件,有的是DCU/OBJ文件;而OLE/COM控件也是不可缺少的,由于OLE/COM 控件不仅可以由DELPHI开发,还可由VB、VC、PB等其它编程语言开发,因而它可以使我们的 DELPHI应用程序功能更为强大,例如用一转载 2009-02-17 10:59:00 · 2060 阅读 · 0 评论 -
Delphi下检查SQL Server服务器当前运行状态!
Delphi下检查SQL Server服务器当前运行状态!要求:Delphi下随时监控SQL Server状态。1、命令提示符下可用:TELNET 1433 检查。2、Delphi下如何模拟实现上述功能。----------原来做过:function GetSqlServerStatus(lpszComputerName: LPCTSTR): Integer;var ssStatus: SE转载 2009-02-17 08:50:00 · 3186 阅读 · 0 评论 -
对NT服务型程序的控制代码。如安装服务、启动、停止服务、取服务状态等。
{******************************************************************************* XOtecExpress Visual Component Library Copyright (c) 2008 XOtec Studio. By: PengJunLi Build: 2008-05-24 E-mail: ii转载 2009-02-17 08:36:00 · 1327 阅读 · 0 评论 -
学用Delphi之2:痛苦的NT Service Control App
一个NT服务的控制程序,意思就是说要用它来控制一个NT服务的安装、启动、停止、卸载这四个状态,它的过程是: 1、先要打开系统的服务管理器(取得管理NT服务的权限); 2、打开需要控制的NT服务(获得控制权); 3、对该服务进行控制。 做法是: 一、使用 OpenSCManager打开本地默认的服务管理器。(用到这些API的时候,要先在USES中加入“winsvc原创 2009-02-17 08:32:00 · 879 阅读 · 0 评论 -
Delphi 调用C#编写的WebService 参数为Null解决方法
今天测试.net 2.0的WebService,发现了一个大问题。就是无法获取参数,参数永远是null。当然了使用.net调用 没有任何问题,web测试页也正常。不论是Delphi7还是java调用的结果的都是一样的,难道是.net 2.0的Bug?测试结果发现:值类型参数全部为缺省值,引用类型全部为null 在不断尝试中发现vs2003生成的web Services,delp转载 2009-02-11 11:23:00 · 3273 阅读 · 2 评论 -
添加window服务,修改安装目标文件夹的权限(ntfs)
////////////////////////////////////////////////////////////////////////////////////////////////////////function Modify_FolderPermission()string sBatFile;sCmdLine ;begin sBatFile = SUPPORTDIR^"modi转载 2008-10-16 19:43:00 · 2246 阅读 · 0 评论 -
delphi编程中在状态栏动态添加进度条
1.在Delphi 5中通过菜单“File/New Application”创建一个新的工程。 2.在窗体中添加一个状态栏组件StatusBar1,一个Button组件Button1。在状态栏编辑器中为状态栏添加两个显示面板,因为后面将要在第二个面板中显示进度条,所以将第二个面板的Style属性设置为psOwnerDraw。将Button1组件的Caption属性设置为“演示操作”。转载 2008-09-22 11:50:00 · 1327 阅读 · 0 评论 -
Exit和Abort有什么区别和联系
Exit 是跳出当前代码块,也就是当前函数,跳出后是要继续向下执行的(如果有后续代码)。Abort 是从 EAbort 过来的,可以激发 exception,其实质就是 Abort = RaiseException(),是一个不出现对话框的异常。所以 Abort 的行为和异常是一样的,其代码执行顺序也是follow异常的流程。例如:try (1) //执行了 abort; (2) //不执转载 2008-07-24 10:15:00 · 972 阅读 · 0 评论 -
TclientSocket和TserverSocket用法
ClientSocket组件为客户端组件。它是通信的请求方,也就是说,它是主动地与服务器端建立连接。 ServerSocket组件为服务器端组件。它是通信的响应方,也就是说,它的动作是监听以及被动接受客户端的连接请求,并对请求进行回复。 ServerSocket组件可以同时接受一个或多个ClientSocket组件的连接请求,并与每个ClientSocket组件建立单独的转载 2008-07-23 09:57:00 · 6177 阅读 · 0 评论 -
如何让Listview(vsReport)选中的一行字体变色或底色改变
如何让Listview(vsReport)选中的一行字体变色或底色改变?把属性HideSelection设为false就可以得到你的想要的效果!奇偶颜色不同 procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView; Item: TListItem; State: TCustomDrawState; var DefaultD转载 2008-07-22 15:29:00 · 2823 阅读 · 1 评论 -
TStringList 常用方法与属性
TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; List.Add(Strings1); {添加} List.Add(Strings2); List.Exchange(0,1); {置换} List.Inse转载 2008-07-21 12:57:00 · 568 阅读 · 0 评论 -
delphi运行问题,解决办法
有时候Delphi会出现这个问题,解决的办法如下原因:因为多个delphi同时更因为多个delphi同时更新"C:/Documents and Settings/用户名称/.borland"中的一个或多个文件造成文件破坏(也可能是其他原因导致文件破坏)。解决的办法:就是删除该目录下的文件,就可以了。原创 2008-04-27 10:42:00 · 561 阅读 · 0 评论 -
delphi 7 分隔字符串(完整实例)
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TResultArray = array of string;type TForm1 = class(TForm) Button1: TBu原创 2008-04-27 10:42:00 · 2343 阅读 · 2 评论 -
File not found:'*.dcu'解决办法
解决方法:在Delphi工具栏中打开 Tools->Environment Options: 然后在Library选项卡中的Library Path中加入该控件的路径,也就是含有这个文件(*.dcu)的路径,就可以了。原创 2009-02-19 18:04:00 · 16132 阅读 · 0 评论