V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
怎么把一个数组赋值给一个结构体
您正在使用一款已经过时的浏览器！部分功能不能正常使用。
请尝试升级或使用 其他浏览器。
请尝试升级或使用 其他浏览器。
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
帮帮忙啊
自己顶一下
自己顶一下
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
菜鸟
找了大富翁的资料也没找到
找了大富翁的资料也没找到
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
CopyMemory就可以了
J
jiang_yun_2005
Unregistered / Unconfirmed
GUEST, unregistred user!
以一个整型数组为例子吧。
先
type Array of Integer=Arrayofint;
然后在结构体里定义一个变量
aArray:Arrayofint;
先
type Array of Integer=Arrayofint;
然后在结构体里定义一个变量
aArray:Arrayofint;
D
dey-999
Unregistered / Unconfirmed
GUEST, unregistred user!
先看看吧:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=698401
http://www.delphibbs.com/delphibbs/dispq.asp?lid=698401
S
sundata
Unregistered / Unconfirmed
GUEST, unregistred user!
把一个数组赋值给一个结构体？
那数组是变体类型吗，结构体每个成员类型都相同吗
如果相同，那就把数组的元素一个挨一个的给结构体赋值就可以了
那数组是变体类型吗，结构体每个成员类型都相同吗
如果相同，那就把数组的元素一个挨一个的给结构体赋值就可以了
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
我不是那个意思
比如说
我现在有个数组长度为50
然后我想把数组第10个位置开始的20长度的（实际也是一个结构体）
赋给一个已经定义好的结构体
比如说
我现在有个数组长度为50
然后我想把数组第10个位置开始的20长度的（实际也是一个结构体）
赋给一个已经定义好的结构体
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
一个一个赋太麻烦了
最好用指针
可我指针又不会用
最好用指针
可我指针又不会用
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
对了，要把结构体声明成 packed record ，不然会产生字节对齐问题！
type
TMyRecord = TRecord
a: Integer;
b: array[0..3] of Char;
end;
var
MyRecord: TMyRecord;
A: array[0..7] of Char;
...
CopyMemory(MyRecord, A, 8);
type
TMyRecord = TRecord
a: Integer;
b: array[0..3] of Char;
end;
var
MyRecord: TMyRecord;
A: array[0..7] of Char;
...
CopyMemory(MyRecord, A, 8);
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
MyRecord 和 A本身就分别是指针
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
数组里我要截的那些正好是从C＋＋定义的一个结构体
然后我想用指针一下传给我自己的结构体
然后我想用指针一下传给我自己的结构体
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
代码：
function TFmPointPara.UnReadParam(ReceBuf : array of byte):integer ;
var
ParamStr : string;
TerminatalInfo : string;
Pos, DataLength : integer;
i, j : integer;
TmpByte : byte;
P : ^TTerminalPara;
begin
result := -1;
ParamStr := '';
for pos:=0 to 1023 do
begin
if ReceBuf[pos]=$66 then
break;
end;
DataLength := HexToInt(IntToHex(ReceBuf[4],0)+IntToHex(ReceBuf[3],0));
tmpbyte :=0;
for i:=0 to (DataLength+5-1) do tmpbyte := tmpbyte + ReceBuf;
if tmpByte <> Recebuf[DataLength+5] then
begin
PostMessageStr(Fm_Client.StatusBar1,'ÊÕµ½Òì³£Êý¾Ý£¡');
// WriteOperate(list,6,'ÊÕµ½Òì³£Êý¾Ý£¡');
exit;
end;
//½â°ü
if ReceBuf[pos+1] = $88 then
begin
for i := 3 downto 0 do
begin
TerminatalInfo := TerminatalInfo + IntToStr(ReceBuf[5+i]);
end;
DataLength := DataLength - 4;//4ΪÖն˱àºÅµÄ³¤¶È
end;
function TFmPointPara.UnReadParam(ReceBuf : array of byte):integer ;
var
ParamStr : string;
TerminatalInfo : string;
Pos, DataLength : integer;
i, j : integer;
TmpByte : byte;
P : ^TTerminalPara;
begin
result := -1;
ParamStr := '';
for pos:=0 to 1023 do
begin
if ReceBuf[pos]=$66 then
break;
end;
DataLength := HexToInt(IntToHex(ReceBuf[4],0)+IntToHex(ReceBuf[3],0));
tmpbyte :=0;
for i:=0 to (DataLength+5-1) do tmpbyte := tmpbyte + ReceBuf;
if tmpByte <> Recebuf[DataLength+5] then
begin
PostMessageStr(Fm_Client.StatusBar1,'ÊÕµ½Òì³£Êý¾Ý£¡');
// WriteOperate(list,6,'ÊÕµ½Òì³£Êý¾Ý£¡');
exit;
end;
//½â°ü
if ReceBuf[pos+1] = $88 then
begin
for i := 3 downto 0 do
begin
TerminatalInfo := TerminatalInfo + IntToStr(ReceBuf[5+i]);
end;
DataLength := DataLength - 4;//4ΪÖն˱àºÅµÄ³¤¶È
end;
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
就是CopyMemory啦
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
怎么办啊
大家帮帮忙啊
大家帮帮忙啊
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
可是我这出错
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
CopyMemory(p,@ReceBuf[9],DataLength )
这么写对吗
这么写对吗
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
第一个参数是目标地址，第二个参数是源地址。
p是什么类型的
p是什么类型的
V
vincent-hu
Unregistered / Unconfirmed
GUEST, unregistred user!
结构体指针
V
VictorWoo
Unregistered / Unconfirmed
GUEST, unregistred user!
这话有二义性：
是内容为指针的结构体还是指向结构体的指针？
是内容为指针的结构体还是指向结构体的指针？