摘要： //uses comobjprocedure Tfrm1.Button1Click(Sender: TObject);var ExcelApp, Sheet, MySheet: OleVariant; strExcelFile,str_SheetName: string; i, iTotRows: integer;begin inherited; with TOpenDialog.Create(nil) do begin DefaultExt := 'xls'; Filter := 'Excel 文件(*.xlsx;*.xls)|*.xlsx;*.xls'; / 阅读全文

摘要： [转]sql server 数据库中插入韩文乱码问题解决方法： 在 Microsoft SQL Server 中, 以下数据类型支持 Unicode 数据： nchar, nvarchar, ntext使用SQL语句操作的时候应该注意以下问题：原查询语句Select * From TABLENAME Where field1 like '%xxx%'使用 Unicode 数据类型的, 应该为:Select * From TABLENAME Where field1 like N'%xxx%'插入数据也一样INSERT INTO TABLENAME(Detail) 阅读全文