UDP通讯问题！请各位高手帮忙，谢谢(200分)

我要把信息写到UDP包中发出，该怎么写？？
第一位 第二位 第三位 第四位
0x01 0x1F 12 23456
读取又该如何写？？，谢谢各位

TTTT

//发送
Var
TmArracked array [1..81] of char;
_pos:word;
tmb:byte;
begin
_pos:=1;
tmb:=$01;
move(tmb,TmArr[_pos],SizeOf(Byte));
inc(_pos,SizeOf(Byte));

tmb:=$1F;
move(tmb,TmArr[_pos],SizeOf(Byte));
inc(_pos,SizeOf(Byte));

move(string('12')[1],TmArr[_pos],2);
inc(_pos,2);

move(string('23456')[1],TmArr[_pos],5);
inc(_pos,5);

nmudp1.sendbuffer(TmArr,_pos-1);
end;


//接受
Var
TmArracked array [1..81] of char;
_pos:integer;
tmb:byte;
begin
nmudp1.readbuffer(TmArr,_pos);
//再按照呢指定的格式分析即可。
end;

接受答案了.