- 博客(6)
- 收藏
- 关注
RSS订阅转载 数字和字母组合的字符串数字部分自增
function IncNum(const NumberStr: string): string;vari, num: Integer;numstr: string;IsIn: Boolean;beginIsIn := True;;numstr := NumberStr;for i := Length(numstr) downto 1 dobeginif numstr[i] in ['0'..'9'] thenbeginif not isin then Continue;isin.
2020-09-01 21:23:46
556
转载 delphi AddObject 用法
//添加数据和对象到下拉框procedure TForm1.Button1Click(Sender: TObject);var s:string;begin ComboBox1.Items.Clear; s:= '1001'; //ComboBox1.Items.Add('1'); ComboBox1.Items.AddObject('1',TObject(s) ); s:='2001'; //ComboBox1.Items.Add('2'); ComboBox1....
2020-08-16 11:18:03
577
转载 动态将ADOQuery数据移植到ClientDataSet通用函数
//******************************************************************************// 函数功能: 执行SQL查询语句,影响ClientDataSet控件// 函数名称: cf_dbSelectSQL// 函数参数: var oClientDataSet:TClientDataSet; 对象(C...
2019-09-24 17:46:58
731
转载 oracle根据身份证号码 计算年龄、性别
一、Oracle根据身份证判断性别:select decode(mod (to_number(substr('110228197802199547' ,17, 1)),2 ),0, '女','男' ) as sex from dual ;select decode(mod (to_number(substr('530323197503252610' ,17, 1)),2 ),0, '女'...
2019-06-27 22:40:54
3340
转载 delphi导入导出excel|oracle
1.导出用DBGrid直接到剪切板，然后粘贴到excle就ok了，有什么Excle的格式之类的可能要设置一下：{ 1. StrTableName要查询的表名 2。StrFieldsName查询表的字段名 3。StrWhere查询条件 4。StrOrder 查询排序次序 }procedure TFrmexportData.
2016-07-16 14:55:11
537
转载 在SQL Server 2005中连接Oracle，完成查询、插入操作
建立指向Oracle的连接假设Oracle数据库的用户名为test，密码为test，在SQL Server数据库所在服务器上建立的指向Oracle数据库的服务命名为hisorcl.1. 在SQL Server的企业管理器中的对象资源管理器中，展开“服务器对象”，在“链接服务器”上右击，选“新建链接服务器”。如下图所示进行配置。通过连接查询Oracle数据库中的数
2016-07-11 23:25:46
259
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人