- 博客(374)
- 资源 (27)
- 收藏
- 关注
转载 DLL 返回字符串
<br />//Library var V_String: string; procedure SetString(mStr: PChar); begin V_String := string(mStr); end; function GetString: PChar; begin Result := PChar(V_String); end; excetps SetString,
2010-06-03 16:58:00 1152
转载 GridView 排序
<br />设置SortExpression,然后:<br />protected void GridView1_Sorting(object sender, GridViewSortEventArgs e){ DataTable t = GetTable(); DataView v = new DataView(t); v.Sort = e.SortExpression; GridView1.DataSource = v; GridView1.Data
2010-06-02 22:53:00 354
转载 Socket笔记
TClientSocket OnRead和OnWrite事件:在阻塞方式下,必须调用相应的函数主动去读写数据,并且在读写完成操作之前,调用该函数的线程将处于等待状态,如果线程是应用程序主线程,则整个程序的其他代码将得不到执行。 当处理了错误后将ErrorCode设置为0,则不会出现Delphi错误提示。
2010-05-28 11:37:00 547 1
转载 GridView 滚动条
<asp:GridView ID="GridView1" runat="server" AllowPaging="True" AutoGenerateColumns="False" Width="2200px">
2010-05-28 09:30:00 638
转载 C# 文本文件
FileStream f = new FileStream(@"c:/c.txt", FileMode.Create);byte[] bytes = System.Text.Encoding.Default.GetBytes(str);f.Write(bytes, 0, bytes.Length);
2010-05-26 17:08:00 489
转载 c# 操作 Excel
OleDbConnection con = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0;HDR=YES; IMEX=1;Data Source=c:/c.xls"); if (con.State != ConnectionState.Open) {
2010-05-26 10:00:00 362
转载 原来的控件delphi7里何处寻?
经常有朋友提这样的问题,“我原来在delphi5或者delphi6中用的很熟的控件到哪里去了?是不是在delphi7中没有了呢?这是不是意味着我以前写的代码全都不能够移植到delphi7中来了呢?是不是我必须学习适应这些新的控件呢?”现在我就对这一问题进行解释,并对在delphi7中的VCL以及CLX进行一下总结,方便有这方面需求的朋友进行查询其实,我们在原来版本如D5、D6中使用
2010-05-24 21:01:00 1045
转载 Socket Select
老陈有一个在外地工作的女儿,不能经常回来,老陈和她通过信件联系。他们的信会被邮递员投递到他们的信箱里。 这和Socket模型非常类似。下面我就以老陈接收信件为例讲解Socket I/O模型。 一:select模型 老陈非常想看到女儿的信。以至于他每隔10分钟就下楼检查信箱,看是否有女儿的信,在这种情况下,“下楼检查信箱”然后回到
2010-05-21 14:59:00 2015
转载 开源框架 InstantObjects 的代码
(* * InstantObjects * RTTI Interface *)(* ***** BEGIN LICENSE BLOCK ***** * Version: MPL 1.1 * * The contents of this file are subject to the Mozilla Public License Version * 1.1 (
2010-05-21 14:47:00 898
转载 Delphi 列出目录下的文件
function ListFiles(Dir: String):TStrings;var FSearchRec: TSearchRec; FileList: TStrings; FindResult: Integer;begin if Dir[length(Dir)]<>/ then Dir:=Dir+/; FileList :=TStringList
2010-05-19 16:30:00 2640
转载 排序类
using System;using System.Collections.Generic;using System.Text;using System.Reflection;using System.Data;namespace Zhuyi.Utility{ /// /// 排序帮助类(包括对 string[],int[],datatable,T
2010-05-15 09:21:00 403
转载 函数的线程安全与可重入
线程安全的(Thread-Safe):如果一个函数在同一时刻可以被多个线程安全地调用,就称该函数是线程安全的。线程安全函数解决多个线程调用函数时访问共享资源的冲突问题。可重入(Reentrant):函数可以由多于一个线程并发使用,而不必担心数据错误。可重入函数可以在任意时刻被中断,稍后再继续运行,不会丢失数据。可重入性解决函数运行结果的确定性和可重复性。可重入函数编写规范为:1
2010-05-13 18:44:00 574
转载 Delphi表达式
function ExpCalc(exp: string): string;var vScript: Variant;begin vScript := CreateOleObject(ScriptControl); vScript.Language := VBScript; Result := vScript.Eval(exp);end;proced
2010-05-13 16:57:00 900
转载 js导出Excel
<!-- function preview() { window.clipboardData.setData("Text",document.all(table1).outerHTML); try { var ExApp = new ActiveXObject("Excel.Application") var ExWBk = ExApp.wo
2010-05-13 13:11:00 707
转载 Javascript导出Excel
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> WEB页面导出为EXCEL文档的方法
2010-05-13 13:07:00 2208
转载 MM2Pix
using System.Runtime.InteropServices;[DllImport("gdi32.dll")]private static extern int GetDeviceCaps(IntPtr hdc, int Index);public static double MillimetersToPixels(double mm){ System.Win
2010-05-12 16:40:00 611
转载 水晶报表的自动换行
水晶报表的功能十分强大,所有功能均需用户自己设定,长字段自动换行的问题一直困扰开发人员,其实此问题不是很复杂。网上相关的文章,均指出了要修改字段的CANGROW属性与Section的UNDERLAYSECTION属性,均改为TRUE,但都忽视了一个重要的问题LINE控件。只有将其EXTENDTOBOTTOMSECTION的属性,需修改其属性,LINE才会随着每一行数据最高高度的自动向下移动!
2010-05-12 14:35:00 3541 1
转载 水晶报表导出PDF or Excel
在页面中加入CrystalReportViewer和Button:using System;using System.Collections;using System.ComponentModel;using System.Data;using System.Drawing;using System.Web;using System.Web.SessionState
2010-05-12 14:08:00 5198 2
转载 用c#读取并分析sql2005日志
用过logExplorer的朋友都会被他强悍的功能吸引,我写过一篇详细的操作文档可以参考http://blog.csdn.net/jinjazz/archive/2008/05/19/2459692.aspx 测试SQL脚本:use mastergocreate database dbLogTestgouse dbLogTestgocreate table
2010-05-11 08:55:00 679
转载 创建约束
CONSTRAINT chk1 CHECK (pp>0 AND cc=cc)CONSTRAINT chk2 PRIMARY KEY (ppi, gid) )
2010-05-04 09:55:00 485
转载 怎么用XML传送图像数据
Delphi中有一个EncdDecd单元,uses 它,以下的函数出自这个单元 1.用TBitmap对象Load图片 TBitmap.LoadFromFile 2.把TBitmap存入一个Stream中 TBitmap.SaveToStream(mapStream) 3.把图片流进行base64编码,生成一个字符串流
2010-05-03 13:23:00 901
转载 ASP.NET中上传文件到数据库
SQL脚本:CREATE TABLE tblBooksUpload( DocID int NOT NULL IDENTITY Primary Key , DocTitle varchar (200) , Doc image, DocType varchar (50) , Entrydate datetime Default GetDate()) 首先我们要实
2010-04-29 12:14:00 420
转载 js技巧
var a = parseFloat("12");var b = parseInt("34");var a = +("12");var b = +("34");var A = new Array(2); A[0] = new Array(2); A[1] = new Array(2); A[0][0] = 1; A[0][1] = 2; A[1][0] = 2; A[1][2] =
2010-04-26 17:25:00 341
转载 从配置文件取数据库连接
配置文件: <add name="dbcnnstr" connectionString="Data Source=.;Initial Catalog=test;User ID=sa;Password=sa" providerName="System.Data.SqlClient" /> C#:System.Configuration.ConfigurationMan
2010-04-25 20:31:00 520
转载 查看SQL Server 2000版本号
SELECT SERVERPROPERTY(productversion), SERVERPROPERTY (productlevel), SERVERPROPERTY (edition)
2010-04-22 15:39:00 600
转载 JS金额小写转大写
function atoc(numberValue){var numberValue=new String(Math.round(numberValue*100)); // 数字金额var chineseValue=""; // 转换后的汉字金额var String1 = "零壹贰叁肆伍陆柒捌玖"; // 汉字数字var String2 = "万仟佰拾亿仟佰拾万仟佰拾元角分"; /
2010-04-21 23:13:00 6993 3
转载 JS金额小写转大写
function Arabia_to_Chinese(Num){for(i=Num.length-1;i>=0;i--){Num = Num.replace(",","")Num = Num.replace(" ","")}Num = Num.replace("¥","")if(isNaN(Num)) { alert("请检查小写金额是否正确");return;
2010-04-21 23:10:00 1001
转载 Access数据库连接
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|access.mdb;
2010-04-21 14:46:00 438
转载 js通用提示信息(tooltip)
function hideTip() { var fm = getTipDiv(); if (fm != undefined) { fm.style.display = "none"; } }
2010-04-21 14:20:00 791
转载 读取xml并绑定gridview
答案选项内容0 答案选项内容1 答案选项内容2 答案选项内容3 答案选项内容4 答案选项内容0 答案选项内容1 答案选项内容2 答案选项内容3 答案选项内容4 答案选项内容0 答案选项内容1 答案选项内容2 答案选项内容3 答案选项内容
2010-04-19 14:31:00 1640
转载 调用DLL中的窗体
library Project;{ Important note about DLL memory management: ShareMem must be the firstunit in your librarys USES clause AND your projects (select Project-ViewSource) USES clause if your DLL
2010-04-14 12:43:00 623
带序号的DBGrid
2009-04-28
Developing User Interfaces for MS Windows
2008-12-03
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人