急WideChar(strTemp1[i+1]*256 + strTemp1[i]);该怎么解决

急急急急急急WideChar(strTemp1[i+1]*256 + strTemp1[i]);
 Delphi里，WideChar(strTemp1[i+1]*256 + strTemp1[i]);
BCB里怎么写啊？

[解决办法]

(WideChar)(strTemp1[i+1]*256 + strTemp1[i]);