Delphi调用WebService，中文传递过去就变成???乱码了，急！急！(38分)

WebService服务是用Java写的，客户端程序用Delphi写的，
接口定义如下：
Syndept = interface(IInvokable)
['{2D499608-C33E-3F4E-9137-AD961070EFCA}']
function SynchronizeOutDepart(const operateID: String;
const depart: DepartmentInformation): Boolean;
stdcall;
end;

DepartmentInformation = class(TRemotable)
private
FdepartCode: String;
FdepartDefault: String;
FdepartDescript: String;
FdepartUpcode: String;
FDepartName: string;
published
property departCode: String read FdepartCode write FdepartCode;
property departDefault: String read FdepartDefault write FdepartDefault;
property departDescript: String read FdepartDescript write FdepartDescript;
property departName: String read FdepartName write FdepartName;
property departUpcode: String read FdepartUpcode write FdepartUpcode;
end;

接口调用程序如下：
procedure TForm1.Button7Click(Sender: TObject);
var
Obj:Syndept;
DepartepartmentInformation;
s:String;
begin
HTTPRIO6.HTTPWebNode.UseUTF8InHeader := true;
Obj:=HTTPRIO6 as Syndept;
Depart:=DepartmentInformation.Create ;
Try
Depart.departCode:='A0200';
Depart.departName:='新增' ;
Depart.departUpcode:='0';
Obj.SynchronizeOutDepart('11',Depart);
Finally
Depart.Free ;
end;
end;
departName传递过去以后就变成??
请各位大虾帮帮忙，急！

是不是字符集的问题,你用gb2312,或utf-8试试