- 博客(28)
- 资源 (1)
- 收藏
- 关注
RSS订阅原创 SHGetFileInfo函数详解
SHGetFileInfo函数function SHGetFileInfo(pszPath: PAnsiChar; dwFileAttributes: DWORD; var psfi: TSHFileInfo; cbFileInfo, uFlags: UINT): DWORD; stdcall;pszPath 参数:指定的文件名。 当uFlags的取值中不包含 SHGFI_PIDL时,可直接
2007-11-12 11:33:00
1841
转载 sql server系统表详细说明
sysaltfiles 主数据库 保存数据库的文件 syscharsets 主数据库字符集与排序顺序sysconfigures 主数据库 配置选项 syscurconfigs 主数据库当前配置选项 sysdatabases 主数据库服务器中的数据库 syslanguages 主数据库语言 syslogins 主数据库 登陆帐号信息 sysoledbusers
2007-11-12 11:03:00
825
原创 MSSQL文本文件导入导出
--文本文件导出 EXEC Master..xp_cmdshell bcp "select * from sqbl.dbo.SubCenter" QueryOut "c: est.txt" /c /S"127.0.0.1" /U"sa" /P""--EXEC Master..xp_cmdshell bcp "查询" QueryOut "路径+文件名" /c /S"服务器名" /U"用
2007-08-21 17:58:00
2142
转载 化解字符串不能超过8000的方法及交叉表的处理
化解字符串不能超过8000的方法及交叉表的处理 经常有人提到,用动态生成SQL语句的方法处理数据时,处理语句超长,无法处理的问题下面就讨论这个问题:/*-- 数据测试环境 --*/if exists (select * from dbo.sysobjects where id = object_id(N[tb]) and OBJECTPROPERTY(id, NIsUserTabl
2007-08-19 16:12:00
668
原创 Delphi下实现StatusBar捕捉双击哪个分栏
Delphi下实现StatusBar捕捉双击哪个分栏代码如下： 定义全局变量：mousex :Integerprocedure TForm1.StatusBar1DblClick(Sender: TObject);var x_left,x_right,x,i:integer;begin x := mousex ; x_left := 0; x_right := 0; f
2007-08-06 10:34:00
1810
2
原创 Slony-I for Win2003的配置文档
Slony-I for Win2003的配置文档1.环境OS:windows Server 2003 SP1;PostGreSQL: postgresql-8.2.4-1;Slony-I: postgresql-8.2.4-1自带的Slony-I;2.实现要求单向同步主服务器“user_level”到从服务器的“user_level”;其中主服务器IP：192.168.
2007-07-31 16:00:00
2969
2
转载 delphi汉字首字母索引函数
一个好东东哦～～ Function TForm1()function TForm1.GetPYIndexChar( hzchar:string):char;begin //的到一个汉字的拼音头个字母 case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of $B0A1..$B0C4 : result := A; $B0C5..$B
2007-07-16 17:17:00
1197
1
原创 Delphi7在win2003Sp1下常见故障解决
如果出现了工程选项打开时内存错误，或者“Borland Integrated Translation Environment”(Delphi7/Bin/dclite70.bpl)这个包读出时内存错误请检查以下两项:一、系统变量:系统属性->高级->环境变量->系统变量->Path检查该变量内有没有这两个路径的设置：“D:/sys/Delphi7/Bin;D:/sys/Delphi7/Proje
2007-07-09 10:36:00
1295
1
转载 C++ 和 Delphi 的函数覆盖(Override)与重载(overload)
C++ 和 Delphi 的函数覆盖(Override)与重载(overload)Spacesoft【暗夜狂沙】在面向对象编程中，当子类继承了来自基类的函数后，子类有可能需要对其中的一些函数作出与基类不同处理，比如：class CHuman{public: void SayMyName()//打印出对象的姓名 { cout } }；那么很明显，假如
2007-07-03 14:44:00
1128
转载 浅谈delphi中的指针
这篇着重介绍DELPHI的指针：正文如下：====================大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时，这种说法也让很多人 产生误解，似乎只有C语言的指针才能算指针。Basic不支持指针，在此不论。其实，Pascal语言本身也是支持指针的。从最初的Pascal发展至今 的Object
2007-07-02 21:57:00
1705
转载 判断内存流中的图片格式
判断内存流中的图片格式代码如下：//从内存流中判断图片格式procedure TForm1.BitBtn4Click(Sender: TObject);var MyImage:TMemoryStream; Buffer:Word; i:integer;begin if OpenDialog1.Execute then begin MyImage:=TMemoryStream
2007-06-28 19:16:00
1340
原创 delphi中从DLL,EXE,ICL中提取图标
参看了几个别人写下的程序，自己手动用delphi写了个从DLL,EXE,ICL中提取图标的小程序；程序还不太完整，由于Delphi的限制，提取出来的图标会降至16色；代码如下：unit Main;Interface usesinterfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Control
2007-06-28 13:26:00
2559
原创 两个触发器的例子
为测试建立两张表：表db1与表db2；触发器newjd所完成的功能是，只要向表db1插入一条数据就向表db2复制一条记录；触发器trg所完成的功能是，当表bd2最大日期与最小日期相差40天时，清除较早的30天的记录；代码如下 -----表1的触发器CREATE TRIGGER newjd ON db1 FOR INSERT AS Declare @time1 datet
2007-06-21 19:12:00
1573
转载 触发器的介绍
触发器是数据库应用中的重用工具，它的应用很广泛，这几天写一个化学数据统计方面的软件，需要根据采样，自动计算方差，在这里，我使用了触发器。下面我摘录了SQL Server官方教程中的一段关于触发器的文字，确实有用的一点文字描述。_________________________________________________________________可以定义一个无论何时用INSERT语句向
2007-06-21 19:05:00
863
转载 谈Delphi编程中“流”的利用
谈Delphi编程中“流”的利用陈经韬 什么是流？流,简单来说就是建立在面向对象基础上的一种抽象的处理数据的工具。在流中,定义了一些处理数据的基本操作,如读取数据,写入数据等,程序员是对流进行所有操作的,而不用关心流的另一头数据的真正流向。流不但可以处理文件,还可以处理动态内存、网络数据等多种数据形式。如果你对流的操作非常熟练,在程序中利用流的方便性,写起程序会大大提高效率的。 下面,
2007-06-20 14:58:00
1796
1
转载 delphi中的时间操作技术(2)
delphi中的时间操作技术(2) 各种时间类型之间的转换函数DateTimeToFileDate函数：定义：DateTimeToFileDate(DateTime TDateTime) Integer;作用： 将一个TDateTime类型的时间转化为Dos环境中的时间，Dos环境下对时间的访问方法和VCL中的TdateTime类型不一样，在进行文件操作时，为了保持时间的
2007-06-20 14:54:00
1107
转载 delphi中的时间操作技术(1)
delphi中的时间操作技术(1) 在编写应用程序时，我们需要经常与时间和日期打交道，因此经常需要一些对时间的控制技术，在Delphi中，提供了一整套对日期和时间的操作函数，在此，我将详细介绍一下在Delphi中的时间操作技术，希望能对大家有所帮助。Delphi中的用于表示时间的类型：首先，看一看在delphi中用于描述时间的几种数据结构，对时间的操作，其实就是对这些结
2007-06-20 14:48:00
872
转载 键盘常用ASCII码
ESC键 VK_ESCAPE (27)回车键： VK_RETURN (13)TAB键： VK_TAB (9)Caps Lock键： VK_CAPITAL (20)Shift键： VK_SHIFT ($10)Ctrl键： VK_CONTROL (17)Alt键： VK_MENU (18)空格键： VK_SPACE ($20/32)退格键： VK_BACK (8)左徽标键： VK_LWIN (9
2007-05-31 15:35:00
649
转载 Delphi自定义类笔记(二)
Delphi自定义类笔记(二)开头不加保留字的类成员这里讲的开头不加保留的类成员两种情况一、 在private 、protected 、public 、published所属区域，非第一个类成员可以不加这些保留字（省略）二、 若类的成员不些这个上述四个范围之内，像在类的开头部分有几个没有保留字的类成员，它的所属情况分两种：A．
2007-05-14 12:59:00
1302
转载 Delphi 中的自定义类笔记（一）
Delphi 中的自定义类笔记（一）类的声明有两种声明办法一、自定义类的父类delphi内建类type 类名 = class父类)( 成员表达式end;（1）保留字Class说明该类是dephi内建类，将继承父类的属性和方法（2）“父类”默认是delphi的祖先类Tobject二、完全自定义的类Type 类名 = object父类)( 成员表达式
2007-05-14 12:33:00
2222
原创 SQL安装中常出现的问题与解决方法
1. [16位子系统]将系统的安装盘插入光驱中，开始->运行->依次输入:expand F:/i386/config.nt_ C:/windows/system32/config.nt expand F:/i386/autoexec.nt_ C:/windows/system32/autoexec.nt expand F:/i386/command.co_ C:/windows/syste
2006-12-19 02:11:00
903
转载 ini文件操作
INI文件在系统配置及应用程序参数保存与设置方面，具有很重要的作用，所以可视化的编程一族，如VB、VC、VFP、Delphi等都提供了读写INI文件的方法，其中Delphi中操作INI文件，最为简洁，这是因为Delphi提供了一个TInifile类，使我们可以非常灵活的处理INI文件。一．INI文件的结构ini文件[小节名]关键字1＝值1关键子2＝值2 INI文件允许有多个小节，每个小节
2006-12-11 03:10:00
867
转载 messagebox 详解
MessageBox对话框是比较常用的一个信息对话框，其不仅能够定义显示的信息内容、信息提示图标，而且可以定义按钮组合及对话框的标题，是一个功能齐全的信息对话框信息提示图标，而且可以定义按钮组合及对话框的标题，是一个功能齐全的信息对框。 1、函数原型及参数 function MessageBox(hWnd: HWND; Text, Caption: PChar; Type: Wor
2006-12-11 03:00:00
1020
转载 MS SQL Server 2000 的版本
MS SQL Server 2000 的版本 做数据的程序开发免不了要用到 MS SQL Server 2000 ，下面主要介绍一下MS SQL Server 2000 各个版本之间的区别~~SQL Server 2000 企业版 作为生产数据库服务器使用。支持 SQL Server 2000 中的所有可用功能，并可根据支持最大的 Web 站点和企业联机事务处理 (OLTP)
2006-12-09 07:02:00
957
转载 字符串函数大全
使用时不要忘了加上“uses StrUtils;” 【字符串函数大全】 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas 功能 返回两个字符串是否相似 说明 ANSI(American National Standa
2006-12-09 06:51:00
672
原创 SQL服务器时间同步
参看了一些网上的文章自己写了一个同步时间的函数，贴出来与大家一起分享~~~代码如下： procedure Tmainfr.Button1Click(Sender: TObject); //同步服务器时间var mytime:Tsystemtime;begin ADODataSet1.Close; ADODataSet1.CommandText:=
2006-12-09 06:47:00
1276
转载 Delphi字符串分割函数
一个Delpih常用到的分割写符串的函数..代码如下：function Tmainfr.SplitString(Source,Deli:string):TStringList;stdcall; //拆分字符串函数varEndOfCurrentString:byte; StringList:TStringList; begin StringList:=TStringList.
2006-12-08 05:17:00
1539
1
转载 ASCII表
ASCII码表 Char Dec Oct Hex | Char Dec Oct Hex | Char Dec Oct Hex | Char Dec Oct Hex-------------------------------------------------------------
2006-10-23 04:48:00
645
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人