摘要: 今天在做拍卖系统的时候,因考虑到网络状况问题,需要将拍品所有信息下载到本机,包括拍品图片,因此需要实现从Internet下载文件的功能。下面是代码片段:1..23private4functionDownloadFile(SourceFile,DestFile:string):Boolean;5procedureURL_OnDownloadProgress(Sender:TDownLoadURL;6Progress,ProgressMax:Cardinal;7StatusCode:TURLDownloadStatus;8StatusText:String;varCancel:Boolean);9 阅读全文
posted @ 2011-02-26 11:26 阳光不远 阅读(241) 评论(0) 推荐(0) 编辑
摘要: 以前不管是做什么软件,只要是关于网页post提交cookie的,我都是用TcpClient,为什么呢?因为我一直找不到idhttp提交Cookie的方法,今天终于有了结果。在Idhttp中,要想修改Cookie的代码,就要用到Request的RawHeaders中的Values值。这个值怎么用呢?Values接受一个string的值,该值指定了所访问的变量。如HTTP头是这样定义的(其中一些):Accept-Language: zh-cnContent-Type: application/x-www-form-urlencodedAccept-Encoding: gzip, deflateUs 阅读全文
posted @ 2011-02-26 11:22 阳光不远 阅读(328) 评论(0) 推荐(0) 编辑
摘要: procedureTForm1.Cut1Click(Sender:TObject);beginSendMessage(ActiveControl.Handle,WM_Cut,0,0);end;procedureTForm1.Copy1Click(Sender:TObject);beginSendMessage(ActiveControl.Handle,WM_Copy,0,0);end;procedureTForm1.Paste1Click(Sender:TObject);beginSendMessage(ActiveControl.Handle,WM_Paste,0,0);end;//如果你开 阅读全文
posted @ 2011-02-26 11:21 阳光不远 阅读(185) 评论(0) 推荐(0) 编辑
摘要: 上家公司有这样的一个需求:在网页中点一个链接,启动我们自己的一个客户端程序,并接受链接传递过来的参数,在客户端做相应的处理1。自定义浏览器协议 只要给注册表写进去一点信息就可以实现将自己定义的协议(如:mylink://)跟某客户端程序关联,google一下就可以了2.只能让这个客户端运行一个实例staticvoidMain(string[]url){Application.EnableVisualStyles();Application.SetCompatibleTextRenderingDefault(false);if(url!=null&&url.Length>0 阅读全文
posted @ 2011-02-26 11:13 阳光不远 阅读(313) 评论(0) 推荐(0) 编辑