我用DELPHI作的DLL测试文件library Dir;uses
SysUtils,
Classes, Windows ;{$R *.res}function RetInteger(v : Integer) : Integer ; stdcall ;
begin
Result := V ;
end ;function RetPChar(v : PChar) : PChar ; stdcall ;
begin
Result := v ;
end ;exports
RetInteger ,
RetPChar ;
begin
end.生成DLL文件后,复制到C:\WINDOWS下
执行
exec sp_addextendedproc 'RetInteger','Dir.dll'
exec sp_addextendedproc 'RetPChar','Dir.dll'
生成扩展存储过程DECLARE @RES INT
SET @RES = 10
PRINT RetInteger @RES
PRINT @RES
打印出来后,并不是10,而是一个很大的数另外,测试传入字符串
DECLARE @RES varchar(100)
EXEC @RES = RetPChar 'abcd'
PRINT @RES返回的也是一个数值字符串。我现在感觉到,好像是传入参数时出错,我DLL用DELPHI作的,INTEGER是四个字节,SQL中INT也是四个字节,
各位,发表一下意见,帮我解决一下。
SysUtils,
Classes, Windows ;{$R *.res}function RetInteger(v : Integer) : Integer ; stdcall ;
begin
Result := V ;
end ;function RetPChar(v : PChar) : PChar ; stdcall ;
begin
Result := v ;
end ;exports
RetInteger ,
RetPChar ;
begin
end.生成DLL文件后,复制到C:\WINDOWS下
执行
exec sp_addextendedproc 'RetInteger','Dir.dll'
exec sp_addextendedproc 'RetPChar','Dir.dll'
生成扩展存储过程DECLARE @RES INT
SET @RES = 10
PRINT RetInteger @RES
PRINT @RES
打印出来后,并不是10,而是一个很大的数另外,测试传入字符串
DECLARE @RES varchar(100)
EXEC @RES = RetPChar 'abcd'
PRINT @RES返回的也是一个数值字符串。我现在感觉到,好像是传入参数时出错,我DLL用DELPHI作的,INTEGER是四个字节,SQL中INT也是四个字节,
各位,发表一下意见,帮我解决一下。
解决方案 »
- 实在是折磨得不行了,上来向大家求助.如何判断一个网址打开后是否有弹窗?
- 多线程加载数据显示进度窗体的例子
- 求基于移动CMPP协议的WAPPUSH和长短信的DELPHI代码,分不够可以再加,先谢谢了
- 大虾们,帮帮忙吧
- DELPHI7 实现DataMatrix二维码方法
- 顶者有分 哪有 通用查询模块 用程序自己定制查询条件 提供者单独给高分
- 请问哪里有ApdComPort的控件下载?急!
- listview中如何拖动并保持图标位置?
- forgot的散分帖:请教大家一个感情问题——我跟她有可能发展下去吗?
- 想用Delphi做个物流面单打印软件,比如圆通,申通等不同的快递
- 用indy的UDP传输视频,怎么知道传输的时间啊
- 如何新建一个VCL组件,继承自TEdit
function RetInteger(v : Word) : Integer ; stdcall ;