2014 年 1月 6 日随笔档案 - 向北方

公告

2014年1月6日

摘要： unit Form_ToChangCSVforDBFU;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, ComCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls, StdCtrls;type TForm_ChangCSVToDBFF = class(TForm) PopupMenu1: TPopupMenu; DataSource1: TDataSource; DBGr... 阅读全文

posted @ 2014-01-06 09:06 向北方阅读(1994) 评论(0) 推荐(0) 编辑

delphi下如何获得不带扩展名的文件名？

摘要： Edit1.Text:=ChangeFileExt(ExtractFileName(Application.ExeName),'') ; //获取到应用程序名后，将后缀名清空就可以啦。阅读全文

posted @ 2014-01-06 09:03 向北方阅读(905) 评论(0) 推荐(0) 编辑

----赖格英-----

公告