张志峰的博客

水滴石川,积少成多。

导航

2013年5月24日

摘要: Delphi Excel导入 的通用程序 .分类: delphi 2012-09-24 18:20 257人阅读 评论(0) 收藏 举报 exceldelphiinteger数据库c步骤:1 连excel(自己知道其格式,最好是没个字段在数据一一对应)2 读excel数据,填入到数据库我这里有个函数,实现把excel表格中数据导入数据库,在一条数据导入前判断数据库中是否有该数据,如果有,就不再导入该数据(避免重复),你可以参考下procedure TForm_qyxxcx.BitBtn2Click(Sender: TObject);VAR I,J:INTEGER; col,row:intege 阅读全文

posted @ 2013-05-24 13:54 ╰★张志峰★╮ 阅读(5257) 评论(0) 推荐(0) 编辑

摘要: Delphi Excel导入 的通用程序 .分类: delphi 2012-09-24 18:19 127人阅读 评论(0) 收藏 举报 exceldelphiintegerprocedure TForm1.btnClick(Sender: TObject);begin OpenDialog1.Title := '请选择正确的excel文件'; OpenDialog1.Filter := 'Excel(*.xls)|*.xls'; if OpenDialog1.Execute then edit1.Text := OpenDialog1.FileName;end 阅读全文

posted @ 2013-05-24 13:52 ╰★张志峰★╮ 阅读(2850) 评论(0) 推荐(0) 编辑

摘要: delphi程序只允许运行一个实例的三种方法:一、 创建互斥对象 在工程project1.dpr中创建互斥对象Program project1UsesWindows,Form,FrmMain in 'FrmMain.pas' {MainForm}; {$R *.res} var hAppMutex: THandle; //声明互斥变量 begin hAppMutex := CreateMutex(nil, false,’projectname’); //创建互斥对象projectname工程名称 if ( (hAppMutex <> 0) and (GetLastE 阅读全文

posted @ 2013-05-24 13:50 ╰★张志峰★╮ 阅读(848) 评论(0) 推荐(1) 编辑

