Delphi连接Oracle数据库的一些经验

1、Oracle在PLSQL里面执行完Insert、Update、Delete之后要跟一行“COMMIT;”用来提交事务，两个语句后面需要各跟着分号，注：Oracle对数据库进行修改的语句会自动用事务来执行，执行完支持回滚，所以需要手动加一行命令（COMMIT;）来提交事务，才能把修改提交到物理文件中。
例子：

delete from LIS.TM where viseno in (select viseno from LIS.TM where PID='12100002');
COMMIT;

2、使用TOraSession连接Oracle数据库时需要设置以下几个属性
OraSession1.LoginPrompt := False;//关闭登录提示
OraSession1.Options.Direct := True;//使用直连的方式连接（TCP/IP连接，无需安装Oracle客户端）
OraSession1.Username := ‘TEST’;//数据库用户名
OraSession1.Password := ‘password’;//数据库密码
OraSession1.Server := ‘101.1.1.4:1522:sn=Lis’;//服务器（IP+端口号+sn=数据库名/服务名）
OraSession1.Server.Connected := True;//开启连接

3、使用TOraQuery控件时，查询时用TOraQuery.Open方法，但是执行命令时（如增删改）千万不能用TOraQuery.ExecSQL方法，因为该方法提交的命令执行完之后不会自动提交事务，会引发死锁。需要用TOraQuery.Execute方法来提交。

4、insert语句插入日期类型的字段的时候需要用to_date()函数格式化
例子：

insert into LIS.L_TMXX(VISENO,
	SPNO,REQUESTER,REQUESTDATE,SECTION,STAYHOSPITALMODE,
	PID,PNAME,GENDER,BRDAY,AGE,STYPE,
	EXAMINAIM,REQUESTMODE,EXECUTETIME,EXECUTOR,
	REQUESTNO,LISLX,SFZH) 
values('12000007','12000007','体检中心',
	to_date('2018-12-10 11:34:28','yyyy/mm/dd hh24:mi:ss'),
	'','1','12100002','王xx','1',
	to_date('1997-03-07','yyyy/mm/dd'),'22','D','体检','0',
	to_date('2018-12-10','yyyy/mm/dd'),'黄xx',
	'000000010139','1','199703075972')

Delphi连接Oracle数据库的一些经验

悦读