- 博客(406)
- 资源 (34)
- 收藏
- 关注
转载 Delphi 编写调用WebService接口的小程序
Delphi 编写调用WebService接口的小程序最近由于项目需要在编写一个webservice的客户端,网上找来了不少资料,都说可以通过delphi自带的向导来生成调用接口的文件。如对天气预报的webservice调用http://www.webxml.com.cn/WebServices/WeatherWebService.asmx?wsdl ,查看各地的天气预报1、打开delphi开发软件到 File--> New--> Application 新建一个工程,在窗体上放置两个
2022-01-01 01:00:40 1961
转载 cxGrid内容xlsx、xls、csv格式导出
.xls格式导出,uses中添加cxGridExportLink代码如下: 1 function SaveToExcel(gridMain: TcxGrid; FileName: string): string; 2 var 3 SaveFileDialog: TSaveDialog; 4 begin 5 //示例:SaveToExcel(dxDBGrid1,'默认文件名'); 6 SaveFileDialog := TSaveDialog.Create(nil)
2021-10-21 08:36:01 1108
转载 Delphi多线程编程基础入门
1. 概述 对于开发人员来说,多线程是必备的知识,但相对来说,也是比较难的知识点。Delphi是一门古老而优秀的编程语言,它对多线程的处理有一些特殊的地方,本文尝试做一些简单的讲解,可以当作Delphi的多线程基础入门知识来阅读。如无特殊说明,所有例子都在XP操作系统中和Delphi7中调试通过。2. 一个简单的例子 在这一节中,我们将建立一个极为简单的例子,阐述Delphi中多线程的用法。2.1 实现步骤 第一步:在Delphi7 I...
2021-06-01 18:18:29 4389 1
原创 Delphi 多线程传递参数的问题
unit uThread;interfaceuses Classes;type Th = class(TThread) private { Private declarations } protected procedure Execute; override; end;以上是创建的一个多线程我在另外一个单元里Unit1有一个函数function Myfun(username,password:string):boolean现在要.
2021-06-01 17:38:59 564
原创 DBGRIDEH 关闭editbuttonclick选择后弹出窗体
在官网找到解决方法,修改DBAxisGridsEh单元procedureTDBAxisGridEhCenter.EditButtonDefaultActionText(Grid:TCustomDBAxisGridEh;AxisBar:TAxisBarEh;EditControl:TControl;EditButton:TEditButtonEh;EditButtonControl:TEditButtonControlEh;IsMouseDown:Boolean;va...
2020-08-11 15:25:39 804
原创 fastreport 总结
1.FastReport中如果访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject(’memo1′)).Text:=’FastReport’;2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags := True;在Text输入如下上标:mm<sup>2</s...
2020-03-08 00:09:01 1030
原创 Exchange 2010输入序列号方式
使用输入产品密钥向导可为运行 Microsoft Exchange Server 2010 但是尚未配置产品密钥的服务器输入产品密钥。安装 Exchange 2010 后,它还未经许可。这也称为试用版。试用版在自安装之日起的 120 天后过期。未经认证的服务器作为 Exchange 标准版服务器使用,但是不符合由 Microsoft 支持服务提供支持的要求。启动 Exchange 管理控制台时...
2018-12-19 09:28:36 1777
转载 关于XE8开发安卓手机硬件
准备工作一些比较有用的声明大小写转换: function ToLower: string; function ToLower(LocaleID: TLocaleID): string; function ToLowerInvariant: string; function ToUpper: string; function ToUpper(LocaleID: TL
2017-11-17 11:14:02 1363
转载 Delphi 调用BarTender打印条码
方法一:使用Delphi调用BarTender打印条码,在网上搜索了一下,很多都是介绍导入ActiveX组件,其实完全没有必要。用OLE控件完全可以解决。但需要注意所使用的BarTender必须是正式的安装版(PS:破解版好像也可以),试用版和绿色版都不可以二次开发。下面是测试通过的列子:(需要引用ComObj.Pas文件)直接写代码:procedure TForm1.
2017-09-22 08:28:29 3316
转载 放置任意的文件到Delphi的EXE文件里面
通常在Delphi的应用程序中,我们会调用到很多的资源,例如图片,动画(AVI),声音,甚至于别的执行文件。当然,把这些资源分布到不同的目录不失为一个好办法,但是有没有可能把这些资源编译成标准的资源从而链接到一个执行文件里面呢?我们可以自己做一个RC文件,例如 sample.rc ,RC文件其实就是一个资源文件的描述文本,通过“记事本”程序创建就行了。然后可以输入一些我们要定义的资源,例如
2017-05-18 16:03:18 1988
原创 华视cvr-100UC 二代身份证读卡通用函数
本方法只针对的是华视cvr-100UC 二代身份证读卡。只是写了主要的部分,可以把函数等放入公共文件中,引用,调用即可。剩下的自己琢磨吧!先定义个机构: TPsnMsg = record PeoName: string; //姓名 PeoSex: string; //性别 PeoFolk:
2017-04-20 10:51:32 8768 3
原创 守护进程-----杀死自己的进程再重新启动自己
全部源代码如下(无窗体结构,最后面有说明):program Project1;usesWinprocs,SysUtils,Tlhelp32;//注意添加单元文件function KillTask(ExeFileName:string):integer;//杀进程函数KillTaskconst PROCESS_TERMINATE = $0001;
2016-01-21 11:40:07 6213
原创 Delphi使用JSON
JSON(JavaScript Object Notation) 是一种轻量级的数据交换格式。易于人阅读和编写,同时也易于机器解析和生成。它基于JavaScript(Standard ECMA-262 3rd Edition - December 1999)的一个子集。 JSON采用完全独立于语言的文本格式,但是也使用了类似于C语言家族的习惯(包括C, C++, C#, Java, JavaScr
2016-01-21 11:36:19 7518
原创 delphi文件操作
Delphi中默认有input和output两个文件变量,使用可以不用定义,直接使用. 但: input:只读、output:只写。用时注意以免引起异常. 文件是由文件名标识的一组数据的集合,文件通常存放在磁盘上。源程序、学生档案记录、图形、音乐等均可以作为文件存储在磁盘上。操作系统是以文件为单位对数据进行管理的,也就是说,如果想读取外存介质上的数据,必须先按文件名找到所指定
2016-01-21 11:29:23 2329
转载 某软件圣天诺加密狗破解过程
这个软件是用圣天诺狗来加密的,当软件没有检测到加密狗时,则需要注册它。好,我们看看怎么样来破解它。 工具:trw2000 软件在运行时,如果没有狗,则会跳出一个需要注册的对话框,而且也是用动态注册的方法,如果注册码不正确register按钮是灰色的。这类软件一般用断点bpx hmemcpy,今天我们用另外的断点来破它,用什么断点呢?想一下要取得对话框的数据要用到什么函数,对了
2015-11-28 08:50:04 15203
原创 EhLib控件使用---DBGrideh实现自动排序
1.在optioneh中设置:AutosortMarking:=True2.设置DbGridEh的属性:(不一定总要设置,与使用的数据连接有关)sortlocal:=True;3.uses 单元Ado------ehlibADoTclientData------ehlibCDSBDE ---------ehlibBDE4.Column属性TitleB
2015-11-17 13:23:42 1810
转载 EhLib控件使用技巧 --DBGridEh自动过滤
DBGridEh 可以为你提供一个更加美观和功能丰富的 DBGird,比如平面化显示、奇偶行不同颜色(斑马线)、快速查找、合计行、Grid 打印等。在 Ehlib 的后期版本中,还提供了一个非常强大的过滤功能,他会在 DBGrid 的表头下方显示一个过滤行,用户在此行的相应列中输入查询条件,DBGridEh 可以自动为您筛选出所需要的数据。下图所示即为启用过滤功能后的 DBGridEh:
2015-11-17 00:02:12 5204
转载 用DELPHI工具编制开发生成二维条码
转自: http://jingyan.baidu.com/article/e75057f2ad6481ebc81a897b.html我们在DELPHI程序中,如何生成PDF417或QR_Code二维条码呢?针对EnCodePdf.dll (PDF417二维码生成库),EnCodeQr.dll (Qr_Code二维码生成库)两个库,实现DELPHI开发的具体步骤如下:工具/原
2015-09-12 23:40:19 7562
原创 Delphi调用C#写的webservice
Delphi调用C#写的webservice用delphi的THTTPRIO控件调用了c#写的webservice。下面是我调试时遇到的一些问题:1:导入wsdl文件:file--new----other----webservice---WSDLimporter---输入wsdl地址:如下:http://127.0.0.1/ WebService/WebServiceCall.a
2015-09-12 22:11:09 3548
转载 Exchange server 2010配置禁止发送空主题的
一、 问题与需求阐述:1.在很多企业中,部分用户在发邮件时并没有形成良好的习惯,某些时候在发送邮件时不填写主题,造成收件人在查看邮件时产生不必要的影响;2.因此邮件管理员希望用户在发送空主题邮件时,系统会直接向发件人退信,并告知他/她,空主题邮件不允许发送,必须添加主题后再发送;二、目标:不允许Exchange用户发送空主题邮件,当其发送空主题邮件时系统将会退信。实现此配置
2015-06-15 11:01:07 3189
原创 RAID 0+1硬盘阵列组建图解及RAID 0+1和1+0的区别
经常有人来文RAID,只其然而不知其所以染,今天我就以网吧为例讲解下。随着网吧规模扩大,网吧电脑数量也会相应增加,上网的顾客也随之增多,服务器硬盘数据存取的速度将会成为新的瓶颈,很多顾客开始投诉服务器点播的电影比较卡、游戏升级速度慢等问题,倘若不采取相关措施,那么好不容易扩大的经营将毁于一旦。 那么如何解决硬盘存取速度的瓶颈呢?用多个硬盘组建RAID阵列将是一个较佳的解决方案。然而许
2015-05-05 15:50:35 8686
原创 我喜欢出发
我喜欢出发。 凡是到达了的地方,都属于昨天。哪怕那山再青,那水再秀,那风再温柔。太深的流连便成了一种羁绊,绊住的不仅有双脚,还有未来。 怎么能不喜欢出发呢?没见过大山的巍峨,真是遗憾;见了大山的巍峨没见过大海的浩瀚仍然遗憾;见了大海的浩瀚没见过大漠的广袤,依旧遗憾;见了大漠的广袤没见过森林的神秘,还是遗憾。世界上有不绝的风景,我有不老的心情。 我自然知道,大山有坎坷,
2015-04-28 09:07:58 1394 4
转载 实现OWA 2010通过短信方式发送邮件提醒功能
前言对Exchange Server 2010有过了解的朋友应该知道,在Outlook Web App中可以通过短信方式发送邮件提醒到您的手机,如图1所示。不过可惜的是不支持中国的移动运营商,既没有中国移动、中国联通,也没有中国电信。本文就和大家分享一下如何让OWA支持这中国移动。(其他运营商手机也能变通支持)邮件短信通知的原理在开始之前,我们先了解一点点原理知识,以便我们更好
2015-04-22 16:12:23 3479
转载 Exchange2010利用传输规则由部门经理仲裁限制越级发送邮件
继续我的Exchange2010实验,在高金良老师的微软广播中看到了如下实验,可以利用Exchange2010的UHB角色上的传输规则控制企业内部员工越级发送邮件,当然还可以利用传输控制规则,对邮件中的关键字进行感知和控制。这是我今天控制越级发送邮件,经理仲裁的实验的截图,和大家分享。 1、在EMC控制台上,进入收件人配置---邮箱这个选项 2、右键编辑用户TOM的属性 3、切
2015-04-18 16:31:23 3047
原创 Exchange2010日志过大解决方案
因为Windows Server 2008 上面提供了Windows Server Backup 功能,也能解决现在的日志问题。 一、 安装Windows Server Backup 。 新装的系统是不自带这个功能的,需要自行添加。 1、 点击任务栏上的服务器管理,或右键点击计算机管理。 2、 在弹出的界面左边右键点击功能选项,选择添加功能。 3、 在出现的
2015-04-14 12:59:27 4931
原创 配置exchange2010邮箱和邮件大小限制
配置邮箱和邮件大小限制A、邮箱大小设置emc---组织配置---双击mailboxdatabase---限制邮箱大小默认限制为2.4g,当大小超过1.99g的时候会发出警告,超过2.09g时限制发送,超过2.4g时禁止接受 B、传输单个邮件大小的限制。单个文件的大小受到两种限制,首先是客户端outlook上面的限制,邮件中的附件总大小受到服务器的限制,但是邮件中的一个附件的大小
2015-02-08 17:47:11 11009
原创 在Exchange 2010中批量导入用户
在某一个项目中,客户需要将2000多个联系人导入到Exchange 2010中,作为外部邮件联系人对MAPI连接的用户可见,而且要划分到特定的地址簿中去。客户提供excel列表以便导入使用。 由于导入操作需要使用CSV格式文件,所以要预先将excel修改。打开excel,然后将文件另存为CSV后缀的即可。需要注意的是,另存为只对单个工作区起作用。 导入操作对CSV文
2015-02-08 13:15:20 3391
原创 Delphi DBGrid双击事件、单元格操作
1、得到当前格子中的内容: DBGrid1.Fields[DBGrid1.SelectedIndex].DisplayText; 把DBGrid1.SelectedIndex改为你所希望引用的字段就可以了,如第3个字段。 DBGrid1.Fields[3].DisplayText;2、双击单元格触发不同事件procedure TMainFrm.DBGrid1DblClick(s
2014-12-13 13:27:05 9521 3
转载 有一种毒药叫成功---成功学的泛滥与迷失
2007年8月20日 09:07 新周刊 现代社会有三粒毒药:消费主义、性自由和成功学。 消费主义以品牌为噱头,以时尚为药效,将人卷入无休止的购买与淘汰的恶性循环中,恋物成瘾; 性自由以人性为噱头,以性爱为药效,不断释放暧昧与激情的烟幕弹,纵欲成瘾; 成功学以速成为噱头,以名利为药效,误导急于走捷径成为人上人的年轻人投身其中,
2014-12-08 11:21:57 2300 1
转载 《我要飞,永远都不会累 》---伤感留言
转自:http://bbs.astro.qq.com/t-209191-1.htm就要分东西,从此不在有关系,留在这里的记忆在也抹不去。想说再见,却回首从前,想挥一挥衣袖,作别这里的云彩,无奈手未举,泪欲流。默然的转身,静静的离去,云彩和着无声的告别,眼泪裹着依依的不舍。人依旧,物依旧,情依旧,心难留。 三年前,窘迫的我闯进了你的怀抱,那时的你羽翼未丰,可你却无比热情的接纳了我,并且
2014-12-06 13:23:52 1131
转载 当你想放弃时,一定要看看这个漫画!
这篇东西转自一位有思想的研究生!她看到这篇漫画,觉得很不错,我看后也觉得值得我们思考,尤其是当我们抱怨时!第一幅漫画中,每个人都背负着一个沉重的十字架,在缓慢而艰难地前行!途中,有一个人忽然停了下来。他在想着什么!他想,上帝啊,这个十字架太沉重了,我可以把十字架砍掉一块!于是他动手砍
2014-12-04 15:52:53 1489
转载 博士后、小工与制造业转型---深度解读
有一个关于博士后和农民工的故事流传很久,其大意是:某跨国企业引进了一条香皂包装生产线,结果发现这条生产线有个缺陷。这个缺陷就是常常有盒子没有装入肥皂。总不能把空盒子卖给顾客啊,他们只得请了一个学自动化的博士后设计一个方案来分拣空的香皂盒。博士后组成了攻关组,采取多学科联合的方法,花费了90万设计出了方案,每当生产线上有空香皂盒通过,两旁的探测器会检测到,并且驱动一只机械手把空皂盒推走。而国内一家小
2014-12-03 13:22:47 1793
原创 易飞ERP客户问题集合之一
导读:若不为空则抓取得是录入科目/部门限制里单身的部门区间,客户的科目没有做部门管理自,【问题】录入采购发票,【问题】应付子系统中税控接口在哪儿?,【问题】应收账款实时核销怎么处理?,【问题】损益结转后生成的凭证无法反过账,客户将其设置成别的凭证单别后,【问题】录入报表格式中%项都改为%了,【问题】资产负债表直接查询资产总计及负债和所有者权益或股东权益总计都跑到中间行显,
2014-12-03 13:03:37 12314
转载 exchange2010 报 “0x8004010f 操作失败,找不到某个对象
故障现象:在Outlook 2003 SP2和Outlook 2007 SP1中按“F9”或者点击“发送/接收”后,报”0x8004010f,操作失败,找不到某个对象“错误。环境描述:1. Exchange Server 2010;2. DC / Mailbox / CAS &Hub 角色均位于不同服务器;3. Outlook客户端使用”缓存“模式。4. Exchang
2014-12-02 11:14:51 10089
转载 Exchange Server2010系列之六:监控用户邮件
在某些场合下,企业领导可能会要求管理员监控一些特殊用户的往来邮件信息,虽然做法有点不地道,但有领导的要求还是要实现。Exchange Server2010提供了两种模式去监控用户的邮箱信息,一种是利用日志规则实现,另一种是利用传输规则实现。两种方法略有差异,利用日志规则监控用户邮箱时,被监控用户收发邮件的内容将作为一封附件发送给监控者。利用传输规则实现此功能时,是将原邮件以密件抄送的方式发送给监控
2014-11-29 13:18:32 4939
原创 Exchange2010 SMTP错误码/解决方法列表
错误总表4201. Timeout Communication Problem Encountered During Transmission. Thie Is a Novell Groupwise Smtp Error 2. Tcp Read Error 3. Tcp Write Error在联机时发生通讯中断的问题;Novell GroupWise SMTP服务
2014-11-27 17:27:49 9303
转载 Exchange 2003 升级到Exchange 2010 设置OWA和网页重定向!
1. 默认的OWA登陆方式是表单登陆,而且登陆的的名称是基于 域名\用户名 方式。为了便于我们的用户比较方便的使用Exchange OWA,我们只需要调整相关的设定即可,设定请见下面截图:2. 默认来说POP3使用的是加密的端口:995,我们如果想修改为非加密的端口,我们则需要对POP3服务进行下设定:3. 由于POP3 默认服务未启动,我们需要将相应的服
2014-11-27 12:01:16 1355
转载 彻底删除Exchange Server 2010
安装Exchange Server 2010到是轻车熟路,本以为卸载也是一件蛮轻松简单的事情,可没想到在检测先决条件的时候跳出一堆错误从控制面板程序中直接卸载Exchange Server 2010,错误如下图,无法卸载邮箱数据库BJDB这里要求我先删除掉边缘订阅下面一步一步来解决吧第二个错误比较好解决,由于我的环境中存在边缘服务器,删除掉边缘订阅就是了打开EMC控制台
2014-11-26 13:47:34 6498
二维码生成动态库
2015-09-12
phpStudy2014
2014-06-29
短信控件smscontrol
2013-12-13
原型设计工具Mockups_2.2.rar
2013-09-05
extjs_4.1.0_portal_demo
2013-05-23
Extjs4.0.7_desktop基础搭建
2012-11-06
RDLC使用说明
2012-10-29
RDLC的reportviewer教程
2012-10-29
SAP_DotNetConnector3
2012-10-29
word和Excel密码破解工具
2012-10-29
fastReport.v4.5.rar
2012-10-29
fastreport快速报表系统4用户使用手册
2012-10-22
2BizBox简易操作流程
2012-10-20
2BizBox免费ERP自实施指南
2012-10-20
SAP Query 的定义使用
2012-09-19
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人