조금 급한데요..

procedure TForm1.NMUDP2DataReceived(Sender: TComponent;

NumberBytes: Integer; FromIP: String; Port: Integer);

type aa = record

a : array [0..9] of char;

b : array [0..9] of char;

end;

var

bb : aa;

mem : TMemoryStream;

begin

mem := TMemoryStream.Create;

NMUDP2.ReadStream(mem);;

mem.Read(bb, sizeof(bb));

end;



위와 같은 방법으로 레코드를 스트림으로해서 받았잖아요 그런데 이걸 다시 받은쪽에서 변수로 사용할려고 하는데요



질문 1) mem.Read(bb,sizeof(bb));에 저정된 것을 다시 받은쪽에서 사용하기 위해서는 어떤 방법으로 해야하나요?

제가 만약

Type

Packet: Record

Data: Array[1..3] of string;

end;



이것을 OnReceiveEvent에서 사용하려면

var

packet : aa;

mem : TMemoryStream;

begin

mem := TMemoryStream.Create;

NMUDP2.ReadStream(mem);;

mem.Read(bb, sizeof(bb));

end;



aa.data[1]:=???

aa.data[2]:=???

-----------받은 데이타를 여기에 다시 저장하려면 어떻게 하는지 모르겠어여 ..

빠른 답변 부탁드립니다.

그럼 이만