手机发短信问题求助

Question

目前我能够使用MSCOMM控件，利用手机红外线连接NOKIA8310发送短信，文本方式发送没有问题，但发送中文短信确一直不行，希望高手指点，如解决，谁有兴趣可拿源程序一起研究
以下简单短信代码：
MSComm.portopen:=true;
mscomm.output:='AT+CMGF=0'+chr(13);
mscomm.output:='AT+CMGS="0891683108200005F011000D91683117417906F5000800165982679C6536523077ED4FE1002C8BF756DE590D002E"'+chr(26);使用超级终端输入AT+CMGS命令报错，不知是否语法有问题

Answer 1

需要进行编码的转换
[email protected]

Answer 2

编码转换：
function TfrmMain.EncodeGb(var s: WideString): String;
var
        i,len:Integer;
        cur:Integer;
        t:String;
begin
        Result:='';
        len:=Length(s);
        i:=1;
        while i<=len do
        begin
                cur:=ord(s[i]);
                //BCD转换
                FmtStr(t,'%4.4X',[cur]);
                Result:=Result+t;
                inc(i);
        end;
end;

Answer 3

to  pwzhu666(暴龙) 我看到您使用过TC35发短信的留贴，不知是否成功，可否给我参考，谢谢！[email protected]

Answer 4

使用PDU，已经转换UCS2编码，难道真的要放弃，这个问题已经围绕我一个多星期，好郁闷！！！！！！！！！！！！无奈这里的高手都解决不了，上哪去咨询,好失望！！！！！！！！！！