cydenghua-优快云博客

原创 Android 安装apk过程中奔溃

最近在写一个自动升级代码的时候，下载了apk后安装，在网上找了个代码：Intent intent = new Intent();intent.setAction(Intent.ACTION_VIEW);//执行动作intent.setDataAndType(Uri.fromFile(localFile), "application/vnd.android.package-archiv

2016-09-21 15:21:10 1367

原创 android Socket通讯时readline阻塞

android编写了一个测试soket的例子， public void run() { try { while (true) { if (socket.isConnected()) { if (!socket.isInputShutdown()) { if (in != null) { if ((content =

2014-05-01 15:32:36 1995

原创 android程序建立socket失败

socket = new Socket("192.168.1.100", 9999);用上面代码建立and

2014-04-30 20:54:43 3046 1

原创 delphi把Clientdataset的Delta保存到数据库

//ATableName-表名, AKeyField-主键，多个主键用;隔开，如 ;pid;times; from：unit HlsImplBase;function THlsImplBase.UpdateTableData(ATableName, AKeyField: AnsiString; var AData: Variant): Boolean;var LSql: string;

2013-04-17 16:36:27 2985

原创试题集

原文地址：http://zhidao.baidu.com/question/432203933.html题目：给定一个字符串数组，按字典序输出。对输入的正文按字典顺序取最大或最小的行输出，输出的结果由一个函数的参数来决定，为1，则为最大行输出#include#include#define MAX 100void sort(char str[][MAX+1],int n,int le

2013-02-02 16:03:25 488

原创获取文件md5值

前面做系统自动更新时，想通过MD5值来检查文件版本差异，在网上看到了很多代码，都能计算出MD5值来。今天偶然看到indy的demo时发现indy有几个类是实现这个功能的，那就没必要自己去写代码了，直接利用起来就可以了。下面是borland c++ 和 delphi的代码：DELPHI:uses IdHash,IdHashMessageDigest; function

2012-11-22 16:27:29 1462

原创 bcb实现_从excel复制数据到黏贴板再从黏贴板读取数据到StringGrid

在excel复制数据后，在黏贴板的格式实际是每格用‘ /t’分隔，每行用换行符分隔。为了避免用相对复杂的windows函数，借用vcl的几个类方法简单方便的实现更快捷。头文件：TButton *Button1;TRichEdit *RichEdit1;TRichEdit *RichEdit2;Button1的单击代码：RichEdit1->Clear();Ri

2012-10-22 10:18:14 1287

转载 DLL 作为 MDIChild (子窗体)

原文地址：http://www.ccrun.com/article.asp?d=f36445&i=498 实际上，调用子窗体的 DLL 时，系统只是检查应用程序的 MainForm 是否为 fsMDIForm 的窗体，这样只要把调用程序的 Application 的 Handle 传递给 DLL 的 Application 即可；同时退出 DLL 时也要恢复 Appli

2012-07-17 13:58:42 721

<br />差异备份和完全备份，把备份文件同时拷贝到异地服务器，实现异地备份：一、差异备份，把下面语句直接放在任务里面定时执行，实现差异备份。 DECLARE @ss VARCHAR(200),<br /> @des_hisdb varchar(200),<br /> @des_ehr varchar(200) <br /> SET @ss = replace(replace(replace(CONVERT(varchar, getdate(), 120 ),'-',

2010-12-08 13:44:00 1851

原创用配置文件设置服务端数据库连接和端口号，服务端的URL地址

//在ro的服务端写入如下代码，从ini配置文件读取数据库连接，设置端口号procedure TServerDataModule.DataModuleCreate(Sender: TObject);var aExePath:String; aIni:TInifile; aConnectionString:String; aPort:integer;begin aExePath

2009-04-08 21:47:00 1893