摘要：这个控件非常好，非常的简捷，尤其是Range对象操作使用起来非常方便，值得推荐。 代码片断如下：procedure TForm1.Button1Click(Sender: TObject); Var Book: IXLSWorkbook; //申明工作薄 ws: IXLSWorksheet; //申明工作表 i, j: integer; begin //Create workbook 创建工作薄 Book := TXLSWorkbook.Create; //Add new sheet 在工作薄中加一个新的工作表 ws := Book.Sheets.Add; ws.Name :=... 阅读全文

摘要：Delphi编程保存数据到Excel文件(3)：使用XLSReadWriteII控件 今天采用XLSReadWriteII控件来完成10×10的乘法表，发现它很灵活，实现的功能比较多，基本能满足所以的需求。 代码片断如下：procedure TForm1.Button1Click(Sender: TObject); Var i,j:Integer; begin XLS.Sheets[0].Name:= 'Ten times table(乘法表)'; //给工作表命名 //General settings 常规的格式设置 With XLS.Sheet[0].Range. 阅读全文

摘要：function Tdm.GetHzPy(const AHzStr: string): string;const ChinaCode: array[0..25, 0..1] of Integer = ((1601, 1636), (1637, 1832), (1833, 2077), (2078, 2273), (2274, 2301), (2302, 2432), (2433, 2593), (2594, 2786), (9999, 0000), (2787, 3105), (3106, 3211), (3212, 3471), (3472, 3634), (3635, 3722), (37 阅读全文

摘要：由于系统使用导出的格式是csv，但是如果数字的长度太长的话，用excle打开会用科学技术法自动截断了。所以开发了一个转换程序。 [java] view plaincopyprint?unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls,ComCtrls,ComObj,StrUtils,WinSkinData,WinSkinStore,Gauges,ShellApi,ClipBrd;typeTForm1=class(TF 阅读全文

摘要：声明部分 procedure DataToExcelCSV(SaveFileName:string;DataSet:TDataSet;ShowCompleteBoX:Boolean=True;GroupCount:integer=1);......{------------------------------------------------------}{检测findStr是否in mainStr,如果存在则返回True,否则False}{------------------------------------------------------}function TFun.IsStrIn 阅读全文

摘要：给你个超简单的：procedure TForm1.btn1Click(Sender: TObject);varCsvData: TStringList;I: Integer;beginCsvData:= TStringList.Create;try CsvData.LoadFromFile('ee.csv'); for I := 0 to CsvData.Count -1 do beginmmo1.Lines.Add(Pchar(CsvData.ValueFromIndex[I]) + 11); end;finally CsvData.Free;end;end; /////// 阅读全文

摘要：csv是从Oracle导出来的，不是从vfp导出来的.Oracle用yyyy-m-d和yyyy-mm-dd导出，然后vfp日期型导入都无法成功，而用mm/dd/yyyy是可行的。所以记得以后要从csv导数据到vfp一定确保日期为该格式，与setdate完全无关。/////////////////////////////////////////////////////////////////////////////////////////////我有一个500M的CSV文件，想把它变成一个DBF文件来处理。 但不知如何操作。 用APPEND FROM 就会要求这个DBF文件必须先存在。 请问各位 阅读全文

摘要：最近从SQL导出了许多CSV文件发到各部门用 本来csv用execl打开很方便,可是由于这次导出的含有身份证,而且是18位的execl对于18位身份证很敏感,怎么也转换不成功,老爸最后3位修改为0没有办法,另择它涂通过咨询GOOGLE老师,得到一个csv转换为DBF的方法 1:建立一个DBF文件,字段要与csv字段统一 2:打开这个文件 use 123.dbf 3:追加记录 APPEND FROM c:\\180.csv TYPE DELIMITEDok,成功了append from 命令 从一个文件中读入记录，追加到当前表的尾部。 语法 APPEND FROM FileN... 阅读全文