- 博客(5)
- 收藏
- 关注
RSS订阅原创 记一次批量替换文件名称的解决方法
例如：cd UK.02-P.bmp UK.02-K1K2.bmp UK.01-W1W2.bmp UK.01-P.bmp。客户服务器被黑，已上传的文件丢失， 数据库只有源文件与数据库保存文件的对应关系。：将d盘file_dir目录下的aa.txt文件重命名为bb.txt；从数据库抓取缺失的数据，EXCEL内去重并转置，批量建立文件夹。建立第3步复制后的文件名与目的名称的对应关系。手动将源文件复制到新建的同名称的文件夹中。将源文件复制相应的份数，这里使用到。
2023-03-17 17:12:53
83
原创 delphi eof
Eof = end of fileswhile not Eof do 判断是否结束就是把查询出来的结果集 从第一条开始 一直执行到最后一条结束当数据集的内容不为空时, 做begin end 内的事情...
2018-11-16 13:53:05
1646
原创 如何改变DBGridEh中其中某个单元格的字体颜色
procedure TFormMain.DbgAllDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumnEh; State: TGridDrawState);begin if (Column.FieldName='1|规格') and (DbgAll.Data...
2018-10-30 21:06:12
2181
4
转载 sql server语句
一、基础1、说明：创建数据库CREATE DATABASE database-name2、说明：删除数据库drop database dbname3、说明：备份sql server--- 创建 备份数据的 deviceUSE masterEXEC sp_addumpdevice 'disk', 'testBack', 'c:\mssql7backup\MyNwind_1.dat'...
2018-10-30 09:03:46
146
原创 delphi 删除行选记录
procedure TFormBOM.SptCraftDelClick( Sender: TObject);var i: integer;begin if not CdsCraftCode.Active then Exit; if CdsCraftCode.RecordCount = 0 then Exit; if DBGCraftCode.Selected...
2018-10-30 09:02:24
757
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人