Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'将字体设成宋体9号字,字符集选择 GB2312_CHARSET.
就这么简单。