C++代码转换（87分）,在线等待........... ( 积分: 87 )

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #1

如题：
void CALLBACK SwapDSP(HDSP handle, DWORD channel, void *buffer, DWORD length, DWORD user)
{
short *s=buffer;
for (;length;length-=4,s+=2) {
short temp=s[0];
s[0]=s[1];
s[1]=temp;
}
}

 

Z

zhaokaien

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #2

procedure SwapDSP(HDSP:THandle;channelWORD;bufferointer;LengthWORD;userWORD);
var
s:^integer;
temp: integer;
i: integer;
begin

s:=buffer;
i:=length;
while(i>=0)do
begin

temp:=s[0];
s[0]:=s[1];
s[1]:=temp;
length:=length-4;
s:=s+2;
end;

end;

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #3

procedure SwapDSP(
handle : HDSP;
channel : DWORD;
buffer : Pointer;
length : DWORD;
user : DWORD
);
stdcall;
var
s : PShortInt;
s1 : PShortInt;
temp : ShortInt;
begin

s := buffer;
while length > 0do

begin

temp := s^;
s1 := s;
Inc(s1);
s^ := s1^;
s1^ := temp;
length := length - 4;
Inc(s, 2);
end;

end;

 

D

ddzhouqian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #4

这好像是个回调函数，声明后面得加调用方式的

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #5

嗯,忘了,补上了

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #6

是回调函数

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #7

zhaokaien
的代码不能工作啊

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #8

short *s=buffer;

好象是指针加动态数组吗？

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #9

看看老外改的代码，和我们有什么不同？
type // for both procedures
TPanRecEx = array[0..1] of SMallInt;
PPanRec = ^TPanRecEx;


procedure SwapDSP(handle: HDSP;
channel: DWORD;
buffer: Pointer;
length: DWORD;
user: DWORD);
stdcall;
var
a: DWORD;
P: PPanRec;
temp:SmallInt;

begin

a := 0;
P := buffer;
while (a < (length div 4))do

begin

temp:= P[0];
P[0]:=P[1];
P[1]:=temp;
inc(P,2);
a := a + 2;
end;

end;

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #10

下雨了，收衣服了。

 

网

网络3K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-09-17

• #11

多人接受答案了。