Question

delphi unicode编码转换成GB2312

Answer 1

参考API函数WideCharToMultiByte。配合GetMem，ZeroMemory来分配内存。
注意，你是要宽字符转简体GB，你要事先知道原编码是否都是简体的中文字，否则会乱码

Answer 2

用
UnicodeToUtf8();
转成UTF8字符串，然后
再用
Utf8ToAnsi();
得到GB2312
具体使用方法请参考帮助