引用自：http://www.delphifans.com/infoview/Article_6445.html
Delphi 关键字详解
absolute
//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Edit1.Text := IntToStr(StrLen);
end;
abstract
//它允许你创建抽象的方法, 包括有抽象方法的类称为抽象类.
//Abstract关键字必须与Virtual或Dynamic关键字同时使用, 因为抽象方法必须被覆盖式实现.
//抽象类不能实例化, 抽象方法不能包含方法体.
type
TDemo = class
private
protected
procedure X; virtual; abstract;
public
constructor Create;
destructor Destroy; override;
published
end;
and
//一、表示逻辑与
if (a>0) and (b&g ......
有一段时间没正经的用delphi了，前两天下载了Delphi2010，用它来找找Delphi的感觉，把写的一些东西共享出来，大家共同学习一下，呵呵。
我想做一个双色球的分析软件，以下是其中实现的部分类的单元文件，其他文件后续一点一点的补齐，有不妥的地方，希望大家指正，谢谢啦！
在使用Delphi2010是，发现个问题，在用show函数调用窗体时，主窗口总是在子窗口的下面。
{工具类单元，包括一些用到的辅助类定义}
unit uCustomUtils;
interface
uses
Classes;
type
TLottery = packed record
{红球集合}
RedBalls: TStringList;
{篮球}
BlueBall: string;
{开奖期号}
Period: string;
{开奖时间}
Time: string;
{奇偶数比}
OddEvenCompare: string;
{大小比}
BigSmallCompare: string;
{和值}
Sum: string;
end;
pLottery = ^TLottery;
implementa ......
1.下载JNative的包
JNative-1.3.2下有三个文件：JNativeCpp.dll，libJNativeCpp.so，JNative.jar。
JNativeCpp.dll拷到windows/system32目录下
libJNativeCpp.so为Linux中使用的文件
JNative.jar扩展包拷到%JAVA_HOME%\jre\lib\ext下或者导入到工程中
2.Jnative中使用到的一些类和方法
org
.xvolks
.jnative
.Jnative
: 装载dll文件，定位函数 如:Jnative native=new Jnative("dllName");
JNative
(),setParameter(),setRetVal(),getRetVal()
etc.
org
.xvolks
.jnative
.pointers
.Pointer: 替代本地函数中的的指针，需要先申请一块内存空间，才能创建,一般使用MemoryBlockFactory
利用工厂模式进行创建.
Pointer()，dispose()
org
.xvolks
.jnative
.pointers
.memory
.MemoryBlockFactory : 申请一块内存空间
createMemoryBlock()
org
.xvolks
.jnative
.exceptions.NativeException
: 抛出装载，定位等方面的异常
org
.xvolks
.jnative
.Type
: 列举和管理Jnative
需要的不同的数据类,一般需要传值的时候指定所传值的类型和函数的返回值
3.使用方法
3.1.
加载dll文件
JNative可使 ......
alter procedure qry_page
@sqlstr nvarchar(4000), --查询字符串
@page int, --第N页
@pagesize int --每页行数
as
declare @rscounts int --记录总数
declare @pages int --页面总数
set nocount on
declare @P1 int --P1是游标的id
exec sp_cursoropen @P1 output,@sqlstr,@scrollopt=1,@ccopt=1,@RecordCount=@rscounts output
set @pages = ceiling(1.0*@rscounts/@pagesize)
if @page<=0 set @page=1
if @page>@pages set @page=@pages
--当前页面条数，不足一页
declare @curpg_counts int
if @rscounts<@page*@pagesize
set @curpg_counts=@rscounts-(@page-1)*@pagesize
els ......
alter procedure qry_page
@sqlstr nvarchar(4000), --查询字符串
@page int, --第N页
@pagesize int --每页行数
as
declare @rscounts int --记录总数
declare @pages int --页面总数
set nocount on
declare @P1 int --P1是游标的id
exec sp_cursoropen @P1 output,@sqlstr,@scrollopt=1,@ccopt=1,@RecordCount=@rscounts output
set @pages = ceiling(1.0*@rscounts/@pagesize)
if @page<=0 set @page=1
if @page>@pages set @page=@pages
--当前页面条数，不足一页
declare @curpg_counts int
if @rscounts<@page*@pagesize
set @curpg_counts=@rscounts-(@page-1)*@pagesize
els ......
开发者都希望自己的程序有一个友好的界面，此时，一个生动活泼、有表现力的光标就必不可少了。Windows 缺省提供22种标准光标供在程序中调用，但对一个求新求变的程序员来说，标准光标就不能满足要求了，需要使用自己的光标，那么，在程序中怎样使用自己的光标呢？ ●光标资源的获得 要使用自定义光标，必须先得到这些光标。光标文件有两种：静态光标(.cur)和动态光标(.ani)。你可以使用现成的光标文件，比如Delphi 自带的一组光标文件(在C:\Program Files\Borland\Delphi 3\Images\Cursors目录中)，如果你安装了Windows98的桌面主题，则可在\Windows\plus! 目录下找到许多光标文件。你也可以自己创建光标文件，比如使用Delphi自带的Image Editor 就可创建静态光标文件(.cur），但Image Editor不能创建彩色光标，要创建彩色光标，必须使用其它工具，如Vc＋＋ 的资源编辑器。动态光标则必须使用专门的工具软件制作，使用动态光标可达到光标的动画效果，动态光标文件的文件结构与AVI文件结构相似，由文字描述区、信息区、时间控制区、数据区四部分构成。Windows通过按文件时间控制区中指定的时间一帧帧播放文件数据区中包含的光标或图标图像来实现动画效果。 其实，� ......
1．引言
在利用delphi开发应用程序的时候，通常我们要设计出很多各种格式的文档、报表，经常要进行文件的创建、编辑及修改，虽然delphi本身提供了很多设计报表的控件或方法，但是存在明显的不足，比如中文输入，数据格式的控制等操作起来比较麻烦。利用大家都很熟悉的office工具结合开发，能够很好的解决这方面的问题。以下就以delphi为例详细介绍怎么利用office完成各种文档、报表的制作。
2．实现方法
利用delphi和office结合开发主要有以下三种方法：
(1) 通过delphi的控件tolecontainer 将office嵌入，这是最简单的ole嵌入，能够直接将office文档调用，只需要使用tolecontainer.run就可以将office文档直接启动。且这样启动的office文档与delphi程序是一个整体（从界面上看），但是它存在不可克服的缺点，即不能通过delphi控制office文档，也就不能实现将灵活操纵office的目的。
(2) 使用delphi提供的servers控件调用office，使用office的属性，使用delphi的servers控件来操纵office，在编程时delphi能够实现代码提示，总体上看能够较好的实现delphi对office的控制，但是还有一些office的功能不能在delphi中调用（比如自己编写的vba宏代码）。且实现功能时本来在vba代 ......
最新文章 : delphi