自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(14)
  • 收藏
  • 关注

转载 VB中CopyMemory函数

vb中copymemory函数的使用挺耐人寻味的。copymemory的使用说明资料书上就一句“该函数用于将一块内存的数据从一个位置复制到另一个位置”。其参数数据类型destination as any,source as any。尽管是any型可理解成任一类型但是我看很多地方都说参数是指针类型的。因此起初我很不解,既然是指针型的参数我们往往直接将变量传递过去而不是变量的地址传递过去不是非法的吗?

2016-12-09 16:57:27 9264

转载 cdecl、stdcall、fastcall是什么?哪种可以实现个数不定的入口参数,为什么?

三者都是函数调用的约定。cedel:c declare(c调用约定)的缩写,是c和c++程序的缺省调用方式,规则是,从又向左的顺序压参数入,由调用者把参数弹出栈,对于传入参数的内存栈是由调用者来维护的,正因为如此,只有这种调用方式可以实现个数不定的入口参数(可变参数)。stdcall:是pascal程序的缺省调用方式,规则是,按从右向左的顺序入栈,被调用的函数在返回前清理传送参数的

2016-12-02 13:09:57 316

转载 vb:将窗体嵌入桌面的一段代码

Option Explicit Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib

2016-12-02 12:32:43 1793

转载 VB创建多线程

相关知识:进程:是指程序在一个数据集合上运行的过程,是操作系统进行资源分配和调度运行的一个独立单位,简单来说进程就是程序的一次执行。进程的两个基本属性:1.进程是一个可拥有资源的独立单位;2. 进程同时又是一个可以独立调度和分配的基本单位。操作系统中引入进程的目的是为了使多个程序并发执行,以改善资源利用率及提高系统的吞吐量。线程:线是进程中的一个实体,是被系统独立调

2016-12-02 12:32:02 2409

转载 VB创建可以输出函数的DLL

VB中创建的DLL只是COM组件,无法作为输出函数的DLL。      VB编译文件实际上采取了两次编译的方法,首先是调用c2.exe产生OBJ文件,然后调用Link.exe连接。如果在link的时候添加EXPORT选项,实际上是可以输出函数的。但是,在VB的工程选项中将这些屏蔽了。而且过分的是:VB在Build完成后会将OBJ文件删除,这样就无法通过Link来输出函数了。不过我找到一个比

2016-12-02 12:29:13 1530

转载 Delphi中怎么调用vb的DLL

VB直接生成的是ActiveX dll, 经过改造,也能生成标准的Windows DLL。 不知道你说的VB生成的dll是哪一类?1. 标准的Windows DLL, delphi的例子很多。 无需等VB生成的dll。2. 如果是vb生成的active x dll, 那么: 首先注册VB的ActiveX DLL,然后在Delphi的Project菜单上选择import Type L

2016-12-02 12:23:48 1117

转载 在vb,vc中调用vb编写的DLL

假设用vb编写了一个ActiveX 组件,名称为BioxSend,里面生成一个类Test,类里面有一个方法Hello(),并且已经在电脑上注册,下面分别描述怎样在VB和vc中调用。1. VB调用(1) 方法1:直接在project/reference里引用该DLL,然后在使用时声明就可以了,代码如下:dim aa as new Testaa.Helloset

2016-11-19 20:54:46 1086

原创 Delphi数据类型转换函数

Delphi数据类型转换函数DateTimeToFileDate将DELPHI的日期格式转换为DOS的日期格式DateTimeToStr将日期时间格式转换为字符串DateTimeToString将日期时间格式转换为字符串DateToStr将日期格式转换为字符串FileDateToDateTime将DOS的日期格式转换为

2016-11-19 16:24:56 1018

原创 Delphi 检查文件是否存在

Delphi下检查文件是否存在,我们可以使用FileExists函数其原形如下:Function FileExists(const FileName: string): Boolean;示例:if Not FileExists('路径+文件名') then    begin      showmessage('所指定的文件存在');    end;

2016-11-19 16:15:00 16167

转载 Delphi常用关键字用法详解

本文详细介绍了Delphi中常用的各个关键字名称及用法,供大家在编程过程中借鉴参考之用。详情如下:absolute://它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.var Str: string[32]; StrLen: Byte absoluteStr;//这个声明指定了变量StrLen起始地址与Str相同.//由于字符串的第0个位置保存了字

2016-11-19 09:18:07 993

转载 DELPHI 函数集

abs(x)    绝对值arctan(x) 反正切cos(x)    传回馀弦函数值exp(x)    e的x次幂frac(x)   取小数部分int(x)    取整ln(x)     自然对数sin(x)    传回正弦函数值 sqr(x)    x*xsqrt(x)   平方根其它pred(x)   pred('D')='C', pred(tru

2016-11-19 09:15:16 1671 1

转载 Delphi写dll文件

一、开使你的第一个DLL专案  1.File->Close all->File->New﹝DLL﹞代码:  //自动产生Code如下  library Project2;  //这有段废话  uses  SysUtils,  Classes;  {$R *.RES}  begin  end.  2.加个Func进来:  代码:

2016-11-18 16:57:28 1279

转载 delphi 整理的常用函数

// 获得计算机名AnsiString GetComputerName(){char name[MAX_COMPUTERNAME_LENGTH + 1];DWORD size = MAX_COMPUTERNAME_LENGTH + 1;if(GetComputerName(name,&size))return AnsiString(name);

2016-11-18 16:55:18 669

转载 VSFlexGrid使用技巧

如何实现将vsflexgrid中修改的数据反馈到数据库中?Private Sub vsflexgrid1_AfterEdit(ByVal Row As Long, ByVal Col As Long)  rs.MoveFirst    '//rs为记录集  rs.Move vsflexgrid1.Row - 1  rs.Edit  If vsflexgrid1.text = "

2016-11-18 16:53:26 4246

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除