Delphi6及SqlServer对于生僻字䶮的支持测试

最新推荐文章于 2024-08-06 17:28:02 发布

踏雪寻梅i

最新推荐文章于 2024-08-06 17:28:02 发布

阅读量1.7k

点赞数

分类专栏： Delphi 文章标签： Delphi Sqlserver 生僻字显示成问号 TntUnicodeControl Unicode字符集

本文链接：https://blog.csdn.net/weixin_41660162/article/details/80363520

版权

本文介绍了在Delphi6中处理SqlServer中的生僻字问题，包括使用nvarhcar类型保存生僻字，更新时加入'N'前缀，以及通过TntUnicodeControl控件实现生僻字的录入与显示。同时，文章提到使用TADOConnection来解决从后台读取和保存生僻字的问题，而其他如ztsql, ClientDataSet, TDCOMconnection等框架未能成功。" 113478183,10548743,V8引擎：异步优化与性能提升,"['JavaScript', 'V8引擎', '异步编程', '性能优化', '调试工具']

摘要由CSDN通过智能技术生成

1.二进制SqlServer正像现场反馈的这样，后台字段只能以nvarhcar类型来保存，并且插入和更新的时候需要在字段前加’N’,例：
update SF_BRXXK set hzxm=N’䶮’
这里写图片描述
可参见：https://blog.csdn.net/chinahuyong/article/details/78558695
2.Delphi6当前的控件也无法显示该生僻字，需要安装TNT系列的控件,才能支持生僻字的录入与显示。
tntunicodecontrol控件，百度云下载地址链接：https://pan.baidu.com/s/152GP1bVxijo4e2frqVljRg 密码：uwxn
这里写图片描述
3.以上两点可以实现数据库的存储和前台的录入与显示，但是如何将后台保存的生僻字读取到前台，以及将前台录入的生僻字保存在后台。经测试使用框架的ztsql，ClientDataSet，TDCOMconnection等都无法实现，只有使用TADOConnection才能完成。
这里写图片描述

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TntStdCtrls, DB, ADODB, RzButton, ExtCtrls, RzPanel;

type
  TForm1 = class(TForm)
    btn2: TRzBitBtn;
    lbl3: TLabel;
    EditConnectionString: TEdit;
    ADOConn: TADOConnection;
    Query3: TADOQuery;
    btn4: TRzBitBtn;
    rzgrpbx1: TRzGroupBox;
    lbl2: TLabel;
    EditHzxm1: TEdit;
    btn1: TRzBitBtn;
    lbl4: TLabel;
    EditHzxmnew1: TEdit;
    rzgrpbx2: TRzGroupBox;
    lbl5: TLabel;
    lbl6: TLabel;
    EditHzxm2: TTntEdit;
    btn3: TRzBitBtn;
    EditHzxmNew2: TTntEdit;
    procedure btn2Click(Sender: TObject);
    procedure