|
D10.天地弦 15:38:33
在设计时将mmoSql的值copy到adoMain.CommandText里面
D10.天地弦 15:37:41
---------------------------
Debugger Exception Notification
---------------------------
Project DebugTest.exe raised exception class EOleException wITh message ’不正常地定义参数对象。提供了不一致或不完整的信息。’. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
D10.天地弦 15:38:07
可以从错误信息上看出是参数惹的祸
D10.天地弦 15:39:47
再设定adoMain的AcITve为true
JERRY 15:40:07
那是什么东东
D10.天地弦 15:40:17
发现出现了同样的错误对不以
尖椒牛柳 15:40:41
超过字符长度了
D10.天地弦 15:40:46
看看他的Parmaters
D10.天地弦 15:40:17
发现出现了同样的错误对不以
尖椒牛柳 15:40:41
超过字符长度了
D10.天地弦 15:40:46
看看他的Parmaters
D10.天地弦 15:40:47
D10.天地弦 15:40:50
不是
尖椒牛柳 15:41:01
哦有“:
”
D10.天地弦 15:41:16
发现他的Parameters里无故出错了几个参数...
D10.天地弦 15:41:17
是不是
尖椒牛柳 15:41:35
有“:”的话，Delphi会认为是参数的
D10.天地弦 15:41:43
对...
D10.天地弦 15:41:50
这也是Delphi的不对了...
尖椒牛柳 15:41:58
上次这个问题我也调试了半天
D10.天地弦 15:42:09
把注释里的东东都解析出参数来搞...
再看下个列子
D10.天地弦 15:46:45
大伙把
FMainForm里的
/ ebugIntf := CreateDebugService;
D10.天地弦 15:46:58
constructor TFMainForm.Create(AOwner: TComponent);
begin
inherITed;
// FebugIntf := CreateDebugService;
end;
这个注释搞掉
再运行程序...
D10.天地弦 15:48:43
还是运行主程序...
D10.天地弦 15:49:01
D10.天地弦 15:49:10
是这一行惹的祸...
D10.天地弦 15:49:20
function CreateDebugService(): IDebugIntf;
D10.天地弦 15:49:27
看看这个函数,,有没有什么问题...
D10.天地弦 15:50:20
这样的错误，不注意还很难找...
D10.天地弦 15:54:01
function CreateDebugService: IDebugIntf; stdcall;
begin
result := TDebugService.Create();
end;
function CreateDebugService(): IDebugIntf;
D10.天地弦 15:54:08
看到没有
飘尘 15:54:10
function CreateDebugService(): IDebugIntf;stdcall
D10.天地弦 15:54:24
让大家找只是告诉大伙不要粗心...
D10.天地弦 15:54:35
DLL内的原型是有stdcall的
B6.银狼 15:54:48
没看到啊
D10.天地弦 15:54:57
在function CreateDebugService(): IDebugIntf;加上
D10.天地弦 15:55:00
就可以运行了
D10.天地弦 15:55:15
DebugIntf;
function CreateDebugService(): IDebugIntf;stdcall;
implementation
function CreateDebugService; external ’dkTools.dll’ name ’CreateDebugService’;
end.
D10.天地弦 15:55:22
这样再运行就可以了...
B6.银狼 15:55:53
unIT DebugIntf;
interface
type
IDebugIntf = interface
function RandomFormNo: WideString; safecall;
function GetGuid: WideString; safecall;
end;
implementation
end.
B6.银狼 15:55:55
？
F6.Jeanvi 15:55:55
赤无极 15:55:59
找到啦
D10.天地弦 15:56:04
DLL要注意函数的导出原形...
Locet 15:56:13
到哪里了？刚才在忙
赤无极 15:56:17
library dkTools;
{ Important note about DLL memory management: ShareMem must be the
first unIT in your library’s USES clause AND your project’s (select
Project-View Source) USES clause if your DLL exports any procedures or
functions that pass strings as parameters or function results. This
applies to all strings passed to and from your DLL--even those that
are nested in records and classes. ShareMem is the interface unIT to
the BORLNDMM.DLL shared memory manager, which must be deployed along
wITh your DLL. To avoid using BORLNDMM.DLL, pass string information
using PChar or ShortString parameters. } 上一页 [1] [2] [3] 下一页 |
