首先向Form窗体拖一个SaveDialog控件,Name属性改为:dlgSave,然后添加一个按钮,Caption属性改为:浏览,Name属性改为:btnBrowse。 然后双击浏览按钮添加如下代码: 注:dlgSave.DefaultExt := '.dbf'; 一行实现的是我们只填写文件名默认 ...
delphi adoquery的post和UpdateBatch Post是确认当前的修改,而UpdateBatch是把已经确认但是没有存盘的数据写入数据库当ADOQuery的CursorType是ctKeySet或者ctStatic,并且LockType是ltBatchOptimistic的时候, ...
最近用delphi做开发,用到了DbGrid控件,想在控件上点击鼠标右键弹出菜单 关联DbGrid的 Popupmenu 倒是可以实现,但是这样的效果是不管你在哪里单击鼠标右键 只要在DBGrid里面就会弹出菜单,我想只在数据区弹出,网上查了N多了资料,没有找到满意的 偶然间发现,当在DbGrid上 ...
分类:
数据库 时间:
2019-06-08 11:44:45
阅读次数:
194
procedure CreatRepSheet(SheetName:String;PageSize,PageLay:Integer); {新建Excel工作簿、进行页面设置} begin {新建Excel工作簿} if ExlApp.WorkBooks.Count < 1 then begin Ex... ...
运行预览 模板样式 存储返参 导出的Excel 2. 代码实现 ...
uses Excel2000,ComObj; procedure F_Form.Button1Click(Sender: TObject);var myExcel:TExcel; Int_i,Int_j,rowCount,columnCount:Integer; ExcelId:Variant;be ...
分类:
数据库 时间:
2019-06-07 12:49:59
阅读次数:
138
Var FExcel:OleVariant; //excel应用程序 FWorkBook :OleVariant; //工作表 Temsheet:OleVariant; //工作薄 FPicture:OleVariant;//图片 tmpstr:String; range:variant;//范围 ... ...
5种数据类型string(字符串)基础操作127.0.0.1:6379>getname(nil)127.0.0.1:6379>setname测试OK127.0.0.1:6379>getname"\xe6\xb5\x8b\xe8\xaf\x95"127.0.0.1:6379>EXISTSname(integer)1127.0.0.1:6379>delname(integ
分类:
其他好文 时间:
2019-06-04 17:47:40
阅读次数:
98
HP-Socket 是一套通用的高性能 TCP/UDP/HTTP 通信框架,包含服务端组件、客户端组件和Agent组件,广泛适用于各种不同应用场景的 TCP/UDP/HTTP 通信系统,提供 C/C++、C#、Delphi、E(易语言)、Java、Python 等编程语言接口。HP-Socket 对 ...
分类:
其他好文 时间:
2019-06-04 13:24:42
阅读次数:
112