摘要: 2011-08-30 18:28 85人阅读 评论(0) 收藏 举报string测试c代码从csdn复制,未做测试view sourceprint?public static class ChineseNumberUtil { /// <summary> /// 将中文数字转换成阿拉伯数字 /// </summary> /// <param name="cnNumber"></param> /// <returns></returns> static int ConverToDigit(string c 阅读全文

posted @ 2013-05-24 13:47 ╰★张志峰★╮ 阅读(1845) 评论(0) 推荐(0) 编辑

摘要: WebService常用功能讲解(原创:灰灰虫的家http://hi.baidu.com/grayworm)一、WebService中常用的属性(Attributes)1. Web Service(Web服务)提供以下三个属性。 Namespace:此属性的值包含 XML Web Service的默认命名空间。XML命名空间提供了一种在XML文档中创建名称的方法,该名称可由统一资源标识符(URI)标识。如果不指定命名空间,则使用默认命名空间 http://tempuri.org/。 Name:此属性的值包含XML Web Service的名称。在默认情况下,该值是实现XML Web Serv. 阅读全文

posted @ 2013-05-24 13:44 ╰★张志峰★╮ 阅读(803) 评论(0) 推荐(0) 编辑

摘要: delphi调用WEBservice 客户端程序由delphi6开发,WEB SERVICE是VS2005(C#)写的。碰到的问题很多,大都GOOGLE都可以找到答案。但有些我还是重复一下,另外我碰到的一些问题也在这里备注一下。刚开始是在Delphi6+sp1的环境下开发客户端程序,会出现Internal error(500)的错误或调用的web service的命名空间不正确,无法正确解析。解决办法是在用wsdl importer工具生成的代理类中插入以下两句话:? InvRegistry.RegisterDefaultSOAPAction(TypeInfo(ServiceSoap), &# 阅读全文

posted @ 2013-05-24 13:39 ╰★张志峰★╮ 阅读(2164) 评论(0) 推荐(0) 编辑

摘要: Delphi7快速调用C#做的web services 2011-08-29 20:19 494人阅读 评论(1) 收藏 举报delphic#webwebservicebuttonservice怎么实现不同平台之间的webservice?下面是我用Delphi7调用C#做的web services的过程:(1),在vs2005新建asp.net web服务,系统自动生成一个返回字符串("helloworld")的服务。(2)打开delphi7,新建一个工程,保存,再打开File||New||Other||Webservices||WSDLImporter,按照步骤新建一个S 阅读全文

posted @ 2013-05-24 13:38 ╰★张志峰★╮ 阅读(647) 评论(0) 推荐(0) 编辑

摘要: webservicedelphic#dllintegerinitialization转自:http://www.cnblogs.com/jdmei520/archive/2009/06/17/1505053.htmlWebservice技术的出现将各种开发技术和语言完全的融合了,下面就这种融合在C#和delphi之间的交互做一次全面的体现1.使用C#创建一个Webservice服务。 使用vs2005的模板创建C#的webservice非常容易。原文件如下: [WebService(Namespace = "http://localhost/webserver/")] [W 阅读全文

posted @ 2013-05-24 13:36 ╰★张志峰★╮ 阅读(1311) 评论(0) 推荐(0) 编辑

摘要: 所属分类:.NET技术 Web Services----------------------------------------------------------------------服务端: public NetDiskWebSrv () { //如果使用设计的组件,请取消注释以下行 //InitializeComponent(); } [WebMethod] public string HelloWorld() { return "Hello World"; } [WebMethod] public void RegistServerInfo(string GUID 阅读全文

posted @ 2013-05-24 13:34 ╰★张志峰★╮ 阅读(800) 评论(0) 推荐(0) 编辑

摘要: delphiwebserviceserviceweb程序开发手机本文通过使用Delphi和Web Services技术开发短信应用程序的实例详细的介绍了如何在Delphi中开发基于Web Services技术的应用程序。 关键字:Delphi;Web Service;短信应用程序开发 一提起基于Web Services技术的应用程序开发,一般人首先想到的开发工具是Vs.net,其实作为快速应用程序开发工具(RAD)的老大,Delphi从6.0就开始支持Web Services的开发和应用了,本文通过使用Delphi 7.0调用新浪发送短信的Web Service进行短信应用程序开发这一... 阅读全文

posted @ 2013-05-24 13:32 ╰★张志峰★╮ 阅读(512) 评论(0) 推荐(0) 编辑

摘要: Delphi开发Web Service初探(转)简介:“网络就是计算机,软件就是服务”的思想已经逐步深入人心。由于Web Services能够通过网络把服务直接递送给终端用户,而且由众多主流厂商所支持和描绘的美好前景也让我们心动不已。据有关报告预计,2002年多数企业将会对于Web服务产生关心。另外,在2004年Fortune 2000家企业引进的应用软件解决方案之中,Web服务将占很大的比重。最近,关于如何建立Web Service的文章较多,但大多是用VS.NET完成的,而关于如何用Delphi 6开发的文章较少。本文介绍了一个用Delphi 6开发Web Service的简单的例子,以达 阅读全文

posted @ 2013-05-24 11:03 ╰★张志峰★╮ 阅读(879) 评论(0) 推荐(0) 编辑

摘要: Delphi实现WebService带身份认证的数据传输WebService使得不同开发工具开发出来的程序可以在网络连通的环境下相互通信,它最大的特点就是标准化(基于XML的一系列标准)带来的跨平台、跨开发工具的通用性,基于HTTP带来的畅通无阻的能力(跨越防火墙)。WebService给我们的软件开发带来了诸多好处,但是有一点还是必须要考虑到的,那就是安全问题。提供Service的一方要控制用户的限制访问,就要对来访的用户进行身份验证。验证成功则继续提供服务,否则就触发无权访问的异常,返回给客户。那么现在我们要解决的问题是这样的:用户的身份认证信息如何在调用主要服务前发送到服务方,从而进行验 阅读全文

posted @ 2013-05-24 10:30 ╰★张志峰★╮ 阅读(2494) 评论(0) 推荐(0) 编辑