Dephi调用C++的DLL问题？怎么定义？(50分)

S

shijunwu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #21

Type RSI_ID=string[5];
end;

var
id:RSI_ID;
pchar;
str_id:String;
begin
p:=pchar(id)
SetLength(str_id, 100); //PChar一定要先分配内存
Result:= rsiIDToText(p,PChar(str_id));
end;

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #22

不行...
Function rsiIDToText(ID:RSI_ID;textchar):integer;stdcall; external 'rsidll32.dll';
textchar)://text是不是用PChar？
我想rsiIDToText这个函数定义也可能不是这样...

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-19

• #23

??

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-19

• #24

??

 

A

afei2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-19

• #25

up

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-19

• #26

总是这样:
Access violation at address 10039E9 in module 'rsidll21.dll' Read of address 99817489

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-19

• #27

??

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-20

• #28

??

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-20

• #29

...

 

Y

yjy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-20

• #30

===Delphi================================================================
Type RSI_ID1=record
b0 : Byte;
b1 : Byte;
b2 : Byte;
b3 : Byte;
b4 : Byte;
end;
PRSI_ID = ^RSI_ID;
Function rsiIDToText(IDRSI_ID;textchar) :RSI_DATA_ERROR; stdcall; external 'rsidll32.dll';
Function rsiTextToID(textchar;IDRSI_ID) :RSI_DATA_ERROR; stdcall; external 'rsidll32.dll';

在 C++中的定义RSI_ID是一个数组，所以作为参数传递时应该采用指针

 

L

lglhsy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-20

• #31

接受答案了